|
Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.015 Beiträge
Delphi 12 Athens
|
AW: DropDownMenu öffnen bei OnClick
30. Dez 2014, 22:03
Könnte es sein, daß (Sender as TButton).top = 0
ist? In dem Fall wäre der Popup-Punkt die rechte untere Ecke des Buttons.
Bezogen auf den Button entsprechen die Koordinaten (0,0) der linken oberen Ecke. Mittels (Sender as TButton).ClientToScreen(aPoint)
werden die Button-relativen Koordinaten in Bildschirmkoordinaten umgerechnet. Die Left- und Top-Werte des Buttons beziehen sich aber auf das übergeordnete Control. Deswegen gehören die hier nicht rein.
|