TForm1.StringGrid1SelectCell(TObject,0,0,true);
???