Вновь RTTI :). Помогите извлечь PTypeInfo для tkSet.

← →
Zergling (2003-07-30 07:30) [0]

Здраствуйте, уважаемые!
Есть Button1. У него есть свойсто Anchors.

var
P: PTypeInfo;
...
P := PTypeInfo(TypeInfo(TAnchors));

Такой способ работает. Но мне нужно извлечь PTypeInfo по имени свойства "Anchors". Как это дело провернуть. Уже совсем замался. Помогите пожалуйста. Заранее благодарствую.

← →
Skier (2003-07-30 08:39) [1]

А ты модуль TypInfo.pas внимательно рассматривал ?

← →
Zergling (2003-07-30 09:05) [2]

var
P: PTypeInfo;
S: PPropInfo;

S := GetPropInfo(Button3, "Anchors", [tkSet]);
GetTypeInfo(S.Index, S.NameIndex, P);

Чето не робит. Skier © ткни меня носом. Найти немогу.

← →
Skier (2003-07-30 09:12) [3]

Что требуется получить ? Конкретно.

← →
Юрий Зотов (2003-07-30 09:15) [4]

P := GetPropInfo(Button1, "Anchors")^.PropType^;

← →
Zergling (2003-07-30 09:24) [5]

Все работает по примеру Юрия Зотова.
Skier и Юрий Зотов спасибо что откликнулись :-).

← →
Юрий Зотов (2003-07-30 10:00) [6]

> Zergling

И все же - поизучайте TypInfo.pas на досуге. Много чего интересного найдете, чего даже и в хелпе нет.

Вновь RTTI :). Помогите извлечь PTypeInfo для tkSet. Найти похожие ветки