mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-26 23:00:15 +02:00
Printers, fix PageWidth/PageHeight after orientation change on printer setup dialog (cups), issue #13357
git-svn-id: trunk@19040 -
This commit is contained in:
parent
6a269eed85
commit
e9c207884b
@ -68,8 +68,7 @@ begin
|
||||
|
||||
fcupsNumOpts:=0;
|
||||
fcupsOptions:=nil;
|
||||
FStates:=FStates-[cpsDefaultPaperNameValid,cpsOrientationValid,
|
||||
cpsPaperNameValid,cpsCopiesValid];
|
||||
FStates := [];
|
||||
end;
|
||||
|
||||
procedure TCUPSPrinter.cupsAddOption(aName,aValue: string);
|
||||
@ -903,24 +902,27 @@ begin
|
||||
// || ||
|
||||
// || ||
|
||||
//
|
||||
// PORTRAIT ORIENTATION LANDSCAPE ORIENTATION
|
||||
// PORTRAIT LANDSCAPE
|
||||
// +-----------------+ +-----------------+
|
||||
// | t | | t |
|
||||
// | +---------+ | | +---------+ |
|
||||
// | | ( ) | | | | | / | |
|
||||
// | l | --+-- | r | | l |()-+--- | r |
|
||||
// | | / \ | | | | | \ | |
|
||||
// | +---------+ | | +---------+ |
|
||||
// | b | | b |
|
||||
// +-----------------+ +-----------------+
|
||||
//
|
||||
// +-----------------+ +-----------------+
|
||||
// | t | | t |
|
||||
// | +---------+ | | +---------+ |
|
||||
// | | | | | | | |
|
||||
// | | ( ) | | | | v | |
|
||||
// | | | | | | |\ | | |
|
||||
// | l | >--+--< | r | | l | ---+-() | r |
|
||||
// | | | | | | |/ | | |
|
||||
// | | / \ | | | | ^ | |
|
||||
// | | / \ | | | | | |
|
||||
// | +---------+ | | +---------+ |
|
||||
// | | | |
|
||||
// | b | | b |
|
||||
// +-----------------+ +-----------------+
|
||||
//
|
||||
// todo: check meaning of poReverseXXXXX
|
||||
// REVERSE PORTRAIT REVERSE LANDSCAPE
|
||||
// +-----------------+ +-----------------+
|
||||
// | t | | t |
|
||||
// | +---------+ | | +---------+ |
|
||||
// | | \ / | | | | \ | | |
|
||||
// | l | --+-- | r | | l | ---+-()| r |
|
||||
// | | ( ) | | | | / | | |
|
||||
// | +---------+ | | +---------+ |
|
||||
// | b | | b |
|
||||
// +-----------------+ +-----------------+
|
||||
//
|
||||
|
||||
if Orientation in [poPortrait, poReversePortrait] then begin
|
||||
|
Loading…
Reference in New Issue
Block a user