我可以枚举类中的常量吗?
我努力了
MyClass = class
const
c1 = 'c1';
c2 = 'c2';
c3 = 'c3';
end;
procedure GetConst();
var
ctx: TRttiContext;
objType: TRttiType;
field: trttifield;
s: string;
begin
ctx := TRttiContext.Create;
objType := ctx.GetType(MyClass.ClassInfo);
for field in objType.GetDeclaredFields do
s:= field.Name;
end;
我想要c1,c2,c2。
这可能吗?
编辑:
我想要做的是为一些外部符号定义一些键(对于 cad 程序)
symbol1=class
const
datafield1='datafield1';
datafield2='datafield2';
end;
symbol2=class
const
datafield21='datafield21abc';
datafield22='datafield22abc';
end
我不喜欢为此使用字段,因为我不喜欢将声明和初始化分开。
我无法使用枚举,因为我无法将值定义为字符串。
您无法通过 RTTI 获取这些常量。我怀疑你最好的解决方案是使用属性。这不仅对实际工作有好处,而且我认为这听起来像是解决您问题的更干净、更简单的解决方案。
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)