在sstringGrid控件中;
 for i:=1 to StringGrid1.RowCount - 1 do
  begin
     ADOQuery1.Close;
     ADOQuery1.SQL.Clear;
     ADOQuery1.SQL.Add('select * from consumelist');
     ADOQuery1.Open;    ADOQuery1.Prepared:=true;
    ADOQuery1.Insert;
    ADOQuery1.FieldByName('bill_no').AsString:=test_bill_no;
    ADOQuery1.FieldByName('name').AsString:=StringGrid1.Cells[0,1];
    ADOQuery1.FieldByName('number').AsString:=stringGrid1.Cells[1,1];
                          
   ADOQuery1.Post;       ADOQuery1.Prepared:=false;
为什么老是循环保存 的第一条呀/