GetFieldList

function GetFieldList(

  TypeInfo: PTypeInfo;

  TypeKinds: TTypeKinds;

  out FieldList: PExtendedFieldInfoTable;

  Sorted: Boolean = True;

  Visibilities: TVisibilityClasses = [];

  IncludeInherited: Boolean = True

):LongInt;

function GetFieldList(

  TypeInfo: PTypeInfo;

  out FieldList: PExtendedFieldInfoTable;

  Visibilities: TVisibilityClasses = [];

  IncludeInherited: Boolean = True

):SizeInt;

function GetFieldList(

  AClass: TClass;

  out FieldList: PExtendedFieldInfoTable;

  Visibilities: TVisibilityClasses = [];

  IncludeInherited: Boolean = True

):Integer;

function GetFieldList(

  Instance: TObject;

  out FieldList: PExtendedFieldInfoTable;

  Visibilities: TVisibilityClasses = [];

  IncludeInherited: Boolean = True

):Integer;