这句代码写法有错吗?

Question

 for a:=1 to stringgrid1.RowCount -1 do ;
     begin
      ADOQuery2.Close;
      ADOQuery2.SQL.Clear;
      ADOQuery2.SQL.Text:='insert into smxdl(编号,编码,名称,规格,单位,单价,数量,金额,性质) '+
                          'values('''+GroupBox4.Caption +''','''+StringGrid1.Cells[1,a]+''','+
                          ''''+StringGrid1.Cells[2,a]+''','''+StringGrid1.Cells[3,a]+''','+
                          ''''+StringGrid1.Cells[4,a]+''','''+StringGrid1.Cells[5,a]+''','+
                          ''''+StringGrid1.Cells[6,a]+''','''+StringGrid1.Cells[7,a]+''','+
                          ''''+StringGrid1.Cells[8,a]+''')';
      ADOQuery2.ExecSQL;
     end;老是提醒[警告] Unit18.pas(738): FOR-Loop variable 'a' may be undefined after loop怎么解决?

Answer 1

这个没有什么问题啊
只是警告
程序Is OK