![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
DBgrid [D6]
Roman9 © (2005-08-18 18:13:00)мастера подскажите
dbrgid не срабатывает событие keypress
key=#29 т.е на клавиши верх и вниз
у меня должна появляться сообщение
syte_ser78 (2005-08-19 08:56:00) [1]56(72) : showmessage('Up');
50(80) : showmessage('Down');
52(75) : showmessage('Right');
54(77) : showmessage('Left');
KilkennyCat (2005-08-18 18:34:00) [2]
procedure TForm1.DBGrid1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
case key of
38 : showmessage('Up');
40 : showmessage('Down');
39 : showmessage('Right');
37 : showmessage('Left');
end;
end;
KilkennyCat (2005-08-18 18:28:00) [3]Удалено модератором