Wilson, Desculpe-me por ter respondido em cima de sua mensagem e não na do Isaque.
Longe de mim querer desmereçer sua resposta. A resposta que dei foi no sentido de dar uma opção a mais ao Isaque e ao Grupo para esse mesmo tópico. Ricardo ----- Original Message ----- From: Wilson Valdevite To: delphi-br@yahoogrupos.com.br Sent: Wednesday, September 07, 2005 1:54 PM Subject: Re: [delphi-br] Desligar o WinXP Ricardo, na estrutura case que eu enviei ele faz a seguinte verificação: se for win9X ele executa o comando ExitWindowsEx(EWX_SHUTDOWN, 0); e se for W2K ou XP, ele executa o comando ExitWindowsEx(EWX_POWEROFF, 0); Utilizo isso em meus sistemas e nunca tive problemas e nem o windows 2000 reiniciou uma única vez sequer... Wilson ----- Original Message ----- From: Ricardo R Junior To: delphi-br@yahoogrupos.com.br Sent: Tuesday, September 06, 2005 11:14 AM Subject: Re: [delphi-br] Desligar o WinXP Isaque, Você pode executar o seguinte comando para XP: c:\windows\system32\shutdown -s -t 0 O -s desliga o computador, -t define um tempo em segundos para o desligamento, -r faz o desligamento e restart. Para windows 98 Voce pode executar o comando: c:\windows\rundll32.exe user.exe,ExitWindows Ricardo ----- Original Message ----- From: Wilson Valdevite To: delphi-br@yahoogrupos.com.br Sent: Tuesday, September 06, 2005 9:04 AM Subject: Re: [delphi-br] Desligar o WinXP Isaque, utilizo o seguinte case. ele faz a distinção entre WIN9X e W2K / WXP... case Win32Platform of VER_PLATFORM_WIN32_WINDOWS : ExitWindowsEx(EWX_SHUTDOWN, 0); VER_PLATFORM_WIN32_NT : ExitWindowsEx(EWX_POWEROFF, 0); end; ----- Original Message ----- From: Isaque Lisboa To: Fórum - Delphi Sent: Tuesday, September 06, 2005 4:47 AM Subject: [delphi-br] Desligar o WinXP Ola pessoal...eu tenho um codigo aki q eh para desligar o pc no horario programado....bom, soh q ele soh funciona no Win9x...no Win2000 e no WinXP ele naum funciona....ja peguei codigos da net q "dizem" q saum pra isso. mas compilei e mais uma vez naum deu nada....alguem pode me ajudar ? [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: PUBLICIDADE ------------------------------------------------------------------------------ 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.344 / Virus Database: 267.10.18/89 - Release Date: 02/09/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] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE ------------------------------------------------------------------------------ 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!. [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: PUBLICIDADE ------------------------------------------------------------------------------ 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.344 / Virus Database: 267.10.18/91 - Release Date: 06/09/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] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE ------------------------------------------------------------------------------ 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!. [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