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

← →
Ярослав (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]

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

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;

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