Form soll nicht verschiebbar sein!

[Schwedenbitter]

Hallo,

ich muss das Thema leider wieder aufwärmen:

Ich habe mittels

Delphi-Quellcode:

Procedure TDiktate.WMWindowPosChanging(Var Msg: TWMWindowPosMsg);
   // Message WM_WindowPosChanging;
Begin
   Inherited;
   Msg.WindowPos^.flags:=Msg.WindowPos^.flags Or SWP_NoMove;
End;

die Form unverschiebbar gemacht. Im ObjektInspektor habe ich Position:=poScreenCenter gesetzt. Leider funktioniert das nun nicht mehr. Das Fenster wird ausnahmslos dort angezeigt, wo ich es erstellt habe bzw. bei 0,0 (=links oben). Vermutlich liegt es daran, dass die Position erst später angepasst und dann WMWindowsPosChanging schon ausgeführt wird.

Wie erreiche ich es, dass das Fenster wieder poScreenCenter und unverschiebbar wird?

Es gleich in der Mitte zu positionieren scheidet aus, weil die Benutzer ja unterschiedliche Auflösungen haben könnten.

Gruß, Alex