Fórum Createprocess #285827

Tenho a seguinte situação:
Rodando:=CreateProcess(nil,Pchar(Comando),nil,nil,False,CREATE_NEW_CONSOLE or NORMAL_PRIORITY_CLASS,nil,nil,StartupInfo,ProcessInformation);
if Rodando then
begin
WaitForSingleObject(ProcessInformation.hProcess,INFINITE);
Application.ProcessMessages;
end;

Preciso que a janela do DOS fique visível pois estou copiando um arquivo para o disquete e ele tem q pedir o 2º disquete. Tem como fazer isso?