Applescript / QuicKeys problem
Applescript / QuicKeys problem
- Subject: Applescript / QuicKeys problem
- From: Cameron Knowlton <email@hidden>
- Date: Tue, 28 May 2002 14:21:37 -0600
I'm hoping someone here can help me with an Applescript that *used* to run like a charm. now it runs sluggish.
Since upgrading either to my new G4 867 (from a G3 400) or to OS 9.2.2 (from 9.1), I've been experiencing a delay in a script used to copy text from one application to another (Quark 3.3.2r2 to FileMaker Pro 5.5v2).
The script still works, and in fact, works instantaneously if run from within Scripter. However, when I try to launch the Applescript via QuicKeys command, there is about a 2-3 second delay before it completes.
On my previous G3, the script ran quickly via QuicKeys. I might even recall perfect success on the new G4, the first time I tried. Since then, and certainly now, the delay is just enough to make the time savings worthless.
Not to mention my shiny brand new G4 is slower than my old G3, which is too much for this old Mac tech to stand.
I'm thinking maybe that QuicKeys is employing the Finder to manage the script execution, which I know can be slow. Is there anyway I can avoid using the Finder to manage the script? Perhaps I can command Scripter or Script Debugger, et al to do it? Perhaps QuicKeys Backgrounder is required?
Or am I off base here?
Help!! (I've listed the script below for reference.)
thanks in advance!
________________________________________________
Cameron Knowlton email@hidden
Internet Marketing Web Development
tel (403) 237-7254 Calgary, Alberta, Canada
ICQ 8209755
http://www.igods.com
________________________________________________
Marketing your business on the internet
-----------
set theHeadline to ""
set theAuthor to ""
tell application "QuarkXPress"
copy the text of selection to theSelection
tell current box of document 1
copy the text of story 1 to theHeadline
end tell
if (theSelection = "") then
else
if the last character of theSelection = " " then
tell selection
set theLength to length
set theSelection to text from character 1 to character theLength
end tell
end if
set theHeadline to (change theSelection into "[" & theSelection & "]" in theHeadline)
end if
end tell
tell application "FileMaker Pro"
tell document "stories"
create new record
set current record to last record
set cell "headline" of current record to theHeadline
end tell
end tell
-----------
_______________________________________________
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.