Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Transforming string representation
Message
 
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00564145
Message ID:
00564729
Views:
20
Ok. Here's corrected version.
>Well, as Vlad pointed out, this would not work, if I have price33 as a variable. Besides, I wanted $100 and $1,000,000 for better readability. Anyway, thanks.
>
>I found some problems in this application, so I'm going to revise it anyway, and add this functionality in addition.
>
>BTW, what are good settings for numeric textbox, which should look like currency?
>
>Thanks in advance.
>
>>
>>lcStrIn = "between(price, 100,1000000)"
>>lcStrOut = ""
<b>llDelimiter = .T.</b>
>>FOR i=1 TO Len( lcStr)
>>	lcCurChar = Substr( lcStrIn, i, 1 )
>>	IF Isdigit(lcCurChar) <b>And llDelimiter</b>
>>		lcStrOut = lcStrOut + "$" + lcCurChar
>>	ELSE
>>		lcStrOut = lcStrOut + lcCurChar
>>	ENDIF
>>
        <b>llDelimiter = NOT (BETWEEN( UPPER(lcCurChar), "A", "Z") And lcCurChar = "_")</b>
>>
>>ENDFOR
--sb--
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform