Abrir um salvar um arquivo fazendo download via FTP.
Alguem sabe como fazer um ftp, possibilitando abrir o arquivo ou salvar, igual ao Explorer.
Agradeço qualquer ajuda.
Agradeço qualquer ajuda.
Cgil
Curtidas 0
Respostas
Luizfernando777
02/10/2003
Já quebrei muito minha cabeça com isso,
mas vai aí
anexar junto a uses
UrlMon
function DownloadFile(Source, Dest: string): Boolean;
begin
try
Result := UrlDownloadToFile(nil, PChar(source), PChar(Dest), 0, nil) = 0;
except
Result := False;
end;
end;
mas vai aí
anexar junto a uses
UrlMon
function DownloadFile(Source, Dest: string): Boolean;
begin
try
Result := UrlDownloadToFile(nil, PChar(source), PChar(Dest), 0, nil) = 0;
except
Result := False;
end;
end;
GOSTEI 0