Olá, bom dia/tarde
Estou querendo baixar um arquivo do meu servidor
para o computador, Mais gostaria de informar o diretório
a ser deposito pelo registro do windows, Como proceguir?
No code acima baixa na pasta 'Arquivos de Programas\softPlayer
e copia para softplayer\skin
Como poderia informar o diretorio a ser baixado pelo registro do windows?
Muito obrigado pela atenção
Até mais
Estou querendo baixar um arquivo do meu servidor
para o computador, Mais gostaria de informar o diretório
a ser deposito pelo registro do windows, Como proceguir?
Código Selecionar
uses
SysUtils, Windows, UrlMon;
function DownloadFile(Source, Dest: string): Boolean;
begin
try
Result:= UrlDownloadToFile(nil, PChar(source),PChar(Dest), 0, nil) = 0;
except
Result:= False;
end;
end;
begin
if DownloadFile
('http://servidor.com/arquivo.txt',
'c:\Arquivos de Programas\SoftPlayer\arquivo.txt') then
Copyfile('c:\Arquivos de Programas\SoftPlayer\arquivo.txt',
'c:\Arquivos de Programas\SoftPlayer\skin\arquivo.txt') then
end.
No code acima baixa na pasta 'Arquivos de Programas\softPlayer
e copia para softplayer\skin
Como poderia informar o diretorio a ser baixado pelo registro do windows?
Muito obrigado pela atenção
Até mais