problema con Filter en paradox

[seken]

marcoszorrilla....
sobre los indices es un tema importante que no se si estoy trabajando bien.

Yo la tablas las creo en el Database Desktop y le defino los indices. El sistema me crea los archivos base.db, base.px y los indices indice.xg0, indices.yg0 ... indice.xgn, indices.ygn.

La duda mia es que muchas veces me da el error "'index out of date" por roturas de indices, ¿¿¿ como haga para solucionar esto??? hay algun proceso que me restablesca los indices si estos estan rotos??
una respuesta que me habian dado era hacer esto

with table1.Create(nil) do
try
TableName := 'codigos.db';
Exclusive := True;
Open;
Check(DbiRegenIndexes(Handle)); //*
finally
Free;
end;

pero me funciono muy pocas veces.
Tengo entendido que Paradox tiene estos problemas de rotura de indices, Interbase es mas seguro?????
Muchas Gracias
SEKEN

[marcoszorrilla]

Esa respuesta que citas, solamente servirá si el índice únicamente está desactualizado, pero no si verdaderamente está roto, en las páginas del Club tienes una utilidad entre otras que se llama Caerques

Yo suelo crear con ella un programa de reconstrucción de índices, si hay algún problema se ejecuta este programa y se reparan los índices.

La manera de proceder, es ejecutar este programa cuando tenemos la aplicación terminada y todos los índices funcionando sin ningún problema, luego con el módulo creado te construyes una miniaplicación para generar los índices en caso de que fuera necesario.

Si las tablas están dañadas y no hay manera hay una utilidad entre otras también que se llama Sysutils, que repara también este tipo de problemas.

Por supuesto que tanto Interbase, como Firebird son más seguros en este sentido.

Un Saludo.

[seken]

la aplicacion sysutil la tengo y me funciona Ok
el problema es que tengo un sistema que estoy distribuyendo y si le pasa un error de indices tengo que darles una herraminta (una pequeño exe, como el que aconsejas) que le solucione el problema.

gracias

[marcoszorrilla]

Pues entonces no dudes en bajarte lo que te recomiendo de las páginas del Club.

Código Delphi [-]
procedure TfrIndices.SpeedButton1Click(Sender: TObject);
begin
Empaqueta('DIP');
hazindices('DIP');
end;

Un ejemplo simple de llamada.


Un Saludo.

[seken]

marcos
estuve mirando y esta muy buena la herramienta, voy a ponerla en uso pronto.

Muchas gracias

SEKEN