大虾帮帮忙

Question

如果我把b 库的记录删了，同时又想把这条记录复制到a库了，怎么实现？
谢谢

Answer 1

究竟是A表,B表还是A库,B库?究竟是先复制后删除还是?

Answer 2

procedure TForm1.Button1Click(Sender: TObject);
var i:integer;begin
i:=table1.FieldCount;
table2.Fields[0].AsString:=table1.Fields[0].AsString;
..
table2.fields[i].asstring:=table2.Fields[i].AsString;
end;procedure TForm1.Button2Click(Sender: TObject);
begin
table2.Delete;
end;
一个简单的例子.建议你去看DEMO上的东西.会有收获的.

Answer 3

table2.fields[i-1].asstring:=table2.Fields[i-1].AsString;

Answer 4

begin
if table2.RecordCount>0 then
table2.Delete
else exception.Create('you have no record to delete!');
end;

Answer 5

学多了foxpro 把表喜欢讲成库，要改哦，