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