Обработка двойного щелчка в ячейке DBGrid
Для этого необходимо объявить новый класс:
1 2 3 4 5 |
THackGrid = class(TDBGrid) public property Col; property Row; end; |
В обработчике событий OnDblClick компонента DBGrid запишем следующее:
1 2 3 4 5 6 7 8 9 10 11 |
procedure TForm1.DBGrid1DblClick(Sender: TObject); begin if (THackGrid(DBGrid1).Col=2) and (THackGrid(DBGrid1).Row=2) then begin // действие end; end; |
При двойном щелчке по DBGrid определяем по какой ячейке щелкнули. В нашем примере проверяется ячейка (2,2).