| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Косяк в ЛистВью!!!Плиз хелп!!!
Ярослав © (2004-07-05 10:32:00)Зравствуйте!
Как можно сделать что бы при правом клике на иконку в ListView выпадал popup а при клике по свободному полю ListView или не выпадал или выпадал другой popup?
Семен Сорокин (2004-07-05 12:21:00) [1]
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;
Ярослав (2004-07-05 12:07:00) [2]Здравствуйте!
Опишите пожалуйста поподробней
Заранее спасибо!
Семен Сорокин (2004-07-05 10:42:00) [3]1. OnMouseDown
2. ListView1.GetItemAt()
3. PopupMenu1.Popup
officeman (2004-07-05 10:36:00) [4]=) работай с событиями ListView1. меняй popup'ы
| |
