¿Cómo evito que un programa hecho en delphi deje de responder?
Hola amigos foristas, aquí estoy de nuevo con otra duda
Tengo un programa hecho en delphi que requiere realizar un proceso mediante un while que puede durar mininitos, horas e incluso días de pendiendo de los datos. Esto responde a un algoritmo genéticos para realizar clasificación de datos de tablas muy grandes (lo cual no viene al caso).
Resulta que me a interesado ir viendo resultados parciales durante el proceso, para lo cual utilicé la instrucción refresh. El problema, es que en tablas suficientemente grandes, en donde el proceso puede durar más dos unos minutos, el programa dice (No Responde) por lo que me deja de mostrar los resultados parciales.
Además me gustaría poder tener acceso a otro evento, por ejemplo poner un botón cancelar para poder parar el proceso en cualquier momento y recuperar los resultados que el programa tiene hasta este momento.
En Visual Basic 6.0 la instrucción que se utilizaría es DoEvents pero no he encontrado el equivalente en Delphi 7.
Muchas gracias por su preciado tiempo.
|