Delphi 2010:新的RTTI,将propertyvalue设置为仲裁值
在这个问答内容中，我们讨论了Delphi 2010中的新RTTI（运行时类型信息）功能，以及如何将属性值设置为仲裁值。
首先，我们需要了解Delphi是一种面向对象的编程语言，用于开发Windows应用程序、Web应用程序和移动应用程序。Delphi 2010是该语言的一个版本，引入了许多新功能，包括新的RTTI功能。
RTTI是一种运行时类型信息技术，它允许程序在运行时获取对象的类型信息，以便在不知道对象类型的情况下动态地处理对象。新的RTTI功能使得Delphi 2010能够更好地支持面向对象编程，并提高了代码的可重用性和可扩展性。
在Delphi 2010中，可以使用新的RTTI功能来设置属性值。其中，将属性值设置为仲裁值是指在多个值中选择一个最佳的值，以便在不同的情况下都能得到最佳的结果。这通常是通过比较不同值的优缺点来实现的。
在Delphi 2010中，可以使用新的RTTI功能来实现将属性值设置为仲裁值的功能。例如，可以使用TRttiContext类来获取对象的类型信息，并使用TRttiProperty类来获取对象的属性信息。然后，可以使用TRttiEnumerationType类来获取枚举类型的信息，并使用TRttiInstanceProperty类来获取对象实例的属性信息。最后，可以使用TRttiMethod类来调用对象的方法，以便设置属性值。
总之，Delphi 2010中的新RTTI功能提供了更好的类型信息，并且可以用于设置属性值。在实际应用中，可以使用新的RTTI功能来提高代码的可重用性和可扩展性，并且可以更好地支持面向对象编程。
相关·内容
1回答
迭代成员变量
delphi、variables、delphi-2010、member、loops
有没有一种方法可以在D2010中迭代对象的成员变量，而不需要事先知道它们是什么？
浏览 0提问于2010-12-17得票数 6
回答已采纳
3回答
Delphi RTTI:获取属性的类
delphi、properties、delphi-2010、rtti
使用Delphi2010和RTTI，我知道如何获取对象的类类型，以及如何获取/设置对象属性的值和类型，但如何确定属性来自继承链中的哪个类？我想以不同于主类的方式使用基类的属性。
考虑下面的代码：
TClassBase = class(TObject)
published
property A: Integer;
end;
TClassDescendant = class(TClassBase)
published
property B: Integer;
end;
procedure CheckProperties(Obj: TObject);
var
ctx: TRttiCo
浏览 0提问于2012-07-06得票数 5
回答已采纳
1回答
在公共属性上使用GetPropInfo
delphi、rtti
据我所知，自Delphi2010以来，我不仅可以在发布的版本上使用RTTI，还可以在公共属性上使用RTTI。我有一个旧的Delphi7代码，它也可以在XE7下工作，但我仍然无法访问公共属性。 代码如下： uses
System.TypInfo;
procedure TForm1.GetPublicProp;
var
AColumn: TcxGridDBColumn;
APropInfo: PPropInfo;
begin
AColumn := MycxGridDBTableView.Columns[0];
APropInfo := GetPropInfo(AColumn
浏览 21提问于2019-04-07得票数 3
回答已采纳
1回答
通过RTTI访问TList类
delphi、rtti
我想实现列表类型属性的Add方法。但我得到了“无效的类类型”错误。有没有人知道这件事。
Company.pas
TEmployes = class
private
FLastName: String;
FFirstName: String;
public
property FirstName: String
read FFirstName write FFirstName;
property LastName: String
read FLastName write FLastName;
end;
TContext
浏览 3提问于2022-06-19得票数 0
回答已采纳
2回答
检查组件是否具有文本属性
delphi、delphi-xe
如何检查组件是否具有text属性。正如我所读到的，Rtti将是一个很好的解决方案，但我以前没有与它合作过。任何帮助都将不胜感激。
function HasTextProp(aControl: TControl): Boolean;
begin
Result := False;
if (aComponent is ?) then
Exit(True);
end;
var
ObjList: TObjectList<TControl>;
ObjIdx: Integer;
begin
ObjList := TObjectList<TControl&g
浏览 1提问于2018-02-02得票数 2
回答已采纳
1回答
如何在声明的TList中获取元素的类型
delphi、generics、delphi-xe3、rtti
我想知道是否有一种方法可以获取已声明的、但不是实例化的TList元素的类型。我可以捕获这样的对象属性的类：
MyList: TList<TMyObject> read FMyList;
MyRTTIProperty: TRttiProperty;
NewObject: TObject;
PropertyClass: TClass;
MyRttiProperty := MyRttiType.GetProperty('MyList');
PropertyClass := MyRTTIProperty.PropertyType.Handle.TypeData.
浏览 2提问于2014-06-12得票数 0
回答已采纳
1回答
TRttiMethod::Invoke使用
rtti、c++builder-2010
我想知道如何使用C++Builder 2010中TRttiMethod类的Invoke方法。
这是我的代码
Tpp *instance=new Tpp(this);
TValue *args;
TRttiContext * ctx=new TRttiContext();
TRttiType * t = ctx->GetType(FindClass(instance->ClassName()));
TRttiMethod *m=t->GetMethod("Show");
m->Invoke(instance,args,0);
Show没有参数，并且它是
浏览 4提问于2010-06-25得票数 3
3回答
如何确定是否实现了抽象方法？
delphi、delphi-xe
我使用的是一个非常大的没有源代码的delphi第三方库，这个库有几个带有抽象方法的类。我需要确定abtract方法何时由子类在运行时实现，以避免EAbstractError: Abstract Error并向用户显示自定义消息，或者使用另一个类。
例如，在这段代码中，我想在运行时检查是否实现了MyAbstractMethod。
type
TMyBaseClass = class
public
procedure MyAbstractMethod; virtual; abstract;
end;
TDescendantBase = class(TMyBaseClass)
浏览 0提问于2011-11-29得票数 10
回答已采纳
1回答
是否有任何Delphi版本可以发出包含tkUnknown的RTTI？
delphi、rtti
只是为了确保我没有忽略一个奇怪的边缘情况，因为我已经找到了一个产生这种情况的案例，但我想确保：
是否有可以发出包含tkUnknown作为的类型的Delphi版本？
如果是的话：
有参考文件吗？
哪种类型可以生产？
在当前的Delphi中，我能找到的唯一处理XE5的地方是，但是我还没有在RTL中找到一个代码路径来设置一个包含有tkUnknown作为的的TValue。
浏览 2提问于2014-03-01得票数 7
回答已采纳
3回答
是否可以使用RTTI以编程方式更改属性编写方法，以创建对象感知控件？
delphi、delphi-2009、delphi-xe2
我有一个业务对象，我想要更好地“连接”到我的UI。我已经看到了一些使对象具有数据意识的部分解决方案，但它们都涉及对我的业务对象的重大更改，包括额外的抽象层。
我一直在研究Delphi的新版本中改进的RTTI，它看起来非常有趣和有用。我想知道我是否可以使用它来以编程方式为所有属性注入新的写入方法。
这样做的方式是，在构建表单时，我的TEdit后代将被赋予对对象属性的引用。然后，TEdit将在该属性的属性中插入对其自身的引用(当然，还会在析构函数上删除自身，或者被赋予另一个引用)。TEdit还将确保属性的write方法被替换为在调用原始write方法后通知TEdit更改的方法。
这可行吗？最大的问
浏览 1提问于2012-02-22得票数 4
回答已采纳
2回答
如何循环类中的所有属性
delphi、class、properties、delphi-xe、rtti
我在我的Delphi应用程序中有一个类，我想用一种简单而动态的方法将所有的字符串属性重置为'‘，将所有的布尔值属性重置为False。据我所知，在web上应该可以创建某种循环，但我不清楚该怎么做。
浏览 0提问于2012-04-17得票数 12
回答已采纳
2回答
是否有可能得到类属性的索引？
delphi、properties
type
TMyClass = class
...
public
...
property P1: Integer Index 1 read GetInteger write SetInteger;
property P2: Integer Index 2 read GetInteger write SetInteger;
property P3: Integer Index 3 read GetInteger write SetInteger;
...
end;
是否有可能得到类属性的索引？例如，类似于
I := IndexOfPr
浏览 2提问于2013-10-31得票数 7
回答已采纳
2回答
在Delphi中，我怎样才能完全通过RTTI信息(即不使用任何实际对象实例)获得TObjectList<T>的子项目类型？
delphi、generics、rtti、tobjectlist
我正在使用RTTI实现任意Delphi对象流的通用代码，为了使其正常工作(更具体地说，为了使加载部分正常工作)，我需要在不使用任何实际对象实例的情况下以某种方式获得TObjectList<T>字段的子项类型。
不使用任何实际对象实例的明显原因是，在从流加载对象(仅基于要加载对象的类类型的知识)的情况下，在加载完成之前，我将完全没有任何实例--我宁愿只访问有关类的纯RTTI数据。
我希望能够加载这样一个类的一个例子是：
TTestClass = class(TObject)
public
test_list : TList<string>;
end;
我想要的是能够
浏览 5提问于2015-03-08得票数 0
回答已采纳
2回答
使用RTTI获取/设置子属性
delphi、delphi-xe、rtti
给定下面的代码片段，使用GetPropValue(MyComponent,'MySubComponent.Prop1')会引发EPropertyError异常。如何使用GetPropValue / SetPropValue检索或设置SubProperties的值？
Type
TMySubComponent = class(TInterfacedPersitent)
private
FProp1: Integer;
published
property Prop1: integer read FProp1 write FProp1;
end;
浏览 0提问于2011-10-04得票数 3
回答已采纳
2回答
循环访问Delphi 2010中的索引属性
delphi、properties、rtti、indexed
在Delphi2010中，有没有一种方法可以遍历任何类型的索引属性(比如TPageControl的页面)？
浏览 0提问于2011-10-31得票数 5
回答已采纳
2回答
扫描给定自定义属性的所有类
class、delphi、attributes、delphi-xe
我正在寻找一种方法，如果可能的话，可以在不使用RegisterClass()的情况下，扫描所有加载的类，以查找包含自定义属性的类。
浏览 0提问于2012-02-29得票数 3
回答已采纳
2回答
如何使用RTTI将事件处理程序分配给事件属性？
delphi、rtti、delphi-10.3-rio
我有一个具有几个事件属性的类，还有一个包含事件处理程序的类。在编译时，我不知道两个类的结构，在运行时，我只知道使用事件属性和事件处理程序之间的匹配。使用RTTI，我希望将事件处理程序分配给相应的事件属性，如何做到这一点？
我现在有这样的事情：
type
TMyEvent = reference to procedure(const AInput: TArray<string>; out AOutput: TArray<string>);
TMyBeforeEvent = reference to procedure(const AInput: TArray<
浏览 7提问于2020-10-01得票数 3
回答已采纳
2回答
如何用delphi和RTTI递归调用泛型过程？
delphi、rtti
我正在从事Delphi 10.2东京的工作，面临着以下情况： 假设我有以下步骤来验证对象的属性： procedure TGenericUnit.VerifyProps<T>(_AObj: T);
var
AContext: TRttiContext;
AType: TRttiType;
AProp: TRttiProperty;
begin
AType := AContext.GetType(T);
for AProp in AType.GetProperties do
if AProp.PropertyType is TObject t
浏览 37提问于2019-03-21得票数 0
回答已采纳
1回答
TControl (子)为TObject，并通过RTTI或SetXXXXXXProperty设置其父属性
delphi、properties、rtti
目前在delphi中对RTTI进行了一些研究。
出现的问题如下。
在本例中，我有一个TPanel组件(由代码创建，所有者通过invoke方法传递)，现在TPanel被强制转换到TObject (以保持我使用的方法是通用的)。
现在，我尝试通过SetXXXXXXProp函数设置该属性(XXXXXX是以下任一项(ord、variant、str、method.)基本上，我尝试了所有的SetProperty函数。)
但出于一些奇怪的原因，我收到的消息是，没有父属性。我如何设置我的父母财产？
所以我希望你们中的任何人都能给我一个指向正确方向的指针。
class procedure TComponents
浏览 1提问于2014-10-14得票数 0
回答已采纳
1回答
使用SetPropValue()和RTTI更改组件属性
delphi、firemonkey、rtti
我使用下面的代码在运行时创建的组件中使用RTTI和Delphi10.2东京来设置属性，因为示例的属性是TypeLine，因为我可以直接访问它。
Componente_cc是一个可以用任何类实例化的变量，无论是TLabel、TButton、TEdit.或者其他的。在下面的例子中，我将它实例化为TLine.
Var
Componente_cc: TControl;
procedure TfrmPrincipal.AlteraPropriedades;
begin
if IsPublishedProp(Componente_cc, 'Lin
浏览 0提问于2017-08-31得票数 2
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
实时音视频
对象存储
即时通信 IM活动推荐
腾讯云开发者
