... <- TitledWindow <- GadgetWindow <- InfoWindow <- PublicAddress <- ManualDialWindow |
|
|
AboutToHide Init ShowInfoTopic TouchTarget |
|
DialingSemaphore QuietAnnouncement |
instance ManualDialWindow 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; balloonDot: <0.0,0.0>; target: nilObject; info: nilObject; currentTopic: nilObject; infoFields: nilObject; currentAnnouncement: nilObject; dialingSemaphore: nilObject; dialListView: nilObject; quietAnnouncement: nilObject; end instance;
Define Class ManualDialWindow; inherits from PublicAddress; field dialingSemaphore: Object, getter, setter; // manual dialing semaphore field dialListView: Object; // list view to resize field quietAnnouncement: Announcement, getter, setter; attribute DialingSemaphore: Object; attribute QuietAnnouncement: Announcement; // the announcement that was announced quitely because of manual dialing overrides AboutToHide; // unblock the communications overrides Init; // set up dialing semaphore overrides ShowInfoTopic; // resize to fit dialing list overrides TouchTarget; // prevent closing from just any touch end class;