Контроль над ошибками

← →
Morg (2003-09-21 15:06) [0]

Как аонтролировать ошибки ?
Пример:
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;

← →
Maxud © (2003-09-21 19:46) [1]

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

← →
Morg (2003-09-21 21:39) [2]

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

← →
Плохиш_ (2003-09-21 22:24) [3]

2Morg (21.09.03 21:39) [2]

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

http://delphimaster.net/view/6-1064166847/

Контроль над ошибками Найти похожие ветки