我可以从字符串中获得一个PTypeInfo吗？

Question

这可能将是一个“不”，但有什么办法，我可以使用Delphi的RTTI，无论是老派或2010扩展RTTI，在包含类型的名称的字符串传递的具体名称一个枚举类型，并让它给我这种类型的PTypeInfo？我查看了RTTI.pas和TypInfo.pas，我没有看到任何可以做到的功能，但我可能错过了一些东西。

我在找什么：

var 
    info: PTypeInfo; 
begin 
    info := GetTypeInfoFromName('TComponentStyle'); 
end; 

或类似的东西。事情是，枚举类型的名称将被传入;它在编译时不会被知道。

Answer 1

下应与限定名工作。

合格的名称是：UnitName.TypeName

type 
ETypeNotFound = class(Exception); 

function GetTypeInfoFromName(aTypeName : String) : pTypeInfo; 
var 
C : TRttiContext; 
T : TRttiType; 
begin 
T := C.FindType(aTypeName); 
if Not Assigned(T) then 
    raise ETypeNotFound.CreateFmt('Type %s is not found',[aTypeName]); 

result := T.Handle; 
end;