Доброго времени суток, подскажите, в Lazarus работает модуль rtti? У

Question

Доброго времени суток, подскажите, в Lazarus работает модуль rtti? У

меня написано : warning test mode. Попробовал завести class, а потом перечислить property этого класса. Но цикл не отрабатывает. На некоторых форумах пишут, что пока не работает.

#lazarus #programming #russian

0

23.01.2024

12 ответов

58 просмотров

Денис Автор вопроса

type { TMyClass } TMyClass = class private FID : Integer; FNAME : string; procedure SetID ( AValue : Integer ) ; procedure SetNAME ( AValue : string ) ; public property ID : Integer read FID write SetID; property NAME : string read FNAME write SetNAME; end; procedure TForm1.Button1Click ( Sender : TObject ) ; var CN : TRttiContext; TT : TRttiType; PP : TRttiProperty; CC : TMyClass; s : String; begin CN := TRttiContext.Create; CC := TMyClass.Create; try TT := CN.GetType(CC.ClassInfo); for PP in TT.GetProperties do begin //СЮДА НЕ ВХОДИТ s := pp.Name; ShowMessage(s); end; finally CC.Free; CN.Free; end; end;

0

11 месяцев назад

Handatros

Денис
type { TMyClass } TMyClass = class priva...

попробуй published свойства

0

11 месяцев назад

Денис Автор вопроса

Handatros
попробуй published свойства

отлично!!!! работает!!! Подскажите, а TRTTIField нет?

0

11 месяцев назад

Handatros

Денис
отлично!!!! работает!!! Подскажите, а TRTTIField н...

когда я смотрел - не завезли. наверно и еще

0

11 месяцев назад

Денис Автор вопроса

Handatros
попробуй published свойства

Помогите еще с Prop.SetValue(Self ,TValue.From(fField.AsVariant)); Задача: перечислить все свойства и при совпадении имени присвоить значение поля из БД. Не знаю что правильно указать первым параметром SetValue. Если так как выше, то ошибка ACCESS VIOLATION.

0

11 месяцев назад

Handatros

Денис
Помогите еще с Prop.SetValue(Self ,TValue.From(fFi...

Позже гляну. Может быть ещё кто что скажет. Также можешь бота спросить, в rtti он шарит

0

11 месяцев назад

Денис Автор вопроса

Handatros
Позже гляну. Может быть ещё кто что скажет. Также ...

Бот шарит в RTTI также как и я... уровень детский сад, старшая группа

0

11 месяцев назад