[Ajuda] Instalar diretamente no C:\Arquivos de programas

[Boy Fenix 1]

Olá,

- eu estou precisando de uma ajuda para que quando alguem baixar meu prograama quero que instale no Arquivos de programas, não automaticamente ou se for melhor !

- Me ajudem, não so fale !

[DragonBoss 9]

hum... se vc quer ke somente o seu programa ( só o executavel.. sem mais nada ) seja copiado... vc pode usar directoryexist ( pra verificar se o diretorio no arquivos de programa existe, se nao existir faça-o criar uma pasta ) e usar o copyfile (pra copiar seu programa pra la )... isso eh um metodo bem simples...

 

mas acho que esse topico do Brutal666 pode lhe ajudar, ele fala um pouco sobre resource ( nao sei se vai ser necessario a voce ) e ensina a fazer o que falei sobre diretorios...

 

http://www.webcheats.com.br/forum/delphi-vb/396944-tutorial-criando-um-instalativo-setup.html

 

flw, abraçs

[dejaime 6]

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

• Entre
• ou
• Cadastre-se

 

Ou você pode criar um arquivo .bat, talvez?

[Boy Fenix 1]

Tipo num ta so o Executavel, tem uns arquivos de *.Txt

[dejaime 6]

É só fazer um bat que copie o executável e os txt...

Talvez até crie um atalho na área de trabalho etc etc

 

dê uma pesquisada sobre batch, ou faça um programa em Delphi mesmo para copiar...

[Boy Fenix 1]

aki no WB tem?? tuto !?

[Ryokusei 28]

Se lembra daquele tópico de instalar programa que você criou? Então, nele tem a resposta.

[dejaime 6]

hum... se vc quer ke somente o seu programa ( só o executavel.. sem mais nada ) seja copiado... vc pode usar directoryexist ( pra verificar se o diretorio no arquivos de programa existe, se nao existir faça-o criar uma pasta ) e usar o copyfile (pra copiar seu programa pra la )... isso eh um metodo bem simples...

 

mas acho que esse topico do Brutal666 pode lhe ajudar, ele fala um pouco sobre resource ( nao sei se vai ser necessario a voce ) e ensina a fazer o que falei sobre diretorios...

 

http://www.webcheats.com.br/forum/delphi-vb/396944-tutorial-criando-um-instalativo-setup.html

 

flw, abraçs

serve esse???

 

Se lembra daquele tópico de instalar programa que você criou? Então, nele tem a resposta.

LoL

[Boy Fenix 1]

É mais aquele topico ensina so instalar o exe ! eu quero instalar um *.txt junto ! (hum não alguns)

[DragonBoss 9]

é só vc fazer um resource referente aos arquivos que serão instalados.... =]

 

flw

[Boy Fenix 1]

Explica melhor num entendi ! (soumeioburro!)

[Ryokusei 28]

É mais aquele topico ensina so instalar o exe ! eu quero instalar um *.txt junto ! (hum não alguns)

 

¬¬'

Aff cara, é só pegar o code que copia o aplicativo e mudar o nome do arquivo que copia pro nome do seu TXT, simples CTRL+C e CTRL+V.

[קђ๏єภเא 17]

Sabe no winrar, dá para fazer um instalador em SFX, dá para adicionar imagens e tdo mais, fica quase igual ao convencional...

[Ryokusei 28]

Lembra daqui?

 

Então, é só você fazer isso:

 

var s, x: string;

begin

s:=GetEnvironmentVariable('programfiles');

s:=s+'\Meu programa';

CreateDir(s);

x:=s+'\'+ExtractFileName(Application.ExeName);

s:=ExtractFileDir(Application.ExeName);

if not

(CopyFileA(PAnsiChar(Application.ExeName) , PAnsiChar(x), False))

and

(CopyFileA(PAnsiChar(s+'\arquivo1.txt') , PAnsiChar(x), False))

and

(CopyFileA(PAnsiChar(s+'\arquivo2.txt') , PAnsiChar(x), False))

and

(CopyFileA(PAnsiChar(s+'\arquivo3.txt') , PAnsiChar(x), False))

then

begin

ShowMessage('Erro ao instalar');

Exit;

end;

ShowMessage('Instalado com sucesso);

 

Siga o modelo e vai ter o que quer. Fiz isso assumindo que os .txt estão na mesma pasta do aplicativo.

[Boy Fenix 1]

Eu fiiz tudo que diisse ! mais o Txt não foi junto !!!

[DragonBoss 9]

Eu fiiz tudo que diisse ! mais o Txt não foi junto !!!

 

verifique se nao é erro na string do diretorio Y_Y

 

flws

[Boy Fenix 1]

Okay ! eu fiz de outro jeito pelo Winrar !