TPascalTypeData

type TPascalTypeData = class(TObject)

protected

  function CreateProperty(); virtual;

public

  class function ExtractFirstType();

  constructor Create();

  destructor Destroy; override;

  procedure SortProperties;

  function IndexOfProperty();

  function IndexOfPascalProperty();

  function FindProperty();

  function AddProperty();

  function GetTypeName();

  function DependsOn();

  procedure AddDependency();

  function HasArrayProperty;

  function HasObjectProperty();

  property Dependency []: TPascalTypeData; [r]

  property DependencyCount: Integer; [r]

  property Properties []: TPascalPropertyData; default; [r]

  property PropertyCount: Integer; [r]

  property PascalName: string; [r]

  property SchemaName: string; [r]

  property InterfaceName: string; [rw]

  property InterfaceUUID: string; [rw]

  property ImplementationName: string; [rw]

  property SerializerName: string; [rw]

  property SerializeTypes: TSerializeTypes; [rw]

  property Schema: TJsonSchema; [r]

  property Sorted: Boolean; [rw]

  property Pascaltype: TPascalType; [r]

  property ElementTypeData: TPascalTypeData; [rw]

end;

TPascalTypeData

TObject