Mausposition auf ImgView32 / Layer scrollen

[RobertP]

Moin,
ich möchte wenn jemand auf das Bild (mit ImgView32) klickt, die Mausposition auf dem Bild haben.

Delphi-Quellcode:

procedure TEditorForm.mapImageClick(Sender: TObject);
var
  x, y : Integer;  
  P : TPoint;
begin
  P := ScreenToClient(Mouse.CursorPos);
  x := P.X;
  y := P.Y;
  x := x - mapImage.Left;
  y := y - mapImage.Top;
end;

Funktioniert auch wenn die Scrollbalken ganz links und ganz oben sind. Was mach ich jetzt aber wenn sie das nicht sind?

Grüße,
MrPayne