Траблы с PopUpMenu

← →
BelT (2004-07-23 01:19) [0]

Здравствуйте!
Помогите разобраться с незадачей...
Вызываю PopUpMenu на PaintBox"e как:
x:=mouse.X;
y:=mouse.Y;
if mouse.Button = mbRight then
Popupmenu1.Popup(x,y);

по TForm1.PaintBox1MouseDown()
а оно выскакивает совсем не там, куда я МаусДаун :(
Правда после двойного щелчка правой кнопкой оно выскаивает там где надо.
Заранее спасибо!

← →
BelT (2004-07-23 12:07) [1]

Интересно...в ХР оно после двойного щелчка выскакивает там, где надо, а в МЕ такого нет...
И еще такая фигня:
я щелкая пр.кнопкой, оно выскакивает и висит. Пока оно висит я щелкаю правой кнопкой в другом месте, а оно где висело, там и висит....

← →
BelT (2004-07-23 12:12) [2]

Пардон, невнимательно смотрел форум....
а где надо указывать
Result.PopupMenu1.Flags := TPM_RIGHTBUTTON;

← →
BelT (2004-07-23 12:13) [3]

В OnPopup...как я отупел

Траблы с PopUpMenu Найти похожие ветки