Maximierung eines Programms nur auf ein Teil beschränken

[neolithos]

Du hattest alCustom gesetzt und das verhintert jegliches Bewegen des Formulares

So wäre es besser:

Delphi-Quellcode:

begin
 If (Message.CmdType = SC_MAXIMIZE) or (Message.CmdType = SC_MAXIMIZE + 2) then
    if (SForm.Align = alTop) then
       SForm.Align := alNone
    else
       SForm.Align := alTop
 else
    inherited;
end;

Das kann aber nicht funktionieren, da die alte Fenster Position bei alTop gemerkt und bei alNone wieder gesetzt werden müsste. Da umgeht man aber jegliche von Windows implementierte Funktionalität. Das Doppelfenster (beim Maximieren-Schalter) wird nie erscheinen, da das Fenster nicht maximiert ist. Schau die _ak noch mal genau an. Da wird auch gezeigt wie man den Offizellen Weg beschreitet, "mehr" haben die Win98-Programmierer auch nicht gemacht.