- Declare a função abaixo antes da palavra implementation:
function RegisterServiceProcess(dwProcessID, dwType: Integer):
Integer; stdcall; external 'KERNEL32.DLL';
- Coloque dois botões no Form;
- No evento OnClick do Button1 coloque:
RegisterServiceProcess(GetCurrentProcessID, 1);
- No evento OnClick do Button2 coloque:
RegisterServiceProcess(GetCurrentProcessID, 0);
=== Para testar ===
Clique no Button1 e pressione CTRL+ALT+DEL. O seu programa
não aparecerá na lista.
Clique no Button2 e pressione CTRL+ALT+DEL. Agora seu programa
aparecerá na lista.
quinta-feira, 8 de setembro de 2011
Ocultar aplicação da lista de tarefas - CTRL+ALT+DEL
Assinar:
Postar comentários (Atom)
-
function GetIP:string;//--> Declare a Winsock na clausula uses da unit var WSAData: TWSAData; HostEnt: PHostEnt; Name:string; begin...
-
Vamos criar uma API REST simples em Delphi. Para isso, usaremos o Delphi 7 com Indy components (se for o que você tem disponível) ou, se est...
Nenhum comentário:
Postar um comentário