quarta-feira, 17 de junho de 2009

Exclusividade para o programa

{Gostaria de saber como fazer para que, ao iniciar minha aplicação Delphi, eu " desabilite " o Shell do Windows (Explorer). Ou seja, o que eu preciso e' de uma forma de fazer com que apos a minha aplicação seja iniciada, o usuário não tenha como alternar entre programas, acessar outros ícones, etc No System.ini você tem uma configuração como esta :}

Shell=Explorer.exe

Basta trocar por

Shell=Myprog.exe

Ou usando delphi


procedure Tform1.ChangeShell(String programa);
var
ArquivoIni : Tinifile;
begin
try
ArquivoIni := Tinifile.Create('System.ini');
ArquivIni.WriteSection('Config','Shell','Myprog.exe');
fynally
ArquivoIni.Destroy;
end;
end;

Nenhum comentário:

Postar um comentário