... <- Viewable <- Box <- Window <- TitledWindow <- ConfirmationDialog |
|
|
CanExtendBottom Number |
| Field | Type | |
|---|---|---|
| Viewable: | superview: | Viewable |
| relativeOrigin: | Dot | |
| contentSize: | Dot | |
| viewFlags: | Flags | |
| labelStyle: | TextStyle | |
| color: | Unsigned | |
| altColor: | Unsigned | |
| shadow: | Shadow | |
| sound: | Playable | |
| HasBorder: | border: | Border |
| Window: | canCoexist: | Boolean |
| persistentWindow: | Boolean | |
| dontAutoExtend: | Boolean | |
| ignoreGrid: | Boolean | |
| closeAfterTouch: | Boolean | |
| closeBeforeTouch: | Boolean | |
| autoPosition: | Boolean | |
| noCloseBox: | Boolean | |
| downArrowVisible: | Boolean | |
| upArrowVisible: | Boolean | |
| rightArrowVisible: | Boolean | |
| leftArrowVisible: | Boolean | |
| autoMoveContents: | Boolean | |
| searchable: | Boolean | |
| customTitleColor: | Boolean | |
| scaleWindowTitle: | Boolean | |
| noBuiltInArrows: | Boolean | |
| noZoom: | Boolean | |
| autoCopyWindow: | Boolean | |
| TitledWindow: | titleColor: | Unsigned |
| titleHeight: | Micron | |
| dependents: | ObjectList | |
| ConfirmationDialog: | promptField: | TextField |
| target: | Object | |
| operationNumber: | OperationNumber | |
| sound: | Sound | |
| stamp: | Stamp | |
| yesButton: | Button | |
| noButton: | Button |
instance ConfirmationDialog tag; relativeOrigin: <0.0,0.0>; contentSize: <0.0,0.0>; viewFlags: 0x00000000; labelStyle: nilObject; color: 0; altColor: 0; shadow: nilObject; sound: nilObject; border: nilObject; canCoexist: false; persistentWindow: false; dontAutoExtend: false; ignoreGrid: false; closeAfterTouch: false; closeBeforeTouch: false; autoPosition: false; noCloseBox: false; downArrowVisible: false; upArrowVisible: false; rightArrowVisible: false; leftArrowVisible: false; autoMoveContents: false; searchable: false; customTitleColor: false; scaleWindowTitle: false; noBuiltInArrows: false; noZoom: false; autoCopyWindow: false; titleColor: 0; titleHeight: <0.0>; dependents: nilObject; promptField: nilObject; target: nilObject; operationNumber: nilOperation; sound: nilObject; stamp: nilObject; yesButton: nilObject; noButton: nilObject; end instance;
Define Class ConfirmationDialog; inherits from TitledWindow; field promptField: TextField; // text field that holds client-supplied prompt field target: Object, weak, getter; // object on which to call operation when yes button pressed field operationNumber: OperationNumber; // operation to call on target when yes button pressed field sound: Sound; // stores client-supplied sound to be played when yes button pressed field stamp: Stamp, weak; // stamp that uses client-supplied image when yes button pressed field yesButton: Button; // button that does the work when pressed field noButton: Button; // button that just closes the window when pressed overrides Confirm; // called when yes button pressed; calls operation on target // override rarely attribute Number: OperationNumber, readOnly; // returns operation number that yes button triggers // override rarely operation DeleteCurrentCardWithConfirmation(), safe, common; // call to use default text, image, sound for deleting the current card // override rarely operation PerformWithConfirmation(prompt: Text; target: Object; operationNumber: OperationNumber; sound: Sound; image: Image; forceConfirm: Boolean), safe, common; // call to present the user this window with the supplied information; // if option button is down or System_HighConfirmMode returns false, and forceConfirm is false, operation will be // performed immediately without displaying a window operation PerformWithConfirmationFancy(prompt: Text; target: Object; operationNumber: OperationNumber; sound: Sound; image: Image; buttonNames: Text; forceConfirm: Boolean), safe, common; // call to present the user this window with the supplied information; // if option button is down or System_HighConfirmMode returns false, and forceConfirm is false, operation will be // performed immediately without displaying a window overrides AboutToShow; // overridden to flush touches so leftover touches don't do dangerous things overrides CanAccept; // overridden to return false if current tool is writing or touch tool, or option key is not down; // otherwise returns inherited value to allow customizing overrides Hide; // overridden to hide any copies of self with same parameters overrides TypeKeys; // overridden to provide keyboard shortcuts for yes and no buttons overrides AboutToHide; // overridden to return to a default state so that un-shadowing is likely overrides CanExtendBottom; // overridden to return true overrides Notice; // overridden to hide self if target is destroyed #ifdef VALIDATE overrides Validate; // overridden to ensure prompt field can extend its bottom #endif operation MoveLowerSubviewsDownBy(lowerThan: Object; limit: Micron; moveDownBy: Micron), intrinsic; intrinsic MoveOneLowerSubviewDownBy(view: Viewable; var params: MoveOneLowerSubviewDownByParameters); operation SetUpConfirmationDialogViewables(image: Object; prompt: Object; buttonNames: Object), intrinsic; end class;