Отлов ошибок в приложениях

[Des]

Помню вроде бы есть такая функция... Но название забыл...
К примеру недавно появилось исключение
socket error 10060 connection timed out что это и куда это я понимаю. Вопрос в том как
1) перехватить исключение и не показать его пользователю.
2) понять какое именно исключение что бы к примеру перезапустить indy клиент, иначе после исключения весь цикл крашиться....

Весьма благодарен =)

[Виталий Серов]

Этот код просто обрабатывает ошибку в случае возникновения
try
//действие
except
ShowMessage('Произошла ошибка');
end;

А этот показывает что за ошибка произошла
try
//действие
except
on E: Exception do
begin
Memo1.Lines.Add(e.Message); //тип исключения
end;

Блок "try ... except" и есть "такая функция"

[Des]

Спасибо большое! Будем пробовать!

[Des]

У меня чуть чуть проблемка
пишу:

procedure login;
begin
try
Form1.http1.Get(form_opt.edit_login_adress.Text);
except
on login : Exception do
if Pos('10061',login.Message) <> 0 then begin
ShowMessage('Ошибка № 10061 Не смогли подключиться к серверу');
end
else begin
ShowMessage('Message:'+login.Message+' InstanceSize:'+IntToStr(login.InstanceSize));
//квертиквертикверти
end;
end;

А проблема в том что, сначала 'ошибка' вылетает после if или else (в зависимости от Pos) а потом вызывается стандартная с красным крестиком и у меня получается две ошибки, только одна из них более менее вменяема. так как мне отключить стандартную :D?

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

если тестируешь из под Дельфи то стандартная отобразится(если не отключенны исключения)
иначе только твоя должна(если все верно)

запусти сам, ручками, а не через Дельфи

[Des]

Без разници.
Стандартное сообщение которое образуется после моего ShowMessage():
Socket error # 10061 Connection refused

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

так может ошибка идет после твоего сообщения?

[Des]

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

так может ошибка идет после твоего сообщения?

В смысле?
Сначала мое появляется:

ShowMessage('Ошибка № 10061 Не смогли подключиться к серверу');

А после нажатия кнопки Ok, стандартная:

Socket error # 10061 Connection refused

А мне нужно так чтоб стандартная не появлялась. Помню вроде бы в начале около {$R *.dfm} нужно что то еще прописать и тогда ошибок вообще не будет никаких. Но ведь это отключение всех ошибок, а мне нужно только от Indy

[JTG]

Может с http1 где-то дальше используется. Поставь бряк в начале блока try в процедуре login (F5) и попробуй законнектиться. Потом пройдись пошагово (F8) и смотри где что не так работает. И поменяй on login: Exception на on E: Exception, а то стрёмная какая-то конструцкия с именем процедуры

Кстати "Connection refused" куда более информативное сообщение, чем "Не смогли подключиться к серверу". Лучше оставлять стандартные сообщения об ошибках, или хотя бы точно переводить их. Пользователю-то в принципе пофиг что будет написано в окошке с красным крестиком - главное что программа не работает должным образом, зато потом на форумах появляется "Памагити у меня не работает пишет Программа не смогла подключиться", и поди-догадайся почему - сервер разорвал соединение, отклонил его или вообще интернет отключён или файрвол не выпустил

[Des]

JTG
Вот для того что бы юзер куда попало не стал жаловаться мне и нужно в перехваченых исключениях донести до юзера мол "Извините нет коннекта, возможные причины...". Выше предоставленный код конечно же будет переделываться и дорабатываться. а login - это для наглядности :D
Ну что ж =), я дальше пошел по F7 и что обнаружил ))). После этого блока, у меня идет еще один блок try, уже собственно с http1.Post, вот в нем то и вызывается мое второе исключение, потому как я программе запретил в файрволе лезть в инет. Но я то думал раз исключение, значит и процедура заканчивается оказалось после исключения мы побежали дальше в лес... Im onto itself fucking пора бороться с ленью

Огромное спасибо!