[[escafandra]]

Empezado por Flecha

Muchas gracias..., pero no funciona.

Da igual lo que intente ejecutar.
CreateProcess() siempre devuelve FALSE, así que nunca llega a ejecutar el comando.

Pues a mi si. Sólo he encontrado un problemilla en tamaño del buffer del pipe, si lo asignas por defecto a veces falla. Le he dado un valor de 25k.

Ademas, ejecuta y captura comandos difíciles de capturar como el "xcopy".



Cambia la línea:

Código Delphi [-]
if CreatePipe(pipeRead, pipeWrite, @sa, 0) then

por

Código Delphi [-]
if CreatePipe(pipeRead, pipeWrite, @sa, 25*1024) then

Saludos.