Put code snippet bellow on the OnKeyDown event of the DBGrid.

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