1

レコード (任意の型) を取得する関数を定義し、そのフィールドを文字列として提供したいと考えています。私の問題は、レコードをパラメーターとして機能させるにはどうすればよいですか? パラメータを宣言する方法は?

Function GetRecordFields(MyRecord: any record type): string
var
  ctx   : TRttiContext;
  t     : TRttiType;
  field : TRttiField;
begin
 result := '';
 ctx := TRttiContext.Create;
 for field in ctx.GetType(TypeInfo(MyRecord)).GetFields do
 begin
   t := field.FieldType;
   result := result + ' | ' + Format('Field : %s : Type : %s',[field.Name,field.FieldType.Name]);
 end;
end;
4

1 に答える 1