mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-08 20:38:16 +02:00
Qt: assign title as document name. part of issue #24592
git-svn-id: trunk@46634 -
This commit is contained in:
parent
9e798f0274
commit
07ea7c3d5c
@ -214,6 +214,7 @@ begin
|
||||
{$IFDEF VERBOSE_QT_PRINTING}
|
||||
DebugLn('TQtPrinters.DoBeginDoc()');
|
||||
{$ENDIF}
|
||||
QtDefaultPrinter.DocName := Title;
|
||||
BeginPage;
|
||||
end;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user