ActiveDelphi - Índice do Fórum ActiveDelphi
.: O site do programador Delphi! :.
 
 FAQFAQ   PesquisarPesquisar   MembrosMembros   GruposGrupos   RegistrarRegistrar 
 PerfilPerfil   Entrar e ver Mensagens ParticularesEntrar e ver Mensagens Particulares   EntrarEntrar 

CD BATCH PARA APLICATIVOS

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Off-Topic
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
pinsy
Novato
Novato


Registrado: Segunda-Feira, 21 de Dezembro de 2009
Mensagens: 88

MensagemEnviada: Sex Fev 05, 2010 3:26 pm    Assunto: CD BATCH PARA APLICATIVOS Responder com Citação

Olá pessoal estou precisando fazer um CD com alguns Aplicativos contendo um arquivo batch para que esses arquivos executem automaticamente alguem pode me ajudar.

Aplicativos:

-Office 2003 com serial
-Firefox
-Winrar
-Avast com serial
-msn
-Adobe (PDF)
-Cclear

Pinsy
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
Sonynho
Novato
Novato


Registrado: Sábado, 20 de Fevereiro de 2010
Mensagens: 8
Localização: Eu sou nuvem passageira, que com o vento se vai...

MensagemEnviada: Dom Fev 21, 2010 9:31 pm    Assunto: Responder com Citação

Você pode criar uma aplicação no Delphi e inserir no formulário botões correspondentes aos arquivos que deseja executar quando clicar neles, e no evento OnClick de cada um, chamar a função WinExec(), como no exemplo abaixo. Não se esqueça de gravar sua aplicação no CD junto com os outros arquivos.

Supondo que você queira executar o arquivo install.exe, presente no diretório raiz de um CD, chame a função WinExec() da seguinte maneira no evento OnClick do botão correspondente ao arquivo:

Citação:
WinExec(PChar('cmd /c call install.exe'), SW_HIDE);

Caso o nome do arquivo contenha espaços, insira-o entre aspas. Assim: "install program.exe".

Para executar sua aplicação assim que o CD for carregado, crie um arquivo com o seguinte conteúdo em qualquer editor de textos (como o Bloco de notas, por exemplo), salve com o nome de autorun.inf e grave-o no CD junto com sua aplicação e os outros arquivos:

Citação:
[autorun]
open=sua_aplicacao.exe


Espero ter ajudado. Abraços.
_________________
Copyright © Microsoft Corporation
All rights reserved
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular MSN Messenger
Mostrar os tópicos anteriores:   
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Off-Topic Todos os horários são GMT - 3 Horas
Página 1 de 1

 
Ir para:  
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.


Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB