Ver Mensaje Individual
  #5  
Antiguo 06-02-2008
Avatar de Ñuño Martínez
Ñuño Martínez Ñuño Martínez is offline
Moderador
 
Registrado: jul 2006
Ubicación: Ciudad Catedral, Españistán
Posts: 6.000
Reputación: 25
Ñuño Martínez Tiene un aura espectacularÑuño Martínez Tiene un aura espectacular
Wenas.

Sólo decir que he estado haciendo pruebas en Linux (Free Pascal) y no funciona. Compila y ejecuta, pero al pulsar [Ctrl+C] cierra el programa y ya está. El programa que he utilizado es este:
Código Delphi [-]
PROGRAM EjemploControlC; 
(* Un ejemplo de cómo capturar [Ctrl+C] con Object Pascal.  *) 
 
{ FPC no necesita saber si es o no de consola. }
USES 
  SysUtils; { EControlC es declarada aquí. } 
 
VAR 
  VariableTonta: STRING; 
BEGIN 
  TRY 
    WriteLN ('Para terminar puedes pulsar [Enter] o [Ctrl+C].  El resultado será diferente en cada caso'); 
    ReadLN (VariableTonta); 
    WriteLN ('Has pulsado [Enter].'); 
  EXCEPT 
    ON EControlC DO WriteLN ('Has pulsado [Ctrl+C].'); 
  END; 
  WriteLN ('Que tengas un buen día.'); 
END.
Sólo lo digo para que conste, no porque crea que esté mal que no es el caso.
__________________
Proyectos actuales --> Allegro 5 Pascal ¡y Delphi!|MinGRo Game Engine
Responder Con Cita