Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Proper() function
Message
From
11/07/2003 02:19:57
Samir Chheda
Remittag Software Pvt. Ltd.
Mumbai, India
 
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00808359
Message ID:
00809113
Views:
29
Thanx Sergey

I am sorry for replying late.

Actully, the snippet which you gave me, would make only the first Alphabet of the string Capital.

I have written a small loop which searches for a dot(.) in the string and changes the case to UPPER for the next character after the dot.

Anyways, Thanx again.

Local lcNewText
lcNewText = ""
tcText = Ltrim(tcText)
For iLen = 1 To Getwordcount(tcText,'.')
cTmp = lcNewText
lcNewText = Lower(Substr(tcText,Len(lcNewText)+1,Iif(Atc('.',Right(tcText,Len(tcText)-Len(lcNewText)+1))=0,Len(tcText)-Len(lcNewText),Atc('.',Right(tcText,Len(tcText)-Len(lcNewText)+1)))))
lcNewText = Space(1) + Upper(Left(Alltrim(lcNewText),1)) + Substr(lcNewText,2)
lcNewText = cTmp + lcNewText
Endfor

Return Ltrim(lcNewText)



Regards,
Samir
Attitude Determines Altitude
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform