Buscar por:

Evitando a perca dos dados

Código

{Um dos problemas dos programadores Delphi é salvar as informações fisicamente no disco rígido. Quando estamos trabalhando com o programa as informações ficam retidas no buffer, o que, em caso de queda de energia ou até mesmo se o usuário fechar o Windows com a aplicação aberta resulta na perda dos dados, que foram processados na execução atual do sistema. Para resolver o problema, basta acrescentar no evento AfterPost de cada componente Table as linhas de código que estão abaixo.

Na lista de Uses acrescente a unit DBIProcs.

Dessa forma, você não precisa temer perder os seus dados por uma falha elétrica ou pela quebra do sistema (como um erro GPF, por exemplo), após atualizar o banco de dados.}

  implementation 

  uses DBIProcs; 

  {$R *.DFM} 

  procedure TForm1.Table1AfterPost(DataSet: Dataset); 

  begin 

  DBISaveChanges(Table1.Handle); 

  end; 

  end;