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:


Delphi FAQ