Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
VFP Wish, ICASE()..
Message
From
24/10/1999 08:50:43
 
 
To
22/10/1999 20:32:51
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00280338
Message ID:
00280547
Views:
16
IMHO, it would make the code too hard to read in many cases.
>... to resemble iif(). Would anybody find this useful? Here's an example of what I mean, run this:
>
>
nNum = 3
>wait window icase(nNum = 1, '1', nNum = 2, '2', nNum = 3, '3')
>
>func icase
>lparam teCase1, teReturn1, ;
>	teCase2, teReturn2, ;
>	teCase3, teReturn3, ;
>	teCase4, teReturn4, ;
>	teCase5, teReturn5, ;
>	teCase6, teReturn6, ;
>	teCase7, teReturn7, ;
>	teCase8, teReturn8, ;
>	teCase9, teReturn9, ;
>	teCase10, teReturn10, ;
>	teCase11, teReturn11, ;
>	teCase12, teReturn12, ;
>	teCase13, teReturn13, ;
>	teCase14, teReturn14, ;
>	teCase15, teReturn15
>local leReturn
>
>do case
>	case teCase1
>		leReturn = teReturn1
>	case teCase1
>		leReturn = teReturn2
>	case teCase3
>		leReturn = teReturn3
>	case teCase4
>		leReturn = teReturn4
>	case teCase5
>		leReturn = teReturn5
>	case teCase6
>		leReturn = teReturn6
>	case teCase7
>		leReturn = teReturn7
>	case teCase8
>		leReturn = teReturn8
>	case teCase9
>		leReturn = teReturn9
>	case teCase10
>		leReturn = teReturn10
>	case teCase11
>		leReturn = teReturn11
>	case teCase12
>		leReturn = teReturn12
>	case teCase13
>		leReturn = teReturn13
>	case teCase14
>		leReturn = teReturn14
>	case teCase15
>		leReturn = teReturn15
>endcase
>
>return leReturn
>endfunc
>
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform