Source position: typinfo.pp line 495
type TInterfaceData = packed record |
public |
property UnitName: ShortString; [r] |
property PropertyTable: PPropData; [r] |
property MethodTable: PIntfMethodTable; [r] |
AttributeTable: PAttributeTable; |
|
case TTypeKind of |
tkInterface: ( |
Parent: PPTypeInfo; |
Flags: TIntfFlagsBase; |
GUID: TGuid; |
UnitNameField: ShortString; |
); |
tkInt64: ( |
dummy: Int64; |
); |
tkFloat: ( |
FloatType: TFloatType; |
); |
end; |