Object <- Text <- AddressInfo <- DataAddressInfo |
|
|
AddressData SetAddressData |
|
AddressSize BinaryType EditSteps |
| Field | Type | |
|---|---|---|
| AddressInfo: | flags: | Unsigned |
| image: | Image | |
| source: | FullContact | |
| sourceCRC: | Unsigned | |
| DataAddressInfo: | binaryType: | Unsigned |
| binaryData: | Buffer |
instance DataAddressInfo tag; flags: 0; image: nilObject; source: nilObject; sourceCRC: 0; binaryType: 0; binaryData: nilObject; end instance;
Define Class DataAddressInfo; inherits from AddressInfo; field binaryType: Unsigned, getter, setter; field binaryData: Buffer; attribute AddressSize: Unsigned, readOnly; operation AddressData(dataPtr: Pointer; var dataLength: Unsigned); operation SetAddressData(dataPtr: Pointer; dataLength: Unsigned); attribute BinaryType: Unsigned; overrides EditSteps; end class;