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

Косяк в ЛистВью!!!Плиз хелп!!!   Найти похожие ветки 

← →
Ярослав   (2004-07-05 10:32) [0]

Зравствуйте!
Как можно сделать что бы при правом клике на иконку в ListView выпадал popup а при клике по свободному полю ListView или не выпадал или выпадал другой popup?

---

← →
officeman   (2004-07-05 10:36) [1]

=) работай с событиями ListView1. меняй popup"ы

---

← →
Семен Сорокин ©   (2004-07-05 10:42) [2]

1. OnMouseDown
2. ListView1.GetItemAt()
3. PopupMenu1.Popup

---

← →
Ярослав   (2004-07-05 12:07) [3]

Здравствуйте!
Опишите пожалуйста поподробней
Заранее спасибо!

---

← →
Семен Сорокин ©   (2004-07-05 12:21) [4]

procedure TForm1.ListView1MouseDown(Sender: TObject;
 Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
if (Button = mbRight) and (Shift = [ssRight]) and
   Assigned(ListView1.GetItemAt(X, Y)) then
  PopupMenu1.Popup(ListView1.ClientOrigin.X + X, ListView1.ClientOrigin.Y + Y)
end;

---

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

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



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