Ich habe ein komplexes TForm mit allerlei Panels etc. Auf einem PageControl sitzt ein TEdit (mit .Parent = MeinForm), dessen relative Position
zur TForm ich benötige, um es in einem speziellen Fall richtig auszurichten.
Bei TControl.ClientOrigin ist zu beachten, daß es den Punkt auf dem
Screen liefert, nicht auf der übergeordneten
TForm. Demnach sollte es so gehen:
Delphi-Quellcode:
X := MeinEdit.ClientOrigin.X - GetParentForm(MeinEdit).Left;
Y := MeinEdit.ClientOrigin.Y - GetParentForm(MeinEdit).Top;
Dabei schlagen allerdings ca. 10 Pixel für X + Y meiner "Window-Decoration" zu Buche, also die Ränder meines Vista-Theme-Form, was bei anderen Themes sehr wahrscheinlich mehr (oder weniger) sein wird, daher kein fester Wert.
Kann ich im Zusammenhang mit ClientOrigin die Ränder meiner Form zuverlässig berechnen?