Форум: "Основная";
Текущий архив: 2002.11.14;
Скачать: [xml.tar.bz2];

Вниз

Как узнать какой компонент породил Exception?   Найти похожие ветки 

← →
NeyroSpace   (2002-11-05 14:00) [0]

Происходит централизованая обработка исключений:
procedure TMainForm.ProcessException(Sender: TObject; E: Exception);
begin
...
end;

Есть динамически создающийся компонент
Query := TIBQuery.Create(Self);
...
Query.SQL.Text=...
...
Query.Free;
В нем при выполнении запроса происходит исключение. Как из процедуры ProcessException() добраться до Query.SQL.Text?
При исключение Sender имеет класс TPanel...(?!)
Или Query к моменту обработки исключения уже разрушен?

---

← →
NeyroSpace   (2002-11-05 17:27) [1]

Никто не знает?

---

← →
Smithson   (2002-11-05 17:29) [2]

Texception + F1

---

← →
Digitman   (2002-11-05 17:35) [3]

try
.. чего-то там ...
except
on e: exception do
begin
ShowMessage(e.ClassName + #10 + e.message);
raise;
end;
end;

---

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

Форум: "Основная";
Текущий архив: 2002.11.14;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.008 c