如何在stringgrid中将新添加的一行为选中状态，是stringgrid,(10分)

stringgrid1.Cells[0,count] :=FromIP;
stringgrid1.Cells[1,count] :=inttostr(1);;
stringgrid1.Cells[2,count] :=inttostr(2);
stringgrid1.Cells[3,count] :=inttostr(3);
stringgrid1.Cells[4,count] :='hello';
stringgrid1.Cells[5,count] :=formatdatetime('YYYY-MM-DD hh:mm:ss',now);
stringgrid1.Cells[7,count] :=inttostr(CheckCode) ;
stringgrid1.RowCount:=stringgrid1.RowCount+1;
with stringgrid1 do begin
row:=rowcount-2;
col:=0;
end;
如何是row=rowcount-2这一行选中！？