StringGrid赋值问题(100)

我从数据库里提取数据后,在StringGrid里全部显示.当选中StringGrid1里的数据进行编辑并赋值给变量时,而StringGrid1只是对前几个发生编辑事件,赋值成功.而最后一个发生编辑事件,数据值不变.不知是什么原因?procedure Tnew.StringGrid1SelectCell(Sender: TObject; ACol, ARow: Integer; var CanSelect: Boolean);var sg:TStringGrid;i:integer;oldRow:integer;sfile1,sfile2,sfile3,sfile4,sfile5:string;beginif ARow=oldRow then exit;sg:=TStringGrid(Sender);for i:=0 to StringGrid1.RowCount-1 do // colCount begin // +1gStr := 'SELECT DISTINCT a,b FROM c where a='''+StringGrid1.cells[0,i+1]+''' order by b asc'; SQL_Change(MainModule.aqryTemp, gStr);if MainModule.aqryTemp.Fields[1].AsString='1' thensfile1:=StringGrid1.cells[1,i+1] // +1else if MainModule.aqryTemp.Fields[1].AsString='2' thensfile2:=StringGrid1.cells[1,i+1]else if MainModule.aqryTemp.Fields[1].AsString='3' thensfile3:=StringGrid1.cells[1,i+1]else if MainModule.aqryTemp.Fields[1].AsString='4' thensfile4:=StringGrid1.cells[1,i+1]else if MainModule.aqryTemp.Fields[1].AsString='5' thensfile5:=StringGrid1.cells[1,i+1]end;oldRow:=ARow;end;

是不是最后输入值未刷新？

to Texense因为我输入最后的值时,已经点击格子的其他地方,但它默认最后的一次点击前一个值.

结了