To Tab:
This is the script I have on the mouse Up button:
global output, input
property Uppercase
on mouseUp me
UpperCase me
end
And this is the movie script:
global input, output
property Uppercase
on Uppercase me,input
-- input = ForceUppercase(input)
-- set the text of member "userData" to input
input = the value of field member "userData"
output = EMPTY
num = length(input)
repeat with i = 1 to num
theASCII = charToNum(input.char[i])
if theASCII = min(max(96, theASCII), 123) then
theASCII = theASCII - 32
if theASCII = min(max(63, theASCII), 91) then
put numToChar(theASCII) after output
end if
end if
end repeat
return output
end
"userData" is the name of the field that user's can enter data into. Again,
onmouseUp I'd like to take out all characters that aren't letters and change
the letters that exist to capitals & output just those capitals.
NT
_________________________________________________________________
Get your FREE download of MSN Explorer at http://explorer.msn.com
[To remove yourself from this list, or to change to digest mode, go to
http://www.penworks.com/LUJ/lingo-l.cgi To post messages to the list,
email [EMAIL PROTECTED] (Problems, email [EMAIL PROTECTED])
Lingo-L is for learning and helping with programming Lingo. Thanks!]
