Override-Problem bei WMMoving

[SebE]

Morgen Leute.

Hab ein Programm mit 2 Fenstern.
Wollte, dass das eine, wenn es in die Nähe des Anderen kommt, "angezogen" wird.
Wie bei WinAmp.
Am Bildschirmrand gibt es ja die Eigenschaft ScreenSnap, und genau das möchte ich mit 2 Fenstern versuchen.

Hab es mit:

Code:

procedure WMMOVING(var Msg: TWMMoving); message WM_MOVING; override;

versucht -> Fehlermedlung: "Felddefinition nicht erlaubt nach Methoden oder Eigenschaften"

Grund für das Override ist, ich dachte mir, dass ich erst meine Procedure aufrufe und mit inherited die Original-Prozedur, da es ohne override immer nicht 100% funzt.

Kann mir jemand sagen, wie ich das schreiben muss, damit es geht?



Bin euch allen sehr dankbar