Download mehrerer Dateien wird bei Fehler gestoppt

[silentAMD]

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!!!