Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.10.13;
Скачать: CL | DM;

Вниз

Может кто-нибудь с этим встречался.   Найти похожие ветки 

 
афвуд ©   (2003-09-23 13:42) [0]

Извините конечно, но я пишу в CBuilder"e, поэтому некоторым людям здесь непонятно будет, но если кто-нибуть с этим встречался в Дельфи и расскажет, то я уж найду как это переделать в Buildere.
Есть обьект, есть имя его свойства. Знаю что оно типа enum. Нужно определить все возможные значения этого свойства(например для у булевского всего 2 - true & false). Знаю, что надо юзать функции из файла TypInfo.hpp(это в Builder"e, не знаю как в Дельфе, но там это точно есть), но не знаю как справиться с этим.


 
Юрий Федоров ©   (2003-09-23 13:50) [1]

var p : PPropInfo;
TypeData : PTypeData;
Sl: TStrings;
j: Integer;
....
case P^.PropType^.Kind of
tkEnumeration : begin
Typedata:=GetTypeData(P^.PropType^);
for j:=Typedata^.MinValue to Typedata^.MaxValue do
Sl.Add(GetEnumName(P^.PropType^, j));
end;


 
MBo ©   (2003-09-23 13:50) [2]

В delphi Low, High и GetEnumName


 
Ketmar ©   (2003-09-23 13:55) [3]

получить PTypeInfo (GetTypeData, например), у него смотреть поле TypeData, каковое является вариантным. там всё есть.


 
Ketmar ©   (2003-09-23 13:57) [4]

ой. описАлся немного %-)


 
афвуд ©   (2003-09-23 14:06) [5]

спасибо попробую



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

Текущий архив: 2003.10.13;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.031 c
14-40662
Журнал "Здоровье"
2003-09-23 22:45
2003.10.13
Нам пишут


7-40702
Mitya_M
2003-07-25 17:11
2003.10.13
Использование Delphi приложений с > 2Gb памяти?


7-40687
mox
2003-07-29 15:38
2003.10.13
Как можно запустить программу до старта Windows?


14-40667
alxx
2003-09-23 16:30
2003.10.13
Найти файлы по маске и в них заменить одну строку на другую


1-40353
Vemer
2003-10-01 13:24
2003.10.13
Как сделать функцию доступной везде?