[Delphi7] Действие программы при не возможности отправить почту.

[tozter]

Программа отправялет на почту текст и файл.
Если наблюдаются какие-либо трудности с подключением к почтовому серверу то программа падает.

IdSMTP1.Connect;
if IdSMTP1.Connected then IdSMTP1.Send(msg);  <----падает тут
IdSMTP1.Disconnect;

Как избежать падения программы при не возможности отправить почту?

Я правильно понял смысл этого кода if IdSMTP1.Connected ? -> Если соединение устанволенно, то все ок, продолжаем работать.

[Пепел Феникса]

try except end не проходили?
если нет то стоит пройти(исключения тема называется)

[tozter]

Код будет выглядить так:

try
<много всего>
IdSMTP1.Connect;
if IdSMTP1.Connected then IdSMTP1.Send(msg);
IdSMTP1.Disconnect;
except
ShowMessage('Сервер не доступен');
IdSMTP1.Disconnect;

end;

?

[Пепел Феникса]

в общем да.(правда помните что отладчик показывает исключения по умолчанию)

[tozter]

Не пойму.... сделал как в выше означеном коде, ошибка всервно выскакивает и программа падает...

[Пепел Феникса]

под отладчиком?
а вне отладчика запустите.

[tozter]

Сообщение от Пепел Феникса

под отладчиком?
а вне отладчика запустите.

В отладчике - это в самой оболочке, в которой программу делаю?
Если да , в отладчике не проверял, а проверял сразу на другом компьютере.

Если в мент отсылки письма отключить интернет, то программа падает с ошибкой: socket Error 10054

[Пепел Феникса]

которая версия инДи?
стандартная от семерки?(девятая ИнДи)
если да то обновляйте, в ней есть такое что она сама показывает ошибки и плюет на обработку исключений(у меня такое с idHTTP было)