Предотвратить появление Popup меню

← →
kyn66 © (2005-12-27 18:35) [0]

Как САБЖ при правом клике по элементу, в частности интересует ListView. Точнее не показывать при определенных только условиях.

← →
Leonid Troyanovsky © (2005-12-27 18:54) [1]

> kyn66 © (27.12.05 18:35)
> Как САБЖ при правом клике по элементу, в частности интересует
> ListView. Точнее не показывать при определенных только условиях.

procedure TForm1.PopupMenu1Popup(Sender: TObject); // OnPopup begin with Sender as TPopupMenu do begin if {определенное условие} then Abort; end; end;

--
Regards, LVT.

← →
begin...end © (2005-12-27 19:15) [2]

В обработчике OnContextPopup:

Handled := <условие_НЕпоказывания>

← →
kyn66 © (2005-12-28 09:28) [3]

>> В обработчике OnContextPopup:

А что-то я не обозрел такого события..

← →
begin...end © (2005-12-28 11:26) [4]

> kyn66 © (28.12.05 09:28) [3]

А оно есть -- у TControl и у любого его потомка. Значит, и у TListView тоже есть.

← →
kyn66 © (2005-12-28 15:23) [5]

> begin...end
Пардонс, не усмотрел..с.

когда не надо

ListView.PopupMenu := nil;

когда надо

ListView.PopupMenu := lvPopup;

← →
ASoft (2005-12-29 09:27) [7]

имхо, не правильно, думаю, НЕ показывать PopupMenu когда не надо. Чтоб не сбивать с толку юзеров, правильней показывать PopupMenu, но с неактивными его строками.

Предотвратить появление Popup меню Найти похожие ветки