Moin,
hab's mal kurz getestet und Dein Code läuft bei mir ohne Probleme (Exchange Server 2003 -
Indy 10 - Delphi 7 Pro).
Ich bin mal davon ausgegangen, dass Dein host "admogo" der Exchange Server ist.
Was mich verwundert ist der EIdProtocolError. Den kann ich nicht nachvollziehen. Bei falscher Konfig des Host oder des Port bekomme ich EIdSocketError (connection refused, timeout, etc...). Bei 'falscher' Konfig des SMTPConnectors des Exchange bekomme ich EIdSMTPReplyError (z.B. wenn der
SMTP Connector kein Relaying erlaubt und Du nach 'draussen' mailen willst).
Hilft Dir warscheinlich nicht viel weiter, aber am Code selbst sollte es nicht liegen.
Tschüss,
Lutz