hi,
ich habe hier folgenden code zum dateien-downloaden.
die variable "sta" ist vom typ tstrings, deren einträge ordnerpfade enthalten
Delphi-Quellcode:
directory := '
';
SelectDirectory('
Ordner auswählen', '
' , directory);
if(directory = '
')
then
exit;
directory := IncludeTrailingPathDelimiter(directory);
id_http := TidHTTP.Create(Application);
for i := 1
to str.Count - 1
do
begin
load := StringReplace('
http://localhost/'+str[i], '
', '
%20', [rfReplaceAll]);
try
fs := TFileStream.Create(directory+extract_filename(str[i]), fmCreate);
id_http.Get(load, fs);
finally
fs.Free;
end;
end;
falls allerdings eine datei nicht existiert, kommt eine fehlermeldung und das script wird komplett abgebrochen!!
wie kann ich dies verhindern??
PLEASE HELP!!!