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

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

Контроль над ошибками [D6, Win2k, WinXP]

Morg ©   (2003-09-21 15:06:00) 

Как аонтролировать ошибки ?
Пример:

procedure TForm1.Button1Click(Sender: TObject);
begin
ClientSocket1.Active := true;
end;


Если нет соединения машина выкидывает ошибку:
Asynchronous socket error 10061;
Знаю надо копать в сторону try except, но как не знаю.


procedure TForm1.Button1Click(Sender: TObject);
begin
try
ClientSocket1.Active := true;
except
on а что дальше, не знаю ?! :(
end;


---

Verg   (2003-09-22 08:40:00) [1]

http://www.delphimaster.ru/cgi-bin/forum.pl?id=1064166847&n=4

---

Плохиш_   (2003-09-21 22:24:00) [2]

2Morg (21.09.03 21:39) [2]

Ставишь курсор на except, нажимаешь F1 и читаешь .. читаешь .. головой думаешь.

---

Morg   (2003-09-21 21:39:00) [3]

А как реагировать на конкретные ошибки. Знаю можно, но не знаю что за команда это делает.
Что вроде этого:

try
// защищаемый код
except
on ??? - вот тут надо что то написать, что б реагировал на ошибку 10061
end;


---

Maxud   (2003-09-21 19:46:00) [4]

Я делаю так:

try
// защищаемый код
except
ShowMessage("Ошибка!");
end;


---

Наверх