mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-16 17:29:31 +02:00
Qt: cleanup unused local variables
git-svn-id: trunk@35673 -
This commit is contained in:
parent
083d8fdab4
commit
cd23c7197e
@ -511,7 +511,6 @@ function TQtWidgetSet.EventFilter(Sender: QObjectH; Event: QEventH): Boolean; cd
|
|||||||
var
|
var
|
||||||
AObject: TQtObject;
|
AObject: TQtObject;
|
||||||
W: TQtMainWindow;
|
W: TQtMainWindow;
|
||||||
Widget: QWidgetH;
|
|
||||||
LCLEvent: QLCLMessageEventH;
|
LCLEvent: QLCLMessageEventH;
|
||||||
|
|
||||||
function IsAnyWindowActive: Boolean;
|
function IsAnyWindowActive: Boolean;
|
||||||
|
@ -10780,7 +10780,6 @@ var
|
|||||||
NMLV: TNMListView;
|
NMLV: TNMListView;
|
||||||
R: TRect;
|
R: TRect;
|
||||||
Pt: TPoint;
|
Pt: TPoint;
|
||||||
i: Integer;
|
|
||||||
begin
|
begin
|
||||||
{$ifdef VerboseQt}
|
{$ifdef VerboseQt}
|
||||||
WriteLn('TQtListWidget.signalItemClicked');
|
WriteLn('TQtListWidget.signalItemClicked');
|
||||||
@ -13396,7 +13395,6 @@ function TQtMenuBar.EventFilter(Sender: QObjectH; Event: QEventH): Boolean;
|
|||||||
{$IFNDEF DARWIN}
|
{$IFNDEF DARWIN}
|
||||||
procedure UpdateDesignerClientRect;
|
procedure UpdateDesignerClientRect;
|
||||||
var
|
var
|
||||||
B: Boolean;
|
|
||||||
WParent: QWidgetH;
|
WParent: QWidgetH;
|
||||||
Window: HWND;
|
Window: HWND;
|
||||||
ACtl: TWinControl;
|
ACtl: TWinControl;
|
||||||
|
@ -6228,7 +6228,6 @@ var
|
|||||||
dx, dy: integer;
|
dx, dy: integer;
|
||||||
OldRop: Integer;
|
OldRop: Integer;
|
||||||
OldBkColor: TColorRef;
|
OldBkColor: TColorRef;
|
||||||
ABrush: QBrushH;
|
|
||||||
begin
|
begin
|
||||||
{$ifdef VerboseQtWinAPI}
|
{$ifdef VerboseQtWinAPI}
|
||||||
WriteLn('[WinAPI StretchMaskBlt]',
|
WriteLn('[WinAPI StretchMaskBlt]',
|
||||||
|
Loading…
Reference in New Issue
Block a user