quarta-feira, 7 de outubro de 2009

Após setar o comando post em tabelas paradox seus dados ainda estão vulneráveis

{Após setar o comando Post em tabelas Paradox seus dados ainda estão vulneráveis caso haja uma queda de energia ou falha no computador... eles serão perdidos!

Esta rotina resolve este problema!

Para que um registro seja inserido num banco de dados paradox basta chamar o comando:}

Table.post;

{Porém usuários mais experientes sabem que isso não é suficiente para q os dados sejam completamente gravados no banco de dados é necessário chamar o COMMIT que inclue uma rotina que funciona porém envolve muito trabalho.

Uma solução para este problema é usar a API dbiSaveChanges ou o dbiUseIdleTime da seguite maneira.:}

procedure TForm1.Table1AfterPost(DataSet: TDataSet);
begin
DbiSaveChanges(Table1.handle);
end;
Isto irá salvar os dados na table definitivamente ou usar o seguinte:
procedure TForm1.FormCreate(Sender: TObject);
begin
Application.onIdle := UseIdle;
end;
procedure Tform1.UseIdle(Sender: TObject; var Done: Boolean);
begin
DbiUseIdleTime;
end;
//Para que o todos os bancos sejam salvos no momento em que o aplicativo pare de processar mensagens!

{By
Nativo_Gyn
ufgnet@pop.com.br}

Nenhum comentário:

Postar um comentário