delphi - TValue を TDateTime に変換する

Question

TDateTime で TValue を変換するにはどうすればよいですか?

AsInteger、AsDouble などのメソッドがありますが、TDateTime には何もありません。

var
  c : TRttiContext;
  t : TRttiType;
  f : TRttiField;
  fieldValue : TValue;
  fieldDateValue : TDateTime;
begin
  c := TRttiContext.Create;
    t := c.GetType(Self.ClassType);
    for f in t.GetFields do begin
      fieldValue := field.GetValue(Self);
      //convert the TValue in TDateTime
    end;
end;

Answer 1

具体的なAsXXXメソッド ( などAsInteger) は、一部の組み込み型への単なるショートカットです (また、特定の型の最適化を使用して実装されているものもあります)。ただし、 a から任意の型を取得するにTValueは、メソッドを使用できますAsType<T>。