table1.Append;
table1.FieldByName('次序').AsString:='*';
Table1.FieldByName('产品编号').Value :=Table2.FieldByName('产品编号').Value;
Table1.Post;
table1.FieldByName('次序').AsString:='*';
Table1.FieldByName('产品编号').Value :=Table2.FieldByName('产品编号').Value;
Table1.Post;
table1.FieldByName('次序').AsString:='*';
Table1.FieldByName('产品编号').Value :=Table2.FieldByName('产品编号').Value;
Table1.Post;
table1.FieldByName('次序').AsString:='*';
table1.Post;
table1.close;
table1.open;
Table1.Edit;
Table1.FieldByName('产品编号').Value :=Table2.FieldByName('产品编号').Value;
Table1.Post;
如果是就要在append .. post之后在table1.refresh.