[AJUDA] Usar texto escrito no edit no comando

[guire12 0]

Olá, estou precisando de uma ajuda.

parecia ser simples até eu tentar começar a fazer, e não achei nada em relação a isso por isso estou postando aqui.

 

Gostaria de copiar o arquivo de uma pasta para outra mas assim, eu tenho um Edit no programa e gostaria de pegar o que o cara escrever no edit e colocar no button

 

No button tenho o commando:

CopyFile('C:\exemplo\arquivo.exe', 'C:\exemplo2\arquivo.exe',false);

Como posso fazer para colocar no lugar do 'C:\exemplo2\arquivo.exe' o que o cara escrever no edit?

 

E ja que estou aqui queria saber tambem, como pego o arquivo que esta na pasta do programa? Exemplo: trocar o C:\exemplo\arquivo.exe para o diretorio onde esta o programa + \pasta\arquivo.exe?

 

Obrigado desde já

[Vator 11]

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

• Entre
• ou
• Cadastre-se

[guire12 0]

Cara, não entendi direito, onde eu coloco isso? com os ''? explica melhor O.o

[Owner 8]

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

• Entre
• ou
• Cadastre-se

[DragonBoss 9]

;B

 

no lugar de:

 

CopyFile('C:\exemplo\arquivo.exe', 'C:\exemplo2\arquivo.exe',false);

 

fica:

 

CopyFile(PChar(lindoEdit.Text), 'C:\exemplo2\arquivo.exe',false);

 

 

 

#Edit... owner e eu postamos juntos ;/

[guire12 0]

Não to conseguindo aqui... e esse "LINDO"edit é isso mesmo?

E ficaria assim mesmo:

CopyFile('C:\exemplo\arquivo.exe', PChar(lindoEdit.Text),false);

 

ajuda ae

[Vator 11]

lindoEdit é pra trocar pelo nome do seu Edit,cara.Preste atenção :indiferente:

 

E você quer selecionar no edit o arquivo de origem ou o destino?

[guire12 0]

Destino, mas mesmo se eu coloco o nome do edit, o programa executa e tudo, mas não move o arquivo para o destino que eu escrevo no edit...

[Vator 11]

Tem que escrever o nome completo,pasta e arquivo.

[guire12 0]

Aé, tenque escrever o nome do arquivo tambem... E como eu faço pra colocar um final no que o cara escreveu, exemplo ele digita "c:\pasta1\" e o programa adiciona depois da \ pasta2\arquivo.exe?

[Vator 11]

como assim?

seria algo assim :

 

CopyFile('C:\exemplo\arquivo.exe', PChar(lindoEdit.Text + 'arquivo.exe'),false);

 

O cara digita C:/pasta/ e o final fica C:/pasta/arquivo.exe/

[guire12 0]

Isso, funcionou agora, mas ainda tem uma questão, como eu faço pra ele pegar o diretorio de destino sozinho, que vai ser uma pasta dentro da pasta do programa, algo como (diretorio que está o programa + \pasta\arquivo.exe

[Vator 11]

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

• Entre
• ou
• Cadastre-se

 

gatinho é a string que contém o caminho onde o projeto(só o executável) está.

[gabrielms157 0]

ta aqui

 

:lol:

If not CopyFile(PChar(Edit1.Text),PChar(Edit2.Text),false)then

begin

ShowMessage('aqui vai fica a messagen ')end

else

ShowMessage('aqui vai fica a message ');

end;