Fórum Executar aplicação for DOS #373167
05/08/2009
0
Quero executa um aplicação for DOS de dentro do meu aplicativo. Tem como? Queria fazer algo tipo o ´prompt de comando´. O usuário teclaria em um determinado botão e o mesmo executaria o aplicativo for DOS em uma janelinha, não quero maximiza-la não... e o usuário só retornaria para o aplicativo em Delphi quando o for DOS foose realmente finalizado.
Obrigado e aguardo qualquer ajuda.
Obrigado e aguardo qualquer ajuda.
Aprendiz_ce
Curtir tópico
+ 0
Responder
Posts
05/08/2009
Diegotiemann
try
outroForm :=T outroForm.Create(application);
WinExec(´CMD.exe´,SW_NORMAL);
Windows.SetParent( FindWindow( nil, ´C:\WINDOWS\system32\CMD.exe´ ), outroForm.handle ) ;
outroForm.ShowModal;
finally
FreeAndNil( outroForm);
end;Eu não testei com o CMD:
Mas acho que é mais ou menos assim.
Segue um artigo que fala como executar um programa dentro do outro:
[url]https://www.devmedia.com.br/articles/viewcomp.asp?comp=13799[/url]
Responder
Gostei + 0
06/08/2009
Aprendiz_ce
try
outroForm :=T outroForm.Create(application);
WinExec(´CMD.exe´,SW_NORMAL);
Windows.SetParent( FindWindow( nil, ´C:\WINDOWS\system32\CMD.exe´ ), outroForm.handle ) ;
outroForm.ShowModal;
finally
FreeAndNil( outroForm);
end;Beleza, pelo menos isso já é um começo...
Vou por em pratica e dou retorno.
Obrigado pela sua atenção.
Abraço.
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)