Repetir una secuencia de comandos sin paralizar la actualización visual!!!

DarkByte · #1 22-12-2003

Hola!!, estoy haciendo un programa que tiene que cerrar un programa si lo encuentra abierto. Para ello utilizo el truco 290 de trucomanía y, en el evento OnActivate del form he puesto

var
CondicionNula : Boolean;
begin
CondicionNula := False;
Repeat
CierraExe ('Programa.exe');
Until
CondicionNula = True;

Y me funciona, pero me detiene la actualización gráfica del form, Me gustaría saber si hay algún método de hacer lo que pretendo y que permita que todo siga "rulando" sin problemas. He oido hablar de los bucles, pero no se muy bien qué son ni como funcionan.

Gracias por adelantado, espero vuestra ayuda

delphi.com.ar · #2 22-12-2003

Utiliza un Application.ProcessMessages para cada iteración del bucle.

Saludos!

DarkByte · #3 22-12-2003

Gracias delphi.com.ar, pero el problema es que ni siquiera se lo que es un bucle de ejecución

, he oido hablar de ellos, pero yo siempre he usado el repeat->until. ¿Qué tengo que hacer con el Application.ProcessMessages?, ponerlo en el repeat??

Disculpe mi ignorancia.

delphi.com.ar · #4 22-12-2003

Eso, ponelo dentro del repeat..until.

Código:

var
Repeat
  CierraExe ('Programa.exe');
  Application.ProcessMessages;
Until ...

Saludos!

DarkByte · #5 22-12-2003

Funciona!!, muchas gracias!!. Va perfectamente, gracias por la rapidez de la respuesta y felíz navidad!!

DarkByte · #6 22-12-2003

Una última pregunta... ¿qué hace exactamente el process messages?

delphi.com.ar · #7 22-12-2003

Ejecuta todos los eventos de la aplicación que estan en cola, entre ellos los que dibujan las ventanas.

Saludos!

DarkByte · #8 22-12-2003

Muchas gracias, ya se algo más.