Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Try ... Except [D6, Win95/98]


123000 ©   (2003-01-09 16:33:00) 

try
ClientSocket1.Open;
except
on ESocketError do showmessage("Произошла ошибка!");
end;


При любой сокетной ошибке появляется сообщение, а как сделать чтобы оно появлялось только при ошибке "No address specified"???


Pat   (2003-01-09 17:23:00) [1]

Обрабатывай OnError, ErrorCode:=0


Delirium^.Tremens   (2003-01-09 16:38:00) [2]


try
ClientSocket1.Open;
except
on E: EXception do showmessage(String(E.ClassName));
end;

Это поможет узнать класс нужной ошибки


RWolf   (2003-01-09 16:38:00) [3]


try
ClientSocket1.Open;
except
on e:ESocketError do
if e.message="No address specified" then
showmessage("Произошла ошибка!")
else raise;
end;


Наверх

Титульная страница Поиск, карта сайта Написать письмо