case i of
   1:Edit1.text:=stringgrid1.Cells[1,r];
     Edit2.text:....
     ......
     ......
如何写后面可以跟多条语句....对于case的结构不清楚.