Fórum Como Reiniciar Aplicação? #355620
18/03/2008
0
Bom gostaria de saber se alguem sabe como reiniciar a aplicação, por exemplo, eu coloco um botão no form onde eu clico e ele fecha o meu sistema e depois abra de novo na tela de login
Alguem sabe como faço isso?
Vlw :wink:
Alecsandro Moura
Curtir tópico
+ 0Posts
18/03/2008
Mazzi
Particularmente, acho q deveria ser uma aplicação que verifica a outra. Tal qual um mutex, que verifica se a a sua aplicação já está rodando.
Pense nisso.
Abraços.
Gostei + 0
19/03/2008
Rodc
WinExec(PChar(Application.ExeName), WM_SHOW); Application.Terminate();
Gostei + 0
27/03/2008
Paullsoftware
em um botão fiz...
var ExeReiniciaAplicacao:String; begin ExtractFilePath(ParamStr(0))+´ReiniciaApicacao.exe´; ExecutaExeReinicia(ExeReiniciaAplicacao,´/locadora´); Application.Terminate; end;
Onde:
procedure ExecutaExeReinicia(Nome, Parametros: String); Var Comando: Array[0..1024] of Char; Parms: Array[0..1024] of Char; begin StrPCopy (Comando, Nome); StrPCopy (Parms, Parametros); ShellExecute (0, Nil, Comando, Parms, Nil, SW_SHOW); end;(* ExecProg *)
Detalhe!!! dentro do Exe auxiliar tem um time que executa a mesma rotina para abrir novamente o exe depois de 10 segundos e um label com a frazer:
Reiniciando Aplicação
espero ter ajudado :wink:
Gostei + 0
15/08/2014
Danilo Emanuel
ShellExecute(Handle,'open', PChar(Application.ExeName), nil, nil, SW_SHOWNORMAL);
Application.Terminate;
Gostei + 0
14/10/2014
Jiraya San
procedure TfrmPrincipal.LogoffExecute(Sender: TObject);
begin { Botão Logoff de usuário }
qryLogin.Close;
qryLogin.SQL.Clear;
Application.CreateForm(TfrmLogin,frmLogin);
frmLogin.ShowModal;
frmLogin.Destroy;
end;
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)