ClientDataSet不能保存数据?

ynduanlian 2003-05-14 06:06:34
我用下面的代码保存一条纪录,程序没有任何地方报错,却实际上总是没有存进入文件中,请问为何?

ClientDataSet1.Append;
ClientDataSet1.FieldValues['ID']:=ListBox1.ItemIndex;
ClientDataSet1.FieldValues['Title']:=Edit1.Text;
ClientDataSet1.FieldValues['Content']:=Memo1.Text;
ClientDataSet1.Post;
//---------------------------
IsEdit:=False;
ClientDataSet1.SaveToFile('QuickFill.Dat');
...全文
45 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
ynduanlian 2003-05-15
  • 打赏
  • 举报
回复
文件放在EXE同一目录下。

我用下面的代码去读上面所写代码存入纪录,结果是没有任何纪录。
Path:=ExtractFilePath(Application.ExeName);
ClientDataSet1.FileName:=Path+'QuickFill.Dat';
ClientDataSet1.Open();
ClientDataSet1.First;
While not ClientDataSet1.Eof do
begin
ListBox1.Items.Add(ClientDataSet1.FieldByName('Title').AsString);
ClientDataSet1.Next;
end;
ynduanlian 2003-05-15
  • 打赏
  • 举报
回复
明白了,保存是成功的:
但每次执行下面时它又创建一新文件:
ClientDataSet1.FileName:=Path+'QuickFill.Dat';
ClientDataSet1.Open();
feng93017 2003-05-14
  • 打赏
  • 举报
回复
检查你的文件路径。

2,498

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧