MousePosition in dynamischer Klasse

[DeddyH]

Ich bin nicht sicher, ob ich das richtig verstanden habe, aber die relative Mausposition müsstest Du doch so ermitteln können.

Delphi-Quellcode:

function TBla.GetXPos: integer;
var p: TPoint;
begin
  p := ScreenToClient(Mouse.CursorPos);
  Result := p.X;
end;

function TBla.GetYPos: integer;
var p: TPoint;
begin
  p := ScreenToClient(Mouse.CursorPos);
  Result := p.Y;
end;