Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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. А никак нельзя её добавить после?


Наверх

Титульная страница Поиск, карта сайта Написать письмо