uma dica de codigo......... para o programa Gostaria de saber como fazer para que, ao iniciar minha aplicacao 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 aplicacao seja iniciada, o usuario nao tenha como alternar entre programas, acessar outros icones, 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; ----- Original Message ----- From: Sérgio Rodrigo Alves Silva To: delphi-br@yahoogrupos.com.br Sent: Saturday, March 12, 2005 1:00 AM Subject: [delphi-br] Re: Shell (duvida) URGENTE!!!! Cara, procurei, procurei e não achei nada no Delphi em relação a esse tal de: "ChangeShell". Como vc ficou sabendo dele? --- Em delphi-br@yahoogrupos.com.br, "Hudson BHTE" <[EMAIL PROTECTED]> escreveu > Gente estou com este codigo: > > 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; > > ele faz o programa ser exclusivel..........a duvida é a seginte.....onde esta este evento ChangeShell e pq quando tento criar este.....ele da codigo de erro.....de execução..... > > tentei colocar.....em outro evento como ONSHOW......mas deu erro de execução no (Tinifile).......logo no começo....... > > alguem pode me ajudar........pois tenho q entregar isso na segunda!!!!!! > > [As partes desta mensagem que não continham texto foram removidas] -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: São Paulo Rio de Janeiro Curitiba Porto Alegre Belo Horizonte Brasília ------------------------------------------------------------------------------ Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. ------------------------------------------------------------------------------ No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.308 / Virus Database: 266.7.1 - Release Date: 9/3/2005 [As partes desta mensagem que não continham texto foram removidas] -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html