Fórum Abrir uma aplicação externa dentro da minha aplicação #263610

28/12/2004

0

E ae Pessoal,

Possuo 5 sistemas prontos e para meus clientes gostaria de mostrar apenas um executavel e dentro dele chamar as outras aplicações porém gostaria de abri-los dentro do meu executavel atual.

Agradeço desde já.

Abraços

Euclides


Euclides

Euclides

Responder

Posts

28/12/2004

Reginaldo174

 winexec(´c:\caminhodaaplicacao´,sw_shownormal);



Responder

Gostei + 0

28/12/2004

Euclides

opa amigo tudo bom ???

Essa função ela executa uma aplicação externa porém apenas isto além de que esta função esta descontinuada, hoje substituida pela Shell_ execute. Agradeço pela atenção de verdade porém preciso de algo que abra uma aplicação externa dentro da minha aplicação .......

Mas muito obrigado mesmo

Abraços

Euclides


Responder

Gostei + 0

29/12/2004

Reginaldo174

preciso de algo que abra uma aplicação externa dentro da minha aplicação .......


Amigo vc quer abrir um executável a partir do seu sistema ?

é isto ? ´Tente ser mais claro´


Responder

Gostei + 0

29/12/2004

Euclides

[quote=´reginaldo174´][quote=´Euclides´]
preciso de algo que abra uma aplicação externa dentro da minha aplicação .......


Amigo vc quer abrir um executável a partir do seu sistema ?

é isto ? ´Tente ser mais claro´



Acho que a minha primeira mensagem foi bem clara .... eu desejo abrir um executavel externo a partir do meu executavel porém que ele esteja dentro do executavel atual ou seja que ele seja um parent.

Muito Obrigado

Euclides


Responder

Gostei + 0

29/12/2004

Fsflorencio

Dá uma olhada nesta procedure:
Ela chama um executável e espera o seu término para voltar o foco para sí.


procedure chamanotepad;
var
startupinfo: Tstartupinfo;
ProcessInfo: TprocessInformation;
begin
FillChar( startupinfo, sizeof( Tstartupinfo ), 0 );
startupinfo.cb := sizeof( Tstartupinfo);

if createProcess( nil, ´notepad.exe´, nil, nil, false, normal_priority_class, nil, ´c:\winnt´, startupinfo, processinfo ) then
begin
waitforsingleobject(processinfo.hprocess,infinite);
end;

CloseHandle(processinfo.hprocess);

ShowMessage(´Execução do Bloco de Notas encerrada.´);
end;

Tirando isto, sugeriria vc fazer uma nova aplicação integrando os outros sistemas.


Responder

Gostei + 0

29/12/2004

Euclides

[quote=´fsflorencio´]Dá uma olhada nesta procedure:
Ela chama um executável e espera o seu término para voltar o foco para sí.


procedure chamanotepad;
var
startupinfo: Tstartupinfo;
ProcessInfo: TprocessInformation;
begin
FillChar( startupinfo, sizeof( Tstartupinfo ), 0 );
startupinfo.cb := sizeof( Tstartupinfo);

if createProcess( nil, ´notepad.exe´, nil, nil, false, normal_priority_class, nil, ´c:\winnt´, startupinfo, processinfo ) then
begin
waitforsingleobject(processinfo.hprocess,infinite);
end;

CloseHandle(processinfo.hprocess);

ShowMessage(´Execução do Bloco de Notas encerrada.´);
end;

Tirando isto, sugeriria vc fazer uma nova aplicação integrando os outros sistemas.


Opa amigo tudo bom ???

Agradeço pela sua atenção, porém em consultas no forum vi esta função porém ela executa o ´notepad´ e espera terminar a execução como se fosse um form no modelo ShowModal , certo ????

O que eu realmente gostaria era de acionar um executavel externo e ele ficar dentro do meu projeto como se fosse um mdichild, mais ou menos isso.... ok

Mas muito obrigado pela sua atenção

abraços

Euclides


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar