Hallo!
hm shmia lösung funktioniert bei mir gut, jedoch will ich eine genaue position des Popups haben.
Code:
procedure TForm1.SpeedButton1Click(Sender: TObject);
var
pt: TPoint;
begin
pt.x := SpeedButton1.BoundsRect.Left;
pt.y := SpeedButton1.BoundsRect.Bottom;
pt := ClientToScreen(pt);
PopupMenu1.Popup(pt.x, pt.y);
end;
Weis wer, was da die positionsangabe ist oder wie man die festlegen kann?
Alexander K.
chris : leben ist leben lassen....wunder dich also nicht über die schaben & spinnen in meiner küche!