Ver Mensaje Individual
  #1  
Antiguo 06-01-2009
[FGarcia] FGarcia is offline
Miembro Premium
 
Registrado: sep 2005
Ubicación: Cordoba, Veracruz, México
Posts: 1.123
Reputación: 20
FGarcia Va por buen camino
Interrumpir un ciclo Repeat - Until

Hola!

Un saludo y un feliz año a todos los integrantes del club.

Mi pregunta basicamente es ¿como interrumpir le ejecucion de un ciclo Repeat - Until (son dos anidados) usando la tecla ESC?

basicamente el ciclo es:

Código Delphi [-]
repeat
   repeat
      until //lo que sea
until //lo otro 
 
//intente esto pero no me hace nada. key es un var de tipo Char
repeat
   repeat
      if key = #27 then
        break;
      until //lo que sea que espere
   if key = #27 then
      break;
until //lo otro que espere

Como siempre agradeciendo su ayuda
__________________
ESTO ES UN FORO ... NO UN MÓVIL
¿Por qué no escribir de una manera comprensible para que los humanos lo podamos entender?
Responder Con Cita