try this
on forceTitleCase whichMember
if whichMember.type = #text or whichMember.type = #field then
if CharToNum(whichMember.char[1]) >= 97 and
CharToNum(whichMember.char[1]) <= 122 then
whichMember.char[1] = NumToChar(CharToNum(whichMember.char[1]) - 32)
end if
else
Alert("Not a text or field member")
end if
end
lantz
-----Original Message-----
From: Michael von Aichberger
To: [EMAIL PROTECTED]
Sent: 2/10/02 7:11 PM
Subject: AW: AW: <lingo-l> converting lowercase to uppercase
Thanks Colin,
I just didn't scroll your message far enough!
It seems to work. Thanks again!
best wishes
Michael
-----Ursprungliche Nachricht-----
Von: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]Im Auftrag von Colin Holgate
Gesendet: Sonntag, 10. Februar 2002 20:53
An: [EMAIL PROTECTED]
Betreff: Re: AW: <lingo-l> converting lowercase to uppercase
>But how can I pass another character to the text field as the one that
was
>entered?
Can you go back and read the second half of my message. I already
showed you how to do this.
[To remove yourself from this list, or to change to digest mode, go to
http://www.penworks.com/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!]
[To remove yourself from this list, or to change to digest mode, go to
http://www.penworks.com/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!]
[To remove yourself from this list, or to change to digest mode, go to
http://www.penworks.com/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!]
