Cita:
Empezado por pepecharlie67
¿Donde lo pongo?Gracias
|
Bueno si es que está dentro de un ciclo while, entonces el application.ProcessMessages ponlo antes de entrar al while.
Bueno según me acuerdo hace no poco utilicé el tprogressbar y un label para mostrar cierta información conforme iba avanzando la barra de progreso pero ni con el application.ProcessMessages me mostraba el label, así lo que hice fue poner después de asignar la cadena al label(etiqueta), un refresh.
Un ejemplo sencillo:
Código:
ProgressBar1.Position=0;
ProgressBar1.Step=1;
while ProgressBar1.Position<>100 do
begin
ProgressBar1.StepIt;
label1.Caption:='Porcentaje '+IntToStr(ProgressBar1.Position)+'%';
label1.Refresh; //llama al método repaint y es lo que necesitas
sleep(50); //esto lo he puesto para que se vea bien el avance sino lo hace rápido
end;
Espero te sirva
Saludos.