~~~~~~~~~~
procedure Form1.DBGrid1KeyDown
(Sender: TObject; var Key: Word; Shift:TShiftState) ;
begin
if (Shift = [ssCtrl]) and (Key = VK_DELETE) then
Key := 0; {ignore}
end;
~~~~~~~~~~
Delphi tips navigator:
» Extract Icon and paint on Form
« How to convert an icon to a bitmap image

