... <- Viewable <- Stamp <- Gadget <- ControlBarGadget <- CommandGadget |
|
|
Action |
Class CommandGadget defines no new attributes.
Fields
| 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 | |
| ControlBarGadget: | preferredSlot: | Unsigned |
instance CommandGadget 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;
preferredSlot: 0;
end instance;
Define Class CommandGadget;
inherits from ControlBarGadget;
overrides Action;
// if rule window, quick controls, or target window is open, hide them;
// else if option key is down, show quick controls;
// else show target window
end class;