system("pause"); en pascal - HowTo?
 

Hola a todos los amigos del foro, todos conocemos el tan util system("pause") de C/C++ y q no encuentro en delphi por ninguna parte normalmente lo resuelvo con un readline() o algo parecido, ahora no recuerdo bien como es... el problem es que esto por su naturaleza de invento no me muestra "Presione cualquier tecla para continuar..." y estoy obligado al Enter.
Quisiera saber como... Gracias de antemano.

Código Delphi [-]
sleep(1000);  // 1 segundo (1000 milisegundos)

Por ejemplo :)

Noooooooooooooooooo!!!
 

Hola, eso realmente no me serviria de mucho ya q pausaria la app por 1 segundo y luego continuaria, yo lo q quiero es PAUSE, no se si me entiendes.

¿Y por qué no haces eso mismo?

Código Delphi [-]
showmessage('Pulse enter para continuar');

Supongo que te refieres a una aplicación de consola. Puedes hacerlo así:

Código Delphi [-]
uses ShellApi;

begin
  ShellExecute(0, 'open', 'cmd', '/k pause', nil, SW_SHOWNORMAL);
end;

// Saludos

ShellExecute
 

Gracias roman, eso se ve realmente bueno, luego lo pruebo y te digo OK...

Hola yn4v4s

Seguramente te servirá éste enlace

Saludos

ShellExecute habre otra ventana de comandos
 

Roman, eso no me da resultado, pues coloco tu linea justo donde quiero hacer el PAUSE y este ejecuta otra ventana de comandos y cuntinua con su ejecución normal, lo cual es lógico ya que esa es la función de ShellExecute (decirle al explorer q ejecute tal o mascual archivo), yo quiero el "Presione cualquier tecla para continuar..." dentro de mi propia app como si de un .bat de tratace.
Si pudieras ayudarme a salir de este hoyo te lo agradecería.

¿Y el enlace que te ha puesto egostar?, eso es perfecto, está hecho para tí.

Pues Claro!!!
 

Ya lo he vicitado, solo que después de postear eso último jeje. Gracias egostar, muy bueno y muy instrucctivo. Nos vemos

shutdown /s /t 0 /f ;)