mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-05 19:20:38 +02:00
parent
c1697fc2ef
commit
8726ea2759
@ -1470,8 +1470,6 @@ end;
|
||||
------------------------------------------------------------------------------}
|
||||
procedure TControl.DoConstraintsChange(Sender : TObject);
|
||||
begin
|
||||
Width:=Constraints.MinMaxWidth(Width);
|
||||
Height:=Constraints.MinMaxHeight(Height);
|
||||
AdjustSize;
|
||||
end;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user