Optimizacion de Tiempo

[jachguate]

Sobre tu problema... 100,000 registros debieran procesarse en cuestión de minutos. Para detectar cual es el cuello de botella, cronómetro en mano, revisá cuanto tiempo está tomando cada parte del proceso: Suponiendo que el comportamiento es líneal, está tomando mas o menos 0.5 segundos por registro.

digamos que el código:

Código Delphi [-]
while not finarchivo do
begin
  LeeLinea;
  InsertaRegistro;
end;

podemos cambiarlo por:

Código Delphi [-]
var
  t1, t2, t3 : TDateTime;
while not finarchivo do
begin
  t1 := now;
  LeeLinea;
  t2 := now;
  InsertaRegistro;
  t3 := now;
  memo1.lines.add(
    'tiempo lectura: %d ms.'#9 
    'tiempo insercion: %d', [
      trunc((t2 - t1) * 1000),
      trunc((t3 - t2) * 1000)]);
end;

Eso nos dará una idea de que está tardando. Estoy convencido que en tu caso, es la búsqueda del registro la que demora mucho tiempo... quizas el query (qparte) sea ineficiente.

Hasta luego.

[Luis Alberto]

Gracias por todos sus comentarios la verdad no he entrado mucho a los foros yu no entiendo mucho como se an podido dar cuenta....

[jachguate]

Empezado por Luis Alberto

no entiendo mucho como se an podido dar cuenta....

¿cómo nos hemos podido dar cuenta de que?

[Luis Alberto]

Que casi no entroa foros y no se si hago las cosas bien en los foros...

[vtdeleon]

Saludos

Empezado por Luis Alberto

Que casi no entroa foros y no se si hago las cosas bien en los foros...

Entendido, por eso es que casi siempre hacemos énfasis en lean esto:
(Not) Guía de Estilo, Etiquetas vB:=Delphi-SQL

[Casimiro Noteví]

La "cara" de vtdeleon lo expresa todo... , en fin, eso, la guía de estilo...