paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-09 09:37:37 +02:00
Code Issues Packages Projects Releases Wiki Activity

qt: cleanup

Browse Source 
git-svn-id: trunk@14360 -
This commit is contained in:
paul 2008-03-02 05:37:15 +00:00
parent 9a0566101b
commit fea0292e3d
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lcl/interfaces/qt/qtobjects.pas
View File

@ -480,7 +480,7 @@ type
procedure setNumCopies(const AValue: Integer);
function getPrinterState: QPrinterPrinterState;
public
constructor Create;
constructor Create; override;
destructor Destroy; override;
function NewPage: Boolean;
function Abort: Boolean;
@ -2533,8 +2533,10 @@ begin
end;
procedure TQtClipboard.AttachEvents;
{$IFNDEF MSWINDOWS}
var
Method: TMethod;
{$ENDIF}
begin
inherited AttachEvents;
{$IFNDEF MSWINDOWS}

2
lcl/interfaces/qt/qtwidgets.pas
View File

@ -6516,8 +6516,6 @@ begin
end;
function TQtTableView.horizontalHeader: TQtHeaderView;
var
AParams: TCreateParams;
begin
{$ifdef VerboseQt}
WriteLn('TQtTableView.horizontalHeader');