Скачать: CL | DM;

Код ошибки   Найти похожие ветки 

← →
cautur ©   (2005-03-15 11:01) [0]

Добрый день, господа.

Помогите с такой проблемой, обработчик ошибок мне надо, точнее он есть, хотелось бы индифицировать ошибку и на определённые выдавать советы как от нее избавится.
Ни как не могу получить код ошибки, только текст.
Подскажите как быть?

---

← →
Erik1 ©   (2005-03-15 11:20) [1]

Ничего непонятно. SysErrorMessage(GetLastError()) - это описание ошибки.
GetLastError() - соответствено ее код.
Если реч идет о delphi exception то:
E.Message - собщение
E.HelpContext - ее код.

---

← →
cautur ©   (2005-03-15 11:32) [2]

У меня следующая конструкция

Application.OnException:=Form1.MyHandler;

procedure TForm1.MyHandler(Sender: TObject; E: Exception);
begin
Application.CreateForm(TForm1, Form1);
Form1.Memo1.Lines.Add(E.Message);
Form1.ShowModal;
end;

Я пробывал выводить и GetLastError() и E.HelpContext
Выводится 0. Вот в чем проблема у меня

---

← →
Anatoly Podgoretsky ©   (2005-03-15 11:54) [3]

Ни о каком коде и речи быть не может, ну где тут код
Exception.Create("Моя ошибка");

Читаем внимательно справку.

---

← →
cautur ©   (2005-03-15 12:01) [4]

Так бы и сказали использовать

Exception.CreateHelp

Ладно спасибо за помощь)

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.024 c