我用下面的代码保存一条纪录,程序没有任何地方报错,却实际上总是没有存进入文件中,请问为何? 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');
ClientDataSet1.FieldValues['ID']:=ListBox1.ItemIndex;
ClientDataSet1.FieldValues['Title']:=Edit1.Text;
ClientDataSet1.FieldValues['Content']:=Memo1.Text;
ClientDataSet1.Post;
//---------------------------
IsEdit:=False;
ClientDataSet1.SaveToFile('QuickFill.Dat');
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;
但每次执行下面时它又创建一新文件:
ClientDataSet1.FileName:=Path+'QuickFill.Dat';
ClientDataSet1.Open();