列出記錄的元素\字段

Question

是否可以通過類型信息獲取記錄的元素或字段列表 類似於類的發佈屬性列表？

謝謝！

Answer 1

取決於您的delphi版本，如果您使用的是delphi 2010 o較新的版本，您可以使用新的rtti增強功能。

檢查這個代碼

program ProjectTestRtti; 

{$APPTYPE CONSOLE} 

uses 
    Rtti, 
    SysUtils; 

type 
    MyRecord=record 
    Field1 : integer; 
    Field2 : boolean; 
    Field3 : string; 
    end; 

var 
ctx : TRttiContext; 
t  : TRttiType; 
field : TRttiField; 
begin 
try 
    ctx := TRttiContext.Create; 
    for field in ctx.GetType(TypeInfo(MyRecord)).GetFields do 
    begin 
     t := field.FieldType; 
     writeln(Format('Field : %s : Type : %s',[field.Name,field.FieldType.Name])); 
    end; 
except 
    on E: Exception do 
     Writeln(E.ClassName, ': ', E.Message); 
end; 

    Readln; 
end.