MDI Child Top-Position forcieren

[ConnorMcLeod]

Wieder mal das leidige Thema MDI...
Ich muss ein MDI-Child maximiert erzeugen. Im Laufe der Bedienung kann der Benutzer das Child auch mal normalisiert darstellen (durch Klick auf den Button links neben [X]). Dann verkleinert sich das Child. Dabei möchte ich eine gewisse Top-Position bestimmen, weil das MDI-System das Fenster automatisch an eine Position stellt, die mir nicht passt; wie geht das?
Wie immer: danke im Voraus für alles, was da kommt

[ConnorMcLeod]

Wie befürchtet: keine Ideen.
In Beantwortung meiner eigenen Frage, für wen auch immer es interessiert:
Die Zuweisung von *Top* greift erst, wenn das Fenster *WindowState = wsMaximized* hat.
Die Zuweisung an *Top* bewirkt aber, dass der Zustand *wsMaximized* verlorengeht.

Lösung:

Delphi-Quellcode:

SendMessage(lfrmMdiChild.Handle, WM_SETREDRAW, 0, 0);
lfrmMdiChild.FormStyle   := fsMDIChild;
lfrmMdiChild.WindowState := wsMaximized;
lfrmMdiChild.Top         := 2;
lfrmMdiChild.WindowState := wsMaximized;
SendMessage(lfrmMdiChild.Handle, WM_SETREDRAW, 1, 0);
RedrawWindow(Application.MainForm.Handle, nil, 0, RDW_FRAME or RDW_INVALIDATE or RDW_ALLCHILDREN or RDW_NOINTERNALPAINT);