Cerrar mi aplicación de consola con ESCAPE o DOS BOTONES DE JOYSTICK

[[escafandra]]

Código Delphi [-]
  // Espera hasta que termina la ejecución
  repeat
    iCodigoSalida := WaitForSingleObject( InformacionProceso.hProcess, 1000 );
  until ( iCodigoSalida <> WAIT_TIMEOUT ) or (GetAsyncKeyState(VK_ESCAPE) <> 0);

Saludos.

[MaxiDucoli]

Empezado por escafandra

Código Delphi [-]
  // Espera hasta que termina la ejecución
  repeat
    iCodigoSalida := WaitForSingleObject( InformacionProceso.hProcess, 1000 );
  until ( iCodigoSalida <> WAIT_TIMEOUT ) or (GetAsyncKeyState(VK_ESCAPE) <> 0);

Saludos.

MARAVILLOSO!!!!!!!

Estuve toda la tarde de ayer poniendo mil cosas en ese Repeat.
Jamás entendí de todo lo que leí (el 90% en inglés) lo que hacía GetAsyncKeyState().
MUCHAS GRACIAS!!!!

[[escafandra]]

Empezado por MaxiDucoli

MARAVILLOSO!!!!!!!

Estuve toda la tarde de ayer poniendo mil cosas en ese Repeat.
Jamás entendí de todo lo que leí (el 90% en inglés) lo que hacía GetAsyncKeyState().
MUCHAS GRACIAS!!!!

Básicamente devuelve un SHORT (DWORD) en el que pone a 1 el bit mas significativo si la tecla está pulsada en la llamada y a 1 el menos significativo se se pulsó la tecla y ya no está pulsada.

Código Delphi [-]
Tecla pulsada durante la llamada: 1000 0000 0000 0001b = 8001h = 32769d 
Tecla se pulsó y se soltó:        0000 0000 0000 0001b =    1h =     1d

En ambos casos el resultado es distinto de 0 por lo que si no te interesa saber si permanece pulsada, basta esta comparación.

Saludos.

[dec]

Hola a todos,

Que dice el foro que no puedo añadirte más reputación, escafandra, de modo que dejo aquí este comentario: estupenda respuesta la que has dado. Yo ví el hilo anteriormente... y lo ví casi imposible... y resulta que no podía ser más ***sencillo***... en fin, por hilos como estos merece la pena este sitio.

[[escafandra]]

Empezado por dec

Hola a todos,

Que dice el foro que no puedo añadirte más reputación, escafandra, de modo que dejo aquí este comentario: estupenda respuesta la que has dado. Yo ví el hilo anteriormente... y lo ví casi imposible... y resulta que no podía ser más ***sencillo***... en fin, por hilos como estos merece la pena este sitio.

Pues reputación no tengo mucha, aunque la pregunta era facilona, al menos conociendo la API de windows. En realidad se me ocurren muchas formas de contestar este hilo pero tal como está expuesto el código de MaxiDucoli, la opción más sencilla y directa es GetAsyncKeyState




Saludos.