Form.Resize;

0

Witam!
Jak skutecznie zablokowac "rozmiarowanie" formy do jakiejs wartosci: czyli np. przekroczymy width=800 if width

0

procedure TForm1.FormCanResize(Sender: TObject; var NewWidth,
NewHeight: Integer; var Resize: Boolean);
begin
if Form1.Width >= 550 then NewWidth := 550;
if Form1.Height >= 550 then NewHeight := 550;
end;

0

We własciwościach formy masz Constraints i tam jest MaxWidth, MinWidth, MaxHeight i MinHeight.

1 użytkowników online, w tym zalogowanych: 0, gości: 1