Текущий архив: 2003.11.17;
Скачать: CL | DM;
Вниз
Контроль над ошибками Найти похожие ветки
← →
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 и читаешь .. читаешь .. головой думаешь.
← →
Verg © (2003-09-22 08:40) [4]http://delphimaster.net/view/6-1064166847/
Страницы: 1 вся ветка
Текущий архив: 2003.11.17;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.03 c
