Probleme SMTP

[Uwe Regenhardt]

Ich verwende unter Delphi 5 die FastNet-SMTP-Komponente um Mails zu verschicken. Tritt dabei jedoch ein Problem auf (z.B. kein Connect zum Server möglich), so wird nicht nur das entsprechende Ereignis (z.B. OnConnectFailed) ausgelöst sondern auch ein modales Fenster mit einer Fehlermeldung geöffnet.

Wie kann ich das Öffnen dieses Fensters verhindern?

Dabei tritt eine sog. Exception auf.

Das einfachste ist, diese abzufangen und selbst zu bearbeiten:
<pre>
var fehler: boolean;

begin
fehler:=false;
try
NMSMTP1.Connect
(* noch mehr code. *)
except
on E: Exception do
begin
(* E.message enthält die Exception message *)
fehler:=true;
end;
end;
if fehler then
begin
(* eigene Fehlermeldung *)
end;
end;
</pre>
&#10