Schon habe ich das nächste Problem:
Delphi-Quellcode:
function GetWindowLeft(Window: HWND): Integer;
var Place:TWindowPlacement;
begin
Place.Length:=SizeOf(TWindowPlacement);
GetWindowPlacement(Window,@Place);
result := Place.rcNormalPosition.Left;
end;
function GetWindowTop(Window: HWND): Integer;
var Place:TWindowPlacement;
begin
Place.Length:=SizeOf(TWindowPlacement);
GetWindowPlacement(Window,@Place);
result := Place.rcNormalPosition.Top;
end;
Diese Funktionen liefern nicht die Position vom Control auf dem Bildschirm, sondern offensichtlich nur Abstand von der nächst-höheren Instanz weg. Gibts da ne bessere Möglichkeit?
EDIT: Habe es selbst gefunden, wenn es jemand wissen will^^:
Delphi-Quellcode:
GetWindowRect(
Handle,TRect);
X := TRect.Left;
Y := Trect.Top;