关于StringGrid的一点点小问题

Question

我在窗体中放了一个stringGrid，当我在其中输入内容时，比如说输了三行，现在我把第一行和第二行删除了，第三没有删除，我想让第三行跳到第一行，我应该怎么办？谢谢各位！！！！

Answer 1

with stringgrid1 do
begin
 if rowcount>2 then
 begin
   for i:= 0 to colcount-1 do
     for j:= row+1 to rowcount-1 do
   begin
     cells[i,j-1]:=cells[i,j];
     rowcount:=rowcount-1;
 end else
   for i:= 0 to colcount-1 do
   begin
    cells[i,1]:='';
   end;
end;

Answer 2

谢谢 zhlwyy(海龙-->有志者事竟成！) ，给分