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

increased verbosity when using -dVerboseAutoSize

Browse Source 
git-svn-id: trunk@7738 -
This commit is contained in:
vincents 2005-09-19 11:50:40 +00:00
parent 78d3820117
commit e5144c22c8
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
lcl/include/wincontrol.inc
View File

@ -725,7 +725,7 @@ var
dx: Integer;
dy: Integer;
begin
//debugln('TWinControl.DoAutoSize ',DbgSName(Self));
debugln('TWinControl.DoAutoSize ',DbgSName(Self));
If not AutoSizeCanStart then exit;
if AutoSizeDelayed then begin
Include(FControlFlags,cfAutoSizeNeeded);
@ -2950,8 +2950,13 @@ begin
Include(FWinControlFlags,wcfReAlignNeeded);
exit;
end;
//DebugLn('TWinControl.ReAlign ',Name,':',ClassName);
{$IFDEF VerboseAutoSize}
DebugLn('TWinControl.ReAlign A',Name,':',ClassName,' ', Dbgs(BoundsRect));
{$ENDIF}
AlignControl(nil);
{$IFDEF VerboseAutoSize}
DebugLn('TWinControl.ReAlign B',Name,':',ClassName,' ', Dbgs(BoundsRect));
{$ENDIF}
Exclude(FWinControlFlags,wcfReAlignNeeded);
end;