Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
PROPER case for sentences
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00184375
Message ID:
00184392
Views:
19
>>>I'm in need of something that will take misc. text in a memo field and adjust it's case to be correct for sentences. As far as I know VFP will either put it in all upper case or all lower case or capitalize the first letter of each word. ... I need the equivalent of PROPER(), but one that is sentence based.
>>>
>>>Anybody know of something I can use? Did I miss something in VFP that does this?
>>>
>>You may use this code as function
>>
>>cString=" use it as parameter to function. hopefully it will work."
>>cNewstring=""
>>lCapitalize=.T.
>>FOR n=1 to len(cString)
>>	cChar=substr(cString,n,1)
>>	IF empty(cChar)
>>		cNewstring=cNewstring+cChar
>>		LOOP
>>	ENDIF
>>	IF lCapitalize=.T.
>>		cNewstring=cNewstring+upper(cChar)
>>		lCapitalize=.F.
>>		LOOP
>>	ENDIF
>>	IF asc(cChar)=46
>>		lCapitalize=.T.
>>	ENDIF
>>	cNewstring=cNewstring+cChar
>>ENDFOR
>>=messagebox(cNewstring)
>>
>
>Great code, but I suggest you look for !, ?, etc, besides just period.
>
>Cheers,

Yep. There is always room for improvements :).
Edward Pikman
Independent Consultant
Previous
Reply
Map
View

Click here to load this message in the networking platform