Tem algum jeito de fazer isso aqui no Delphi? Se sim, como?

[iGoogle 0]

Então pessoal, vou fazer uns trabalhos de formatar pc's aqui na vizinhança, tava navegando pela net e ví essa imagem:

Pessoal, eu queria MUITO esse tipo de programa. Por exemplo; "clique no office 2010, e abre o instalador e o arquivo de texto com o serial".. Fiquei intrigado com esse programa.. há algum jeito de alguém aí fazer esse programa pra mim ou bolar um tutorial? POR FAVOR! :/

[SeaCrusher 0]

eu sei fazer pra quando vc clicar no botao, abrir o site que vc quer instalar, mais abrir direto o programa pra instalar, sei nao

[The°Hacker 6]

Tem sim mano, não é nada complicado...

Pra voce ter uma ideia, coloque os intaladores dos programas que voce quer dentro de uma pasta, aí no botão de "Instalar Office 2010" voce coloca o codigo que executa o instalador !

 

Exemplo executando com ShellExecute:

 

ShellExecute(handle,'open',PChar(OFFICE2010.EXE), '','',SW_SHOWNORMAL);

 

Só te dei uma base de como funciona, realmente não é nada complicado !!!

 

Obs: Área errada, o correto seria postar sua duvida em: Programação - Dúvidas/Ajuda

 

Abraços !!

[Lf' 7]

A área de Delphi é para postagens de tutoriais é para postagens de tutoriais, componentes e coisas do gênero;

Movido para área correta: Programação - Dúvidas/Ajuda

 

Sobre sua dúvida, você pode fazer o que o The°Hacker falou, isso é bem simples, você irá criar o programa, deverá ter os programas que irá chamar dentro da pasta do programa para poder chamá-lo depois usando o shell execute, sobre o serial você pode fazer de varias maneiras, você pode mostra-lo usando ShowMessage('Serial') ou pode coloca-lo em um edit e fazer com que o visible do edit se torne true ao clicar no button.

 

edit1.visible:=true

['hard ~* 0]

Leia :

 

http://www.webcheats.com.br/forum/delphi-vb/1430445-codigos-do-shellexecute-para-sites-arquvos-etc.html

 

Tem o código que seria este :

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Uses : shellapi

[iGoogle 0]

Obrigado a todos! Assim que eu terminar, eu edito!