Referenz auf Recordtyp, wie TClass für Klassen

[himitsu]

Wenn ich das so richtig seh, bekonnst du hierbei nicht mehr Infos, als mit der "alten" RTTI ... es ist nur etwas "einfacher".

Delphi-Quellcode:

TTypeInfo = record
  Kind: TTypeKind;
  Name: ShortString;
  {TypeData: TTypeData}
end;

TPropInfo = packed record
  PropType: PPTypeInfo;
  GetProc: Pointer;
  SetProc: Pointer;
  StoredProc: Pointer;
  Index: Integer;
  Default: Longint;
  NameIndex: SmallInt;
  Name: ShortString;  // << das dürfte dein prop.PropertyType.Name sein
                      // [edit] nee, isses wohl doch nicht :gruebel:
end;

.Name liefert den Namen des Property

.PropType^.Name liefert den Namen des Types.
.PropType^.Kind müßte tkRecord sein
und eventuell kommst du über das (versteckte) .PropType^.TypeData an weitere Informationen zum Aufbau des Records ran.