mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-15 23:00:18 +02:00
LCL: reduced debugging
git-svn-id: trunk@26285 -
This commit is contained in:
parent
d530a2cf9f
commit
bef96de901
@ -7767,8 +7767,6 @@ begin
|
|||||||
Layout:=TAutoSizeCtrlData.Create(Self);
|
Layout:=TAutoSizeCtrlData.Create(Self);
|
||||||
Layout.ComputePreferredClientArea(false,false,NewMoveLeft,NewMoveRight,
|
Layout.ComputePreferredClientArea(false,false,NewMoveLeft,NewMoveRight,
|
||||||
NewClientWidth,NewClientHeight);
|
NewClientWidth,NewClientHeight);
|
||||||
if ClassName='TEditorCodetoolsOptionsFrame' then
|
|
||||||
Layout.WriteDebugReport('TWinControl.CalculatePreferredSize ',' ');
|
|
||||||
if (NewMoveLeft<>0) or (NewMoveRight<>0) then ;
|
if (NewMoveLeft<>0) or (NewMoveRight<>0) then ;
|
||||||
finally
|
finally
|
||||||
Layout.Free;
|
Layout.Free;
|
||||||
|
Loading…
Reference in New Issue
Block a user