CanBeSearched <- HasDestination |
|
|
DontCopyToPackage SearchForObject ZoomToDestination |
|
Destination DestinationScene |
| Field | Type | |
|---|---|---|
| HasDestination: | destination: | Viewable |
Define Class HasDestination; mixes in with Viewable; inherits from CanBeSearched; field destination: Viewable, weak, setter; // actually always a Card or Scene attribute Destination: Viewable; attribute DestinationScene: Scene, readOnly; operation ZoomToDestination(); overrides DontCopyToPackage; overrides SearchForObject; // calls AddSearchCandidate with destination scene end class;