Barra de Avance de Proceso

[Jucho69]

Hola..

Yo utilizo algo así

var cant,i:=integer
begin
cant:=(cantidad de querys o cosas);
ProgressBar1.Min:=0;
ProgressBar1.Max:=can;
ProgressBar1.position:=0;
for i:=0 to can do
begin
ProgressBar1.position:=i;
.....
.....(contenido)
.....
end;

Saludos