Wie kann ich die Größe meines Fensters beim Resizen begrenzen?
Seit Delphi 4 gibt es dazu ja die Constraints, unter Delphi 3 kann man sich folgendermaßen behelfen:
type
TForm1 = class(TForm)
...
private
procedure WMGetMinMaxInfo(var Msg: TWMGetMinMaxInfo); message WM_GETMINMAXINFO;
...
end;
implementation
procedure TForm1.WMGetMinMaxInfo(var Msg: TWMGetMinMaxInfo);
begin
inherited;
with Msg.MinMaxInfo^ do begin
ptMinTrackSize.x:= 100;
ptMaxTrackSize.x:= 200;
ptMinTrackSize.y:= 150;
ptMaxTrackSize.y:= 300;
end;
end;
| Delphi 1 | Delphi 2 | Delphi 3 | Delphi 4 |
| nicht getestet | Version nicht betroffen | getestet |
siehe auch: