delphi – 在TDictionary中使用“class of”？

概述想法很简单 – 将带有类名的TDictionary用于TComponent for enum in vm.ClassNameToComponent do TLuaClassTemplate<enum.Value>.RegisterClass(vm.LS, PrintGlobal, container, vm); 用enum而不是 TLuaClassTemplate<TButton>.Regist 想法很简单 – 将带有类名的TDictionary用于TComponent

for enum in vm.ClassnameToComponent do TLuaClasstemplate<enum.Value>.RegisterClass(vm.LS,PrintGlobal,container,vm);

用enum而不是

TLuaClasstemplate<Tbutton>.RegisterClass(vm.LS,vm);TLuaClasstemplate<TPanel>.RegisterClass(vm.LS,vm);TLuaClasstemplate<TEdit>.RegisterClass(vm.LS,vm);...

并使用从xml中获取的类名来处理基于泛型的类.
但是有问题：

TClassnameToComponentDict = TDictionary<string,TComponent>;...ClassnameToComponent: TClassnameToComponentDict;...  ClassnameToComponent := TClassnameToComponentDict.Create;  ClassnameToComponent.Add('Tbutton',Tbutton);  ClassnameToComponent.Add('TPanel',TPanel);  ClassnameToComponent.Add('TEdit',TEdit);...

错误“不兼容的类型’TComponent’和’类Tbutton’”.
如何使用Tbutton等“类”作为通用值？

解决方法 您使用的类型

TDictionary<string,TComponent>

表示从字符串到类实例的映射.但是你想要一个从字符串到类的映射.所以你需要：

TDictionary<string,TComponentClass>

哪里

TComponentClass = class of TComponent

请注意,您不需要声明TComponentClass,因为它已在Classes单元中声明.

总结

以上是内存溢出为你收集整理的delphi – 在TDictionary中使用“class of”？全部内容，希望文章能够帮你解决delphi – 在TDictionary中使用“class of”？所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。