A aplicação pode ser executada com um user q tenha privilégio... 
[]s

Luiz Escobar


  ----- Original Message ----- 
  From: Joao Morais 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, October 28, 2008 8:46 PM
  Subject: Re: [delphi-br] Desabilitar CTRL+ALT+DEL no Windows Vista


  2008/10/28 Luiz ESCobar <[EMAIL PROTECTED]>:
  > Nada é impossivel João...
  > Provavelmente o que ele quer na realidade é desabilitar o TaskManager...
  > Se for, ai esta:

  Este código não funciona se o usuário não tiver privilégio. Não testei
  como admin pra ver o que dá.

  --
  Joao Morais

  > procedure HabilitaAltCtrlDel(YEsNo: Boolean);
  > const
  > sRegPolices = 'Software\Microsoft\Windows\CurrentVersion\Policies';
  > begin
  > with TRegistry.Create do
  > try
  > RootKey := HKEY_CURRENT_USER;
  > if OpenKey(sRegPolices + '\System\', True) then
  > begin
  > case YesNo of
  > False:
  > begin
  > WriteInteger('DisableTaskMgr', 1);
  > end;
  > True:
  > begin
  > WriteInteger('DisableTaskMgr', 0);
  > end;
  > end;
  > end;
  > CloseKey;
  > finally
  > Free;
  > end;
  > end;


   

[As partes desta mensagem que não continham texto foram removidas]

Responder a