RE:Simplest question: How to control some values in Input dialog box
- To: mathgroup at smc.vnet.net
- Subject: [mg67782] RE:Simplest question: How to control some values in Input dialog box
- From: abdou.oumaima at hotmail.com
- Date: Fri, 7 Jul 2006 07:13:11 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Hello David Park, As usual you are so special and your code is also very nice: ******** Code's David Park ********** SetMyParameters::badCN = "CN must be a positive integer. You entered ``"; SetMyParameters::badc = "You must have 0 < c < 0.9. You entered ``"; SetMyParameters[CNin_, cin_] := Module[{gooddata = True}, Clear[CN, c]; If[¬ (IntegerQ[CNin] \[And] CNin > 0), Message[SetMyParameters::badCN, CNin]; gooddata = False]; If[¬ 0 < cin < 0.9, Message[SetMyParameters::badc, cin]; gooddata = False]; If[gooddata, CN = CNin; c = cin;] ] *********** But Sorry does not work and my program break. How to resolve this please.