Re: Aplescript for changing case (again)
Re: Aplescript for changing case (again)
- Subject: Re: Aplescript for changing case (again)
- From: Richard 23 <email@hidden>
- Date: Tue, 9 Jan 2001 10:40:06 -0800
this one might be just a tiny bit more efficient.
-- ---------------------------------------------------------
-- Preprocessed by Convert Script 1.0d2
-- ---------------------------------------------------------
ToLower("HEllO DoodS!")
--> "hello doods!"
property ABC : "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
property xyz : "abcdefghijklmnopqrstuvwxyz"
on ToLower(theStr)
tell (a reference to AppleScript's text item delimiters)
set contents to ""
set theStr to theStr as string
repeat with thePos from 1 to 26
if theStr contains (ABC's item thePos) then
set {contents} to {ABC's item thePos}
set {contents} to {xyz's item thePos, theStr's text items}
set theStr to result's end as string
end if
end repeat
set {contents} to {""}
return theStr
end tell
end ToLower
-- ---------------------------------------------------------