PDA

Ver la Versión Completa : Pregunta de novato


Agonar
25-01-2007, 18:43:30
Buenas tardes, ante todo mil gracias por seguir aquí, después de tantos años...

Hace muchos años cuando hice informática en FP :rolleyes: me enseñaron delphi 3 ufff. Bueno me he puesto a programar un poco después de tanto y ....

A lo que voy necesito algo tan facil como que en el caption de una label aparezca el valor de la variable de un bucle.



for i := 1 to 10 do
begin
sleep(1000);
label1.caption := inttostr (i);
end;



bueno esto es lo que tengo pero no se muestra nada hasta que pasan los 10 segundos que en la etiqueta aparece 10.(pero nada del 1,2,3,4,5...)

(Este no es el programa que quiero hacer pero de momento con resolver esto me sería de gran ayuda, lo que quiero es un contador de tiempo que salga con la forma ##:## que serian minutos y segundos. Tengo el programa hecho :confused: pero claro no me muestra nada hasta el final 00:00)

Espero vuestra ayuda como siempre y muchas gracias.

gluglu
25-01-2007, 18:50:05
Tienes que incluir en el bucle :
Application.ProcessMessages;

a fin de que procese el caption y lo muestre en pantalla.

Agonar
25-01-2007, 19:12:25
Muchas gracias, rapidez ante todo. Ya voy recordando cosillas :o bueno, a segui aprendiendo, que aún me queda :)

kalisto
25-01-2007, 20:35:54
para lo que quieres lo mejor es utilizar un Ttimer y en el evento interval actualizar el contador.