RTTI und ShortString in records...

[himitsu]

Zitat:

Delphi-Quellcode:

  TRttiStringKind = (skShortString, skAnsiString, skWideString, skUnicodeString);
  
  TRttiStringType = class(TRttiType)
  private
    function GetStringKind: TRttiStringKind;
    function GetTypeSize: Integer; override;
    constructor Create(APackage: TRttiPackage; AParent: TRttiObject; var P: PByte); override;
  public
    property StringKind: TRttiStringKind read GetStringKind;
  end;

also IS TRttiStringType, .StringKind und dann .TypeSize