| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как узнать какой компонент породил Exception?
NeyroSpace © (2002-11-05 14:00:00)Происходит централизованая обработка исключений:
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 к моменту обработки исключения уже разрушен?
Digitman (2002-11-05 17:35:00) [1]try
.. чего-то там ...
except
on e: exception do
begin
ShowMessage(e.ClassName + #10 + e.message);
raise;
end;
end;
Smithson (2002-11-05 17:29:00) [2]Texception + F1
NeyroSpace (2002-11-05 17:27:00) [3]Никто не знает?
| |
