Image Cursor verzogen

[Kolone]

Hallo Leute,
wenn ich in einem Image die OnMousedown Methode benutze und dann die vorgegebenen integer Werte von X und Y nehme, dann ist der Cursor von der Maus immer verschoben. Heißt wenn ich ein punkt per klick machen will taucht der Punkt nicht da auf wo ich ihn wollte sondern an einer ganz anderen Stelle.

Delphi-Quellcode:

procedure TForm1.Image1MouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);

Image1.Canvas.FillRect(Rect(X, Y, X+10, Y+10));

was mach ich falsch?

Und warum immer Image?!?!