mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-01 12:00:58 +02:00
Qt: Fixed debugging typos.
git-svn-id: trunk@12294 -
This commit is contained in:
parent
59a0068926
commit
00578d83f3
@ -885,7 +885,7 @@ var
|
||||
QtDC: TQtDeviceContext;
|
||||
begin
|
||||
{$ifdef VerboseQtWinAPI}
|
||||
WriteLn('[TQtWidgetSet.DrawFocusRect] Handle: ', dbghex(hDC));
|
||||
WriteLn('[TQtWidgetSet.DrawFocusRect] Handle: ', dbghex(DC));
|
||||
{$endif}
|
||||
Result := False;
|
||||
|
||||
@ -3773,10 +3773,10 @@ begin
|
||||
|
||||
DCData := TQtDeviceContext(DC).CreateDCData;
|
||||
Result := 1;
|
||||
SavedDCList.Insert(Result, DCData)
|
||||
SavedDCList.Insert(Result, DCData);
|
||||
|
||||
{$ifdef VerboseQTWinAPI}
|
||||
WriteLn('Trace:< [WinAPI SaveDC] result=', result);
|
||||
WriteLn('Trace:< [WinAPI SaveDC] result=', Result);
|
||||
{$Endif}
|
||||
end;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user