我目前正在学习在delphi 7中使用一个悖论数据库,除记录外,一切都进行得很好。当我重新启动程序时,记录在那里,但是如果关闭delphi,它们将消失。我想念什么吗?
使用仅具有自动递增字段的简单表进行测试。
procedure TForm1.FormActivate(Sender: TObject);
begin
Table1.DatabaseName := 'STANDARD1';
Table1.TableName := 'TEST.DB';
DataSource1.DataSet := Table1;
dbGrid.DataSource := DataSource1;
Table1.Open;
end;
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
Table1.Append ; //
Table1.Post;
end;
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Table1.Close;
end;