Como Ocultar o Menu Iniciar no Windows XP

[~~Surfistinha~~² 0]

Olá caros leitores! Este artigo se destina a mostrar como esconder o botão Iniciar e a Barra de Tarefas do Windows, funcionando também no Windows XP.

 

Vale lembrar que a dica apenas "esconde" o menu iniciar, não impedindo que ele seja executado pela tecla "windows" ou pela combinação CTRL+ESC. Para este bloqueio, veja:

Este é para desabilitar o CTRL+ALT+DEL:

 

-declare a variavel:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

 

Para esconder oprograma do CTRL+ALT+DEL faça:

 

Inclua na Instrução Type:

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Depois crie no formulário principal a ação FormCreate e inclua as seguintes variáveis locais.

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

Inclua na procedure FormCreate as seguintes Instruções:

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

 

Esta dica visa solucionar, ou pelo menos dar uma boa idéia de como impedir que o usuário invoque o Gerenciador de Tarefas do Windows XP e finalize um aplicativo ou serviço.

 

 

Existem muitos métodos espalhados por aí utilizados para impedir o usuário de finalizar o programa com a combinação CTRL+ALT+DEL... e alguns outros que impedem a aplicação de ser exibida na lista de processos do Windows, utilizando chamadas externas à função RegisterServiceProcess da dll Kernel32. O problema é que essa função não é encontrada nas versões mais recentes do Windows, o que torna impossível utiliza-la para impedir que um programa seja exibido na lista de processos ativos. A extensão do problema é maior ainda quando tentamos simplesmente desativar o conjunto CTRL+ALT+DEL do aplicativo, ou mesmo tentar enganar o Windows, forçando a aplicação a aparecer como um Screen-Saver...

 

 

Assim, se você quer esconder o seu programa dos sistemas compatíveis com o Windows NT (o 2000 e o XP) você precisará trabalhar com o registro...

 

 

O procedimento HabilitaCTRLALTDEL aceita um valor booleano para o parâmetro YesNo. Se você envia um valor False como parâmetro, e o código é executado, quando o usuário pressiona a combinação CTRL + ALT + DEL, o Gerenciador de Tarefas (Task Manager) será desabilitado, enviando a mensagem padrão. Então, eis aí o código:

 

~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Adicione a unit Registry no seu projeto

~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Como usar:

 

Você poderá iniciar e finalizar o procedimento respectivamente nos eventos OnCreate e OnDestroy do seu formulário principal:

 

procedure TForm1.FormCreate(Sender: TObject);

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

~~~~~~~~~~~~~~~~~~~~~~~~~~~~

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

~~~~~~~~~~~~~~~~~~~~~~~~~~~~

 

Insira o procedimento HabilitaCTRLALTDEL na sessão implementation do form, como segue abaixo:

 

 

[/code]procedure HabilitaCTRLALTDEL(YesNo : boolean) ;

const

sRegPolicies = '\Software\Microsoft\Windows\CurrentVersion\Policies';

begin

with TRegistry.Create do

try

RootKey:=HKEY_CURRENT_USER;

if OpenKey(sRegPolicies+'\System\',True) then

begin

case YesNo of

False:

begin

WriteInteger('DisableTaskMgr',1) ;

end;

True:

begin

WriteInteger('DisableTaskMgr',0) ;

end;

end;

end;

CloseKey;

if OpenKey(sRegPolicies + '\Explorer\',True) then

begin

case YesNo of

False:

begin

WriteInteger('NoChangeStartMenu',1) ;

WriteInteger('NoClose',1) ;

WriteInteger('NoLogOff',1) ;

end;

True:

begin

WriteInteger('NoChangeStartMenu',0) ;

WriteInteger('NoClose',0) ;

WriteInteger('NoLogOff',0) ;

end;

end;

end;

CloseKey;

finally

Free;

end;

end;

[/code]

~~~~~~~~~~~~~~~~~~~~~~~~~~~~

 

E é isso ai, salve o seu projeto e rode o programa. Faça o teste apertando a tecla Ctrl+Alt+Del. Se tudo deu certo, o Windows exibirá uma mensagem de erro padrão, informando que o Gerenciador de Tarefas foi desativado. Você pode até mesmo tentar executar o aplicativo do Gerenciador de tarefas, o arquivo taskmgr.exe.

 

{-------------------------------------------------------

Procedure : EscondeIniciar

Parâmetros: Esconde(Boolean)

Descrição : Exibe ou esconde o botão Iniciar do Windows,

de acordo com o parâmetro passado,true para

esconder e false para exibir

-------------------------------------------------------}

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

{-------------------------------------------------------

Procedure : EscondeBarraTarefa

Parâmetros: Esconde(Boolean)

Descrição : Exibe ou esconde a barra de tarefas,

de acordo com o parâmetro passado,true para

esconder e false para exibir

-------------------------------------------------------}

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Espero que essas dicas sejam úteis.

 

Tudo em primeira mao!!

 

By'brother2402

[ByDuUxD 8]

Edite o Tópico pois Códigos ficaram colocados incorretamente,

 

Obrigado!

[~~Surfistinha~~² 0]

Comforme foi pedido editado com tudo certinho

 

 

Codigos adicionados