Object <- ChooseableTool <- SelectTool <- ChooseSearchTool |
|
|
BeginTool TouchTarget |
Class ChooseSearchTool defines no new attributes.
Fields
| Field | Type | |
|---|---|---|
| ChooseableTool: | image: | Image |
| ChooseSearchTool: | searchField: | SearchField |
| touchSound: | Playable | |
| helpWindow: | Window |
instance ChooseSearchTool tag; image: nilObject; searchField: nilObject; touchSound: nilObject; helpWindow: nilObject; end instance;
Define Class ChooseSearchTool; inherits from SelectTool; field searchField: SearchField; // field in which to put image field touchSound: Playable; // sound played when target is touched field helpWindow: Window; // small window that tells user what to do; it is shown by BeginTool and hidden by TouchTarget overrides BeginTool; // closes all windows and opens the "tap something to find a similar image" window overrides TouchTarget; // snarfs the image from the tapped object, shoves it into the serach field, // and starts the search going. end class;