Código
Para encontrá-lo: Renet Tecnologia Ltda. - (011) 872.0423 e-mail: renet@embratel.net.br.
Outra solução é, antes de tudo, mudar o Driver de indexacao do Clipper para NDX (padrao DBASE). Nao podemos em Clipper abrir um .DBF com NTX, ao mesmo tempo em que uma aplicacao Delphi abre o mesmo .DBF com NDX.
Gravação Física dos Registros (Post físico)
A função dbiSaveChanges, colocada no método AfterPost da tabela, faz com que o Delphi descarregue as inclusões e alterações da base de dados para o winchester. Não esqueça de colocar a Unit BDE na seção USES.
Sintaxe : dbiSaveChanges(Table1.Handle);
Reindexando arquivos
Procedure TblReindex;
begin
DbiRegeIndexes(Table1.Handle);
DbiRegeIndexes(Table2.Handle);
DbiRegeIndexes(Table3.Handle);
end;
Será reindexado todos os indices de cada tabela. Não esqueça de colocar a Unit BDE na seção USES.
Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009