Reverse Offset (was Getting the Folder name when using drag-&-drop Scripts)
Reverse Offset (was Getting the Folder name when using drag-&-drop Scripts)
- Subject: Reverse Offset (was Getting the Folder name when using drag-&-drop Scripts)
- From: Walter Ian Kaye <email@hidden>
- Date: Wed, 10 Mar 2004 20:48:02 -0800
At 03:53p -0700 03/10/2004, Easthope, John R didst inscribe upon an
electronic papyrus:
* File
copy (choose file) as string to thePath
copy text (((length of thePath) + 2) - ((offset of ":" in (reverse
of characters of thePath) as string))) thru (length of thePath) of
thePath to filename
Hey, I like that 'reverse' method. Now I've made a nice routine:
on ReverseOffset(ftxt, wtxt)
local ftxt, wtxt, ftxt_r, wtxt_r, o_r
set ftxt_r to (reverse of characters in ftxt) as string
set wtxt_r to (reverse of characters in wtxt) as string
set o_r to (offset of ftxt_r in wtxt_r as string)
if o_r is 0 then return 0
2 + (length of wtxt) - o_r - (length of ftxt)
end ReverseOffset
Only briefly tested just now, but seems to do right.
-boo
_______________________________________________
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.