Vorlage

Erklärung
Mit Hilfe dieser Funktionen kann man die Größe eines Fensters beschränken. Alles nähere im Quelltext

Quelltext

private         //Im private- Abschnitt deklarieren         procedure WMGetMinMaxInfo(var Msg: TMessage); message WM_GETMINMAXINFO;        ....        //Hier die eigentliche Funktion        procedure TForm1.WMGetMinMaxInfo(var msg: TMessage);        begin          {Wann immer Windows die Fenstergröße verändern will           sagen wir Windows wie groß das Fenster werden soll }          //Das Fenster muss min. 111 X 222 groß sein          PMinMaxInfo(Msg.lParam)^.ptMinTrackSize := Point(111, 222);          //Es darf aber auch nicht größer als 333 X 444 groß sein          PMinMaxInfo(Msg.lParam)^.ptMaxTrackSize := Point(333, 444);        end;