TVmtMethodExEntryArray¶

type
  TVmtMethodExEntryArray = Array[0..65535] of TVmtMethodExEntry = packed record
private
  function GetParamsStart : PByte;
  function GetMethodVisibility : TVisibilityClass;
  function GetParam(Index: Word) : PVmtMethodParam;
  function GetResultLocs : PPParameterLocations;
  function GetStrictVisibility : Boolean;
  function GetTail : Pointer;
  function GetNext : PVmtMethodExEntry;
  function GetName : ShortString;
public
  ResultType : PPTypeInfo;
  CC : TCallConv;
  Kind : TMethodKind;
  ParamCount : Word;
  StackSize : SizeInt;
  NamePtr : PShortString;
  Flags : Byte;
  VmtIndex : SmallInt;
  CodeAddress : CodePointer;
  AttributeTable : PAttributeTable;
  property Name : ShortString;
  property Param[Index: Word]: PVmtMethodParam;
  property ResultLocs : PPParameterLocations;
  property Tail : Pointer;
  property Next : PVmtMethodExEntry;
  property MethodVisibility : TVisibilityClass;
  property StrictVisibility : Boolean;
private
  Params : Array[0..0] of TVmtMethodParam = packed record
  private
    function GetTail : Pointer;
    function GetNext : PVmtMethodParam;
    function GetName : ShortString;
  public
    ParamType : PPTypeInfo;
    Flags : TParamFlags;
    NamePtr : PShortString;
    ParaLocs : PParameterLocations;
    property Name : ShortString;
    property Tail : Pointer;
    property Next : PVmtMethodParam;
  end;
end
;