Форум: "Начинающим";
Текущий архив: 2016.01.03;
Скачать: [xml.tar.bz2];
Вниз
on E: Exception do в DataModule и консольное приложение Найти похожие ветки
← →
cr@nk © (2014-06-28 10:11) [0]В консольном приложении в DataModule пытаюсь отловить возможные exception
try
CodeSite.Send("Пробуем открыть файл", ParamStr(num_param));
xf.OpenFile(ParamStr(num_param));
except
CodeSite.SendError("Ошибка при открытии файла");
on E: Exception do
WRiteln(E.ClassName, ": ", E.Message);
end;
Компилятор ругается
[dcc32 Error] DMMainU.pas(288): E2003 Undeclared identifier: "on"
В то время как в главном модуле такой код компилируется без проблем:try
dmMain := TdmMain.Create(nil);
except
on E: Exception do
WRiteln(E.ClassName, ": ", E.Message);
end;
← →
Dennis I. Komarov © (2014-06-28 11:05) [1]on do begin
А уже дальше свою ересь...
← →
turbouser © (2014-06-28 11:40) [2]Жаль орешник не пополняется, достойный кандидат :)
← →
cr@nk © (2014-06-28 15:37) [3]
> on do begin
> А уже дальше свою ересь..
не помогло...
← →
turbouser © (2014-06-28 15:55) [4]
> cr@nk © (28.06.14 15:37) [3]
>
>
> > on do begin
> > А уже дальше свою ересь..
>
> не помогло...
уже не смешно
> except
> CodeSite.SendError("Ошибка при открытии файла");
> on E: Exception do
> WRiteln(E.ClassName, ": ", E.Message);
> end;
>
> except
> on E: Exception do
> begin
> CodeSite.SendError("Ошибка при открытии файла"); // тут бы еще e.exception, но ладно. сойдет.
> WRiteln(E.ClassName, ": ", E.Message);
< end;
> end;
← →
Dennis I. Komarov © (2014-06-28 18:05) [5]> уже не смешно
Ну надо было код требовать...
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2016.01.03;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.001 c
