Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.163 Beiträge
 
Delphi 12 Athens
 
#3

Re: Referenz auf Recordtyp, wie TClass für Klassen

  Alt 8. Mär 2010, 11:10
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.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat