Delphi - Loop como salgo??

tengo un problema

dentro de mi programa implemente un while que se ejecuta siempre y cuando dos variables sean diferentes
el problema es que en ocasiones las variables no quedan iguales y el programa queda en ese while en un loop infinito.

implemente un if dentro del while con un contador para que despues de determinados ejecuciones haga un break pero no es lo mejor

necesito sabr como se implementaria una especi de conbinaciones de teclas en delphi para que cuando esto ocurra se salga del while me dicen que se puede hacer pero no se como

agradezco a quien me pueda ayudar y espero respuesta pronto ya que la cuestion es urgente

gracias nuevamente y se cuidan

Pues deberías captar las hotkeys en tu programa, por ejemplo así:

http://www.q3.nu/trucomania/truco.cgi?40&esp

Y luego, dentro del bucle while pones la siguiente linea:

Application.ProcessMessage;

Que hace que se ejecuten los mensajes que se encuentran en la cola a pesar del bucle.
Supongo que con esto se podrá salir del bucle sin usar break.

Saludos.