Ver Mensaje Individual
  #6  
Antiguo 27-01-2006
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
 
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.932
Reputación: 27
delphi.com.ar Va por buen camino
Lo que podes hacer es alocar una consola, ejecutar tu aplicación de DOS, y vos decidir cuando cerrar la consola:
Código Delphi [-]
var
  StartInfo: STARTUPINFO;
  ProccesInfo: PROCESS_INFORMATION;
  ExitCode: DWORD;
begin
  AllocConsole;
  try
    ZeroMemory(@StartInfo, SizeOf(STARTUPINFO));
    StartInfo.cb := SizeOf(STARTUPINFO);

    Win32Check(CreateProcess(nil, 'ping 127.0.0.1', nil, nil, FALSE, 
                               CREATE_SEPARATE_WOW_VDM, nil, nil, StartInfo, ProccesInfo));
    WaitForSingleObject(ProccesInfo.hProcess, INFINITE);

    Sleep(3000); { La espera... }
  finally
    FreeConsole;
  end;

Saludos!
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
Responder Con Cita