Страница 1 из 1

ДВА СИМВОЛА УСПОКОЯТ СИСТЕМУ

Добавлено: 22 мар 2007, 01:54
timself
Случается, что программа генерирует несметное количество системных сообщений о всяких незначительных, одну её беспокоящих ошибках, вместо того, чтобы попросту их игнорировать. Заставить её это делать можно (сам придумал) например так:
В событии OnException компонента ApplicationEvents пишем всего два символа: //
Аминь.

Код: Выделить всё

procedure TForm1.ApplicationEventsException(Sender: TObject; E: Exception);
begin
  //
end;
PS: Такие "левые" ошибки возникают, например, если вводить в Edit буквы вместо цифр, а к событию OnChange привязаны перевод в integer и арифметика.

Re: ДВА СИМВОЛА УСПОКОЯТ СИСТЕМУ

Добавлено: 22 мар 2007, 04:38
Naeel Maqsudov
А теперь представим на минутку, что где-то в цикле, в момент, определяющий условие выхода возникает исключение. Что произойдет?
Ну да! Эти два символа "успосоят систему" навсегда.

Нет. Исключения надо "проглатывать" не все подряд, А ВЫБОРОЧНО.
(См.параметры Sender и E)

Re: ДВА СИМВОЛА УСПОКОЯТ СИСТЕМУ

Добавлено: 22 мар 2007, 04:43
SergeyS
А try ... except религия не позволяет использовать?

Re: ДВА СИМВОЛА УСПОКОЯТ СИСТЕМУ

Добавлено: 23 мар 2007, 02:02
timself
Ну, ну, будет вам...это же просто что-то вроде хумора.
PS: А так будет еще короче ВСЕГО ОДИН СИМВОЛ

Код: Выделить всё

begin
  [color=navy]//
[/color]end;

Re: ДВА СИМВОЛА УСПОКОЯТ СИСТЕМУ

Добавлено: 23 мар 2007, 02:05
timself
О, блин, не то написал. Вот так:

begin
;
end;