Maus Position in image1

[net devil]

Hallo liebe Delphianer,

bevor jemand kommt ich solle due SuFu benutzen, ich hab mich totgegoogelt.

Ich versuche die aktuellen Mauskoordinaten auszulesen. Das ist an sich auch kein Problem, jedoch werden sie mir immer auf den ganzen Bildschirm bezogen ausgegeben.
Jetzt möchte ich aber die Koordinaten nur auf das image1 beziehen und die Ausgabe in 2 Labels machen.

Ich habe einiges gefunden zu dem Thema, das hat jedoch nicht funktioniert (es liegt wahrscheinlich an mir).

Was mache ich falsch: Es wird einfach nichts angezeigt.
Bitte helft mir schnell

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    Label1: TLabel;
    Label2: TLabel;
    procedure FormMouseMove(Sender: TObject; Shift: TShiftState; X,Y: Integer);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
  label1.caption:=inttostr(x);
  label2.caption:=inttostr(y);
end;

end.