TInterfaceData

Declaration

Source position: typinfo.pp line 495

Type
TInterfaceData = packed record
private
  function GetUnitName : ShortString;
  function GetPropertyTable : PPropData;
  function GetMethodTable : PIntfMethodTable;
public
  property UnitName : ShortString;
  property PropertyTable : PPropData;
  property MethodTable : PIntfMethodTable;
  AttributeTable : PAttributeTable;
case TTypeKind of
tkInterface: (
public
  Parent : PPTypeInfo;
  Flags : TIntfFlagsBase;
  GUID : TGuid;
  UnitNameField : ShortString;
);
tkInt64: (
public
  dummy : Int64;
);
tkFloat: (
public
  FloatType : TFloatType;
);
end