DBGrid

← →
Sergey-ZZZ © (2002-08-12 15:17) [0]

Как сделать чтобы по нажатию правой кнопкой на определенной колонке DBGrid выскакивало определенное PopUpMenu

← →
Mike Kouzmine (2002-08-12 15:18) [1]

Присвой свойству popmenu свое popmenu

← →
SaS13 © (2002-08-12 15:23) [2]

обрабатывай нажатие кнопки, выясняй номер колонки и запускай:
PopupMenu1.Popup

← →
Sergey-ZZZ © (2002-08-12 15:36) [3]

Вопрос для SaS13 если можно код

← →
SaS13 © (2002-08-12 15:49) [4]

чё-нить типа этого:
procedure TfmMain.DBGrid1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); var _i : integer; _sum : integer; _col : integer; begin if Button = mbRight then with DBGrid1 do begin _sum := 0; _col := -1; for _i := 0 to Columns.Count - 1 do begin _sum := _sum + Columns[_i].Width; if X < sum then begin _col := _i; Break end end; {Проверяешь колонку} if _col = 3 then PopupMenu1.Popup end end;

← →
SaS13 © (2002-08-12 15:54) [5]

поправка:
PopupMenu1.Popup(X, Y);
могут быть еще ошибки посмотри, я не проверял.

Для SaS13- спасибо. Я эту задачу делал год назад, но после этого у меня грохнулся винт - все потерял. Кажется я делал нет так, но все равно спасибо, подумаю.

← →
Mike Kouzmine (2002-08-12 16:42) [7]

А что, стандартные вещи уже не катят? DBGrid1.Columns[X].PopupMenu?

Mike Kouzmine (12.08.02 16:42)
точно =)) есть такое дело, просто не использовал, а проверить не удосужился

DBGrid Найти похожие ветки