... <- Panel <- Scene <- CardScene <- StackScene <- DirectoryLookupScene |
|
Class DirectoryLookupScene 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 | |
| HasBorder: | border: | Border |
| Scene: | isPlace: | Boolean |
| frozen: | Boolean | |
| useCardName: | Boolean | |
| visited: | Boolean | |
| blankTitle: | Boolean | |
| messageViewer: | Boolean | |
| suppressGrayLine: | Boolean | |
| stepBackWhenEmpty: | Boolean | |
| canDrawIn: | Boolean | |
| autoPencil: | Boolean | |
| sceneDrawer: | Boolean | |
| oneCardOnly: | Boolean | |
| ephemeral: | Boolean | |
| addToHistory: | Boolean | |
| suppressDateTime: | Boolean | |
| sceneDrawerBank: | Boolean | |
| locked: | Boolean | |
| expandMiniCards: | Boolean | |
| sceneTools: | Boolean | |
| heightResizable: | Boolean | |
| ignoreCardDefaultTool: | Boolean | |
| stepBackScene: | Scene | |
| stepBackSpot: | Viewable | |
| image: | Image | |
| additions: | SceneAdditions | |
| screen: | Buffer | |
| StackScene: | stack: | StackOfCards |
| cardNum: | Unsigned |
instance DirectoryLookupScene 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; isPlace: false; frozen: false; useCardName: false; visited: false; blankTitle: false; messageViewer: false; suppressGrayLine: false; stepBackWhenEmpty: false; canDrawIn: false; autoPencil: false; sceneDrawer: false; oneCardOnly: false; ephemeral: false; addToHistory: false; suppressDateTime: false; sceneDrawerBank: false; locked: false; expandMiniCards: false; sceneTools: false; heightResizable: false; ignoreCardDefaultTool: false; stepBackScene: nilObject; stepBackSpot: nilObject; image: nilObject; additions: nilObject; screen: nilObject; stack: nilObject; cardNum: 0; end instance;
Define Class DirectoryLookupScene; inherits from StackScene; inherits from ContactMergeClient; operation FindMatchingContact(contact: FullContact): FullContact; intrinsic MakeDirectoryCardFunctional(card: Card; listOfAddresses: ObjectList): LookupResultStack; // make the list, scene and stack that goes behind the returned // directory lookup card to make it functional (allowing you to view // cards, keep them, merge them, etc.) Returns the list. operation KeepDirectoryLookup(), safe; // check whether will be overwriting existing card; // if so, put up confirmation which calls KeepDirectoryLookupMerge operation KeepDirectoryLookupMerge(existing: FullContact); // wrapper routine for HandleUnambigousMerge with the right interface for // the confirmation dialog operation KeepDirectoryLookupSeparate(), safe; // wrapper for HandleDifferentNewCard with old interface overrides HandleAmbiguousMerge; // overridden to prompt the user for a choice in the ambiguous case unless he holds down the option key // returns nil; not the contact merged into overrides HandleUnambiguousMerge; // overridden to hop and delete things after the merge overrides HandleDifferentNewCard; // overridden to hop and delete things keeping this card overrides HandleWorthlessNewCard; // overridden to hop and delete worthless new card. // does nothing, returns nilObject overrides CloseScene; // overridden to pull card out so that when card is packed, // this scene doesn't point to bad object operation HopNameCardIntoAddresses(newFullContact: FullContact), intrinsic; // stores <newFullContact> into the name card and hops it to a window with // the rolodex in it end class;