Delphi - база знаний

       

Как защитить запись в DBGrid от удаления?


Как защитить запись в DBGrid от удаления?



Поместите следующий код в событие OnKeyDown в DBGrid.

procedure TForm1.DBGrid1KeyDown(Sender: TObject; var Key: Word; 
  Shift: TShiftState); 
begin 
  if (ssctrl in shift) and (key=vk_delete) then key:=0; 
end;

Взято с Исходников.ru



Содержание раздела