Buscar

Executar comandos do ms-dos (janela normal ou invisível) - bem explicado.

Código

{Para executar um Comando no MS-Dos, deve-se utilizar o seguinte comando: }

WinExec(PChar('command.com /c "Digite o seu Comando aqui" '),SW_shownormal);

{Significa que o Delphi vai procurar um Arquivo Chamado 'command.com', Localizado na pasta 'c' e executar o Comando que você digitou Numa Janela Normal('SW_Shownormal').

Dica: Os Comandos do MS-Dos são executados Numa Tela Preta, o que deixa o seu Programa, de um certo modo Feio. Para Evitar isso, deve-se utilizar em vez de 'SW_Shownormal', 'SW_Hide', que deixa a Tela Preta do MS-Dos Invisível. Exemplo: }


WinExec(PChar('command.com /c shutdown -s'),SW_HIDE);

{Significa que o Delphi Vai procurar um Arquivo Chamado 'command.com', Localizado na pasta 'c' e executar o Comando 'shutdown -s' Numa Janela Invisível('SW_Hide'). O Comando 'Shutdown -s' desliga o computador em 30 segundos, mas pode ser substituído por qualquer outro Comando do MS-Dos.}


//Dica Incluída Por: Eládio Oliveira (13 anos de Idade).

Publicidade

Vote na dica




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


Detalhes da dica

Categoria: Windows
Adicionada dia: 18/11/06
Por: Eládio
Visualizada: 48460 vezes

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