diff options
| -rw-r--r-- | src/corelib/fpg_widget.pas | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/corelib/fpg_widget.pas b/src/corelib/fpg_widget.pas index 3e4c5bc9..440645c4 100644 --- a/src/corelib/fpg_widget.pas +++ b/src/corelib/fpg_widget.pas @@ -1316,7 +1316,12 @@ begin itf := DebugMethodEnter('TfpgWidget.HandleAlignments - ' + ClassName + ' ('+Name+')'); {$ENDIF} if (csLoading in ComponentState) then + begin + {$IFDEF CStackDebug} + DebugLn('HandleAlignments ('+Name+'): csLoading detected, so we exit early'); + {$ENDIF} Exit; //==> + end; {$IFDEF CStackDebug} DebugLn(Format('dwidth=%d dheight=%d Classname=''%s''', [dwidth, dheight, ClassName])); |