Author: Kevin Howell

How do I prevent the BDE from loosing information in an application when the PC 
locks up. 

Answer:

Solve 1:

Use the BDE API call DBISavechanges(handle). This will save all data in buffers 
directly to the database thus preventing a loss of data should anything go wrong in 
the current database session. 

Example 

Add BDE to the forms uses clause 

1   procedure TDataform.qryEmployeeAfterPost(DataSet: TDataSet);
2   begin
3     DBISavechanges(qryEmployee.handle);
4   end;



Solve 2:

5   unit bdeCommands;
6   {..
7   ...
8   ..
9   ...}
10  uses BDE;
11  {...
12  ... }
13  
14  function SaveBufferToFile(Dataset: TDataset): Boolean;
15  begin
16    Result := BDESaveChanges(Dataset);
17  end;