From 0f10f9bfc124e3f50804e6fd7b71b9b122aec730 Mon Sep 17 00:00:00 2001 From: mattias Date: Wed, 17 Mar 2010 16:07:58 +0000 Subject: [PATCH] LCL: improved debugging git-svn-id: trunk@24069 - --- lcl/include/wincontrol.inc | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/lcl/include/wincontrol.inc b/lcl/include/wincontrol.inc index 05b2037744..cdd925b1dd 100644 --- a/lcl/include/wincontrol.inc +++ b/lcl/include/wincontrol.inc @@ -30,7 +30,7 @@ {off $DEFINE VerboseCanAutoSize} {off $DEFINE VerboseSizeMsg} -{$DEFINE CHECK_POSITION} +{off $DEFINE CHECK_POSITION} {$IFDEF CHECK_POSITION} const CheckPostionClassName = 'xxTPage'; const CheckPostionName = 'IDEOptionsDialog'; @@ -2289,8 +2289,8 @@ begin //if Result then debugln('TWinControl.AutoSizeDelayed A ',DbgSName(Self),' wcfCreatingChildHandles=',dbgs(wcfCreatingChildHandles in FWinControlFlags),' csLoading=',dbgs(csLoading in ComponentState)); {$IFDEF VerboseCanAutoSize} if Result {and AutoSize} then begin - DbgOut('TWinControl.AutoSizeDelayed Self='+DbgSName(Self)+' '); - if not HandleAllocated then debugln('not HandleAllocated'); + if not HandleAllocated then + debugln('TWinControl.AutoSizeDelayed Self='+DbgSName(Self)+' not HandleAllocated'); end; {$ENDIF} end; @@ -7388,6 +7388,7 @@ var begin if HandleAllocated then begin + //DebugLn(['TWinControl.DestroyWnd ',DbgSName(Self)]); {$IFNDEF OldAutoSize} DisableAutoSizing; try