ADO的LoadFormFile如何使用 (200分)

  • 主题发起人 主题发起人 fanhongwei
  • 开始时间 开始时间
我在生成文件的时候,已经将记录删除了。
现在就是要将保存在本地的记录重新写到数据库中。本地的保存方式是使用文件pfADTG.
请给出使用ADO实现此功能的源代码。
 
你只要在我上述代码中的Adoquery1.append这一句之前加上用ADOQuery1打开表的代码就
行了啊。 如果原先就是已打开的,那就更省事了。
 
直接调就可以了。
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
with adoquery1 do
begin
ConnectionString:=getVFConnStr('d:/tree');
SQL.Add('select * from gypcbz');
open;
end;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
adoquery1.SaveToFile('d:/aaa.txt');
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
adoquery1.close;
adoquery1.LoadFromFile('d:/aaa.txt');
end;
 
另一个 query 什么也不要设,直接调:

procedure TForm1.Button3Click(Sender: TObject);
begin
adoquery2.close;
adoquery2.LoadFromFile('d:/aaa.txt');
end;
 
谢谢大家的帮助!
 
多人接受答案了。
 
后退
顶部