Ok, muchas gracias nuevamente Marcos.
Lamento realmente molestar tanto, pero al reindexar los archivos me arrojo el siguiente error: "Table is busy".
El codigo utilizado es el siguiente:
Código:
Table1.Close;
Table1.Exclusive:= True;
Table1.Open;
fDbiRegenIndexes(Table1);
Table1.Close;
Table1.Exclusive:= False;
Y el codigo de la función es:
Código:
procedure TfrmEmiteInforme.fDbiRegenIndexes(TblName: TTable);
begin
Check(DbiRegenIndexes(TblName.Handle));
end;
{la misma del ejemplo, je, je, je}
Gracias.