[NumLock]

Код:

  StringGrid1.Objects[0, 0]:=Pointer(29);
  StringGrid1.Objects[1, 1]:=Pointer(1);
  StringGrid1.Objects[2, 2]:=Pointer(2013);
  ShowMessage(IntToStr(Integer(StringGrid1.Objects[0, 0])));
  ShowMessage(IntToStr(Integer(StringGrid1.Objects[1, 1])));
  ShowMessage(IntToStr(Integer(StringGrid1.Objects[2, 2])));