News & Events
Dica: Logoff em sistemas
- 9 de outubro de 2007
- Posted by: Adriano Santos
- Category: delphi delphi2006 delphi2007 dicas reinicio
Difficulty level not set for this Post
Olá pessoal,
Para quem tem interesse em criar um botão de logoff no sistema a dica é muito simples.
Basta utilizar a função ShellExecute da API do Windows para reabrir o sistema. Veja como é simples:
...
uses
ShellApi;
...
procedure TForm1.btnLogofClick(Sender: TObject);
begin
Close;
ShellExecute(Application.Handle, Pchar('OPEN'), PChar(Application.ExeName), '', '', SW_SHOWNORMAL);
end;
Como podem ver apenas fechamos o aplicativo com Close e logo em seguida mandamo executar novamente com ShellExecute e o nome do executável que neste caso é ele mesmo.
A dica está disponível na seção Downloads. (Reinicio com Login)
Parabéns, sua inscrição no Feed RSS foi aceita. Leia em primeira mão todas as notícias do blog.
Siga @tdevrocks no Twitter agora e fique por dentro de todas as atualizações do blog.
Siga também o autor @asrsantos
Author: Adriano Santos
Adriano Santos é especialista em linguagens de desenvolvimento, Embarcadero MVP, possui +1000 artigos e vídeo-aulas publicadas em revistas e websites especializados, ex-editor chefe das revistas ClubeDelphi e WebMobile. Atualmente Diretor de Operações na startup GET IT! Technology e Consultor Senior na Embarcadero do Brasil.
Qual seria a funcionalidade disso?
Grande abraço!
Olá
Gostaria de saber como escrever um driver de sistema em Delphi. Alternativamente, estou trabalhando num sistema que intenta “simular” um driver através de Windows Messages.
Digi-Alchemist
NOssa issso é gambiarra…
E as informações correntes, logs, telas abertas, uma porçao de coisa..