![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
ClassInfo у класса Exception
Priest © (2006-05-29 15:50:00)Делаю тестовый пример
program Project1;
{$APPTYPE CONSOLE}
uses
SysUtils;
var
E:Exception;
P:Pointer;
begin
E:=Exception.Create('erere');
P:=E.ClassInfo;
if P=nil then
Writeln('Pointer is nil!')
end.
Почему P=nil. Как такое может быть?
Сергей М. (2006-05-29 16:56:00) [1]Что ж .. Хозяин - барин.
Priest (2006-05-29 16:29:00) [2]Хочу сделать свой класс производный от Exception и в нём добавить свойства. А потом при возникновении ошибки - получить свойства. Но я уже разобрался. Я сделал свой производный класс и в нём включил M+.
Так что вопрос снимается
Сергей М. (2006-05-29 16:18:00) [3]
> ClassInfo
Она тебе зачем сдалась ? Поясни ..
Priest (2006-05-29 16:02:00) [4]Разобрался. Оказывается класс Exception билдется с директивой {$M-}, поэтому нет у него информации RTTI. А никак нельзя её добавить после?