Object <- Viewable <- Stamp <- Gadget <- DrawerGadget |
|
|
CalcBoundsBox Draw Press Swallow Tap TargetChanged Touch |
|
Highlighted Highlighted |
| Field | Type | |
|---|---|---|
| Viewable: | superview: | Viewable |
| relativeOrigin: | Dot | |
| contentSize: | Dot | |
| viewFlags: | Flags | |
| labelStyle: | TextStyle | |
| color: | Unsigned | |
| altColor: | Unsigned | |
| shadow: | Shadow | |
| sound: | Playable | |
| Stamp: | image: | Image |
| Gadget: | target: | Object |
| canSwallow: | Boolean | |
| pullOut: | Boolean | |
| pullOutCopy: | Boolean | |
| showOccupied: | Boolean | |
| useStarburst: | Boolean | |
| setTarget: | Boolean | |
| useScaledText: | Boolean | |
| acceptTools: | Boolean | |
| acceptStationery: | Boolean | |
| DrawerGadget: | drawerImage: | Image |
instance DrawerGadget tag; relativeOrigin: <0.0,0.0>; contentSize: <0.0,0.0>; viewFlags: 0x00000000; labelStyle: nilObject; color: 0; altColor: 0; shadow: nilObject; sound: nilObject; image: nilObject; target: nilObject; canSwallow: false; pullOut: false; pullOutCopy: false; showOccupied: false; useStarburst: false; setTarget: false; useScaledText: false; acceptTools: false; acceptStationery: false; drawerImage: nilObject; end instance;
Define Class DrawerGadget; inherits from Gadget; field drawerImage: Image; overrides Draw; overrides CalcBoundsBox; overrides Highlighted, SetHighlighted; overrides Press, Swallow; overrides Tap, Touch, TargetChanged; end class;