Esconder o sistema

[kabessa 0]

Aeee galera estou querendo q meu sistema execute qnd o windows é iniciado e q naum apareça qnd o kra tenta finalizar com ctrl + alt + delete, naum apareça na barra tarefas.....ajudem.

[Eduardo Valentim 0]

Olá,

 

Eu tinha esse código, mas não encontrei ele por aqui <_< , tente procurar no google por delphi how to hiding processes. http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

 

Abraços

[Aroldo Zanela 0]

Colega,Peguei uma receita na Web:

DESABILITANDO CTRL+ALT+DEL:Livro Dicas em Delphi de Wilson josé de Oliveira editora Visual Books.

var i:integer;begin i:=0; SystemParametersInfo(SPI_SCREENSAVERRUNNING,1,@,0);end.DESABILITANDO ALT+TAB:{para desabilitar}procedure TurnSysKeysOff;var OldVal : LongInt;begin SystemParametersInfo(97,Word(True),@OldVal,0);end;{para habilitar}procedure TurnSysKeysOn;var OldVal:LongInt; SystemParametersInfo(97,Word(False),@OldVal,0);end;DESABILITANDO O ALT+F4procedure TForm1.FormCloseQuery(Sender:TObject; var CanClose:Boolean);begin CanClose:=false;end;DESABILITANDO NUMA TACADA CRTL+ALT+DEL E ALT+TAB:Livro 365 DICAS DE DELPHI de Bruno Sonnino editora Makron BooksSystemParametersInfo(SPI_SCREENSAVERRUNNING,1,@Dummy,0);OCULTANDO A APLICAÇÃO DA LISTA DE TAREFAS DO CTRL+ALT+DEL:Livro 365 DICAS DE DELPHI de Bruno Sonnino editora Makron Booksconst RSP_SIMPLE_SERVICE=1; RSP_UNREGISTER_SERVICE=0;function RegisterServiceProcess(dwProcessID,dwType:DWORD):DWORD;stdcall;external 'KERNELL32.DLL';procedure TForm1.FormCreate(Sender:TObject);beginRegisterServiceProcess(GetCurrentProcessID,RSP_SIMPLE_SERVICE);end;procedure TForm1.FormDestroy(Sender: TObject);begin RegisterServiceProcess(GetCurrentProcessID,RSP_UNREGISTER_SERVICE);end;{pronto a sua aplicação nao aparecera na lista de tarefas quando alguémacionar ctrl+alt+del}SUMINDO COM O BOTÃO INICIAR DO WINDOWS:Delphi APIs & Sockets de Hugo S. Novaes e Fabio Camara Editora Visual Booksprocedure ExTaskBar(Visible:Boolean);var taskbar, but: HWND;begin taskbar:=FindWindow('Shell_TrayWnd',nil); but:=GetWindow(taskbar,GW_Child); if Visible Then ShowWindow(but,SW_RESTORE) file://Mostra Botão else ShowWindow(but,SW_HIDE); file://Esconde Botãoend;

[kabessa 0]

vlw galera pela ajuda