Part of the Samples Website. 8/16/97.

samples.basicStuff.statesToClip

«Puts the names of all 50 states on the clipboard
«we used this to test Frontier with QuicKeys
«you can call this script from a macro, just enter:
«samples.basicStuff.statesToClip ()
local (appname, s, i)
appname = sys.frontmostApp ()
Frontier.bringToFront ()
s = ""
for i = 1 to 50
s = s + states.nthState (i) + char (13)
clipboard.putValue (s)
sys.bringAppToFront (appname)
return (true)


This page was last built on Sat, Aug 16, 1997 at 6:41:09 PM. You can download the current set of sample scripts from our FTP site. Dave