Buscar

Exclusividade para o programa

Código

{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;

Publicidade

Vote na dica




Quantidade de votos: 0 votos
Aceitação: 0%


Detalhes da dica

Categoria: Object pascal
Adicionada dia: 13/06/03
Por: Felipe Monteiro
Visualizada: 2122 vezes

Planeta Delphi - Tudo sobre programação Delphi Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009