Ich versteh dein Problem nicht ganz. Deine Lösung fängt die
Exception ja ab, wenn auch auf eine unschöne Art und Weise, denn du verschluckst alle Exceptions. Besser wäre sowas wie:
Delphi-Quellcode:
try
IdFTP1.Connect;
except
On Exception: E
do
begin
if not StartsText('
I won''
t open a connection to', E.
Message)
raise;
end;
end;
Wenn es dich stört, dass der Delphi Debugger bei dieser Exception jeweils anhält, kannst du in den Debugger Optionen angeben, das er diesen Exception Typ ignoriert. Ich bin nicht sicher was der Typ genau ist, aber das solltest du herausfinden können.