Zwei-mal onmousedown?

[maximi]

Ok jetzt gab ich ihn. Den Fehler! :-D

Bei mousedown und mouseup geht das, wenn ich aber das eingebe

Delphi-Quellcode:

    procedure mousemove(Sender: TObject; Shift: TShiftState;
  X, Y: Integer);override;

bekomme ich die Meldung:

Deklaration von 'mousemove' unterscheidet sich von vorheriger Deklaration.

Was mache ich falsch?