Ver Mensaje Individual
  #9  
Antiguo 18-01-2021
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.289
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Cita:
Empezado por pablocarlos Ver Mensaje
Gracias Casimiro por tu tiempo. Este es el código pero el "update" no me lo reconoce rad studio, si en delphi 7
Tu código es correcto, simplemente hay un par de detalles.

1) Lo primero es que no hace falta hacer un Update de los controles/componentes; En el caso de un Label, por ejemplo, sólo cambiando la propiedad Text (o Caption en VCL) basta para cambiar el valor. Por tanto las líneas que hacen el Update no son necesarias.

2) Si quitas esas líneas, verás que tu aplicación no responde y el TLabel no cambia. Eso lleva al segundo punto.
Tu código se ejecuta continuamente y no da tiempo a procesar mensajes de la cola de Windows, entre ellos los que actualizan la parte visual.
Para eso delphi tiene una instrucción.

Código Delphi [-]
Application.ProcessMessages;

Esto le indica al programa que en ese punto, detenga la ejecución y procese mensajes de la cola de Windows.
Se suele usar en códigos como el tuyo, donde hay un bucle que ejecuta código continuamente.

Por lo tanto, si quitas las las líneas que incluyen los Updatesy añades la línea anterior debajo del Sleep, por ejemplo, el programa debería funcionar correctamente.
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita