[NumLock]

Код:

var
  SaveNotifyEvent: TNotifyEvent;
begin
  SaveNotifyEvent:=StringGrid1.OnClick;
  StringGrid1.OnClick:=nil;
  StringGrid1.Row:=StringGrid1.Row-1;
  StringGrid1.OnClick:=SaveNotifyEvent;
end;