so habe ich es nun:
Delphi-Quellcode:
var
P: TPoint;
begin
P.X := Label2.Left;
P.Y := Label2.Top;
P := Label2.ClientToScreen(P);
MoveMouse(P.X - GetSystemMetrics(SM_CYSIZEFRAME), P.Y - GetSystemMetrics(SM_CYCAPTION) +
GetSystemMetrics(SM_CYSIZEFRAME), 10);
end;
bei manchen komponenten sind die endpositionen aber noch falsch.