![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Господа, подскажите как запретить Ctrl + Del в DBGrid е ? [D6, IB6.x]
Vodochnik © (2002-09-21 16:27:00)Ваще убрать энту комбинацию клавиш..
Заранее благодарен..
Zz_ (2002-09-21 16:58:00) [1]Угу. Сто лет уже работает
KDS (2002-09-21 16:40:00) [2]>Zz_
А что делать с отпусканием клавиш?
TfPrix.DBGrid2 KeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
Delphi точно по нажатию вызывает удаление?
KDS (2002-09-21 16:34:00) [3]Если набор данных только для просмотра, где править и удалять записи не зя, то установи свойство DBGrid.ReadOnly:=True
Zz_ (2002-09-21 16:33:00) [4]procedure TfPrix.DBGrid2KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
if((Key=VK_Delete)and(Shift=[ssCtrl]))then Key := 0;
if((Key=VK_Delete)and(Shift=[ssCtrl,ssShift]))then Key := 0;
if((Key=VK_Insert)and(Shift=[ssCtrl]))then Key := 0;
if((Key=VK_Insert)and(Shift=[ssCtrl,ssShift]))then Key := 0;