paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-26 14:13:46 +02:00
Code Issues Packages Projects Releases Wiki Activity

qt intf: clean up

Browse Source 
git-svn-id: trunk@28430 -
This commit is contained in:
mattias 2010-11-23 10:42:02 +00:00
parent a9009de33a
commit ce4f575c39
2 changed files with 1 additions and 4 deletions
components/printers
printersdlgs.pp
qt
qtprndialogs.inc

2
components/printers/printersdlgs.pp
View File

@ -96,7 +96,7 @@ uses
{$ENDIF}
{$ELSE}
{$IFDEF LCLQt}
uses Controls, qtobjects, qtwidgets, qt4, FileUtil;
uses Controls, qtobjects, qt4, FileUtil;
{$I qtprndialogs.inc}
{$ELSE}
uses Controls, udlgSelectPrinter, udlgPropertiesPrinter, udlgPageSetup, FileUtil;

3
components/printers/qt/qtprndialogs.inc
View File

@ -1,9 +1,6 @@
{%MainUnit ../printersdlgs.pp}
const
SExecute = 'Execute';
{ TPageSetupDialog }
function TPageSetupDialog.Execute: Boolean;