Re: is there a thesaurus?
Re: is there a thesaurus?
- Subject: Re: is there a thesaurus?
- From: John Delacour <email@hidden>
- Date: Mon, 25 Aug 2003 14:23:55 +0100
At 8:51 pm +1200 25/8/03, Michael Kopp wrote:
What -- and how -- am I missing?
Eudora has had a Scripts menu and a Scripts folder since v. 3.1. You
have been missing a great deal for a long time! I will make this the
subject of another thread.
The following script will look up the first word in a Eudora
selection in Nisus Thesaurus <
http://www.nisus.com/Thesaurus/>. In
order to use this script and others that rely on scripting the
Graphical User Interface, **** you must have the future System Events
installed****. You can download this from:
http://www.apple.com/applescript/GUI/
If you have not selected anything in Eudora, the script will prompt
you to type a word.
The script should be saved in the Scripts folder and Eudora
relaunched. After relaunching, a toolbar button with optional
function key activation can be assigned to the script.
tell application "Eudora"
set _sele to selected text
try
set _word to first word of _sele
on error
set _btns to {"Let me type a word", "OK"}
tell me to set dd to display dialog "
Can't look up nothing in Thesaurus.
You must select a word in Eudora.
" with icon 0 buttons _btns default button 2
if button returned of dd contains "type" then
tell me to set dd to display dialog "
Type a word to look up in Nisus Thesaurus
" default answer "" with icon 1001
set s to text returned of dd
if s is not "" then
set _word to text returned of dd
else
return
end if
else
return
end if
end try
end tell
tell application "Nisus Thesaurus" to run
tell application "System Events"
tell process "Nisus Thesaurus"
set frontmost to true
tell window 1
set value of text field 1 to _word
click button 4
end tell
end tell
end tell
--JD
.
_______________________________________________
applescript-users mailing list | email@hidden
Help/Unsubscribe/Archives:
http://www.lists.apple.com/mailman/listinfo/applescript-users
Do not post admin requests to the list. They will be ignored.