禁止在DBGrid中按delete删除记录

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

【推广】 免费学中医，健康全家人
原文地址：https://www.cnblogs.com/jijm123/p/11008315.html