Скачать: CL | DM;

PopUp Menu,   Найти похожие ветки 

← →
Igor Kashtanov   (2003-03-07 01:45) [0]

Всем привет еще раз!
PopUp Menu появляется по нажатию функциональной клавиши. При этом курсором не выделяется ни один пункт меню. Каким образом активизировать курсор на первом элементе меню?

---

← →
Вопрошающий   (2003-03-07 05:02) [1]

SetCursorPos

---

← →
Igor Kashtanov   (2003-03-07 08:40) [2]

Может я неправильно выразился. Не стрелочный курсор, а именно синюю полосу на менюшке.Именно она нужна на первом элементе меню.

---

← →
xception   (2003-03-07 16:51) [3]

procedure TMainForm.Timer1Timer(Sender: TObject);
var P: TPoint;
begin
P := Point(200,200);
SetCursorPos(P.X + 10, P.Y + 5);
PopupMenu1.Popup(P.X, P.Y);
Timer1.Enabled := False;
end;

---

← →
Diamond Cat ©   (2003-03-07 17:11) [4]

через sendmessage(..., WM_DRAWITEM

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.013 c