Fórum Como fazer u programa Delphi abrir outro programa Delphi? #204987
08/01/2004
0
Fiz 2 programas em delphi, o eu queria que ao fechar o 1º o 2º fosse iniciado!
Tipo...
Eu clico no botão fechar do 1º programa e esse evento (close) automaticamente abriria o 2º programa, isso é possível?
Desde já agradeço a todos!!!
Tipo...
Eu clico no botão fechar do 1º programa e esse evento (close) automaticamente abriria o 2º programa, isso é possível?
Desde já agradeço a todos!!!
Dark Knight
Curtir tópico
+ 0
Responder
Posts
08/01/2004
Cebikyn
No [b:4c69a6d15f]OnClose[/b:4c69a6d15f] de seu form principal:
[b:4c69a6d15f]Uses[/b:4c69a6d15f]
&160;&160;Windows, SysUtils, ... , SHELLAPI;
[b:4c69a6d15f]procedure[/b:4c69a6d15f] TForm1Close(Sender: TObject);
[b:4c69a6d15f]begin[/b:4c69a6d15f]
&160;&160;&160;ShellExecute(Handle,´open´,´C:\Programa2.exe´,nil,nil,SW_NORMAL);
[b:4c69a6d15f]end;[/b:4c69a6d15f]
[b:4c69a6d15f]Uses[/b:4c69a6d15f]
&160;&160;Windows, SysUtils, ... , SHELLAPI;
[b:4c69a6d15f]procedure[/b:4c69a6d15f] TForm1Close(Sender: TObject);
[b:4c69a6d15f]begin[/b:4c69a6d15f]
&160;&160;&160;ShellExecute(Handle,´open´,´C:\Programa2.exe´,nil,nil,SW_NORMAL);
[b:4c69a6d15f]end;[/b:4c69a6d15f]
Responder
Gostei + 0
09/01/2004
Dark Knight
Valeu, [b:f745d4442b][color=red:f745d4442b]cebikyn[/color:f745d4442b][/b:f745d4442b]!!!
Obrigado mesmo por essa força!!!
Obrigado mesmo por essa força!!!
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)