Subversion Repositories Applications.papyrus

Rev

Rev 431 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 431 Rev 875
Line 5... Line 5...
5
			<constructor>
5
			<constructor>
6
				this.keypress = CheckIsDigit ;
6
				this.keypress = CheckIsDigit ;
7
			</constructor>
7
			</constructor>
8
			<method name="CheckIsDigit">
8
			<method name="CheckIsDigit">
9
				<body>
9
				<body>
-
 
10
					<![CDATA[
10
					var iCode = keyCode ;
11
					var iCode = keyCode ;
Line 11... Line 12...
11
 
12
 
12
					var bAccepted =
13
					var bAccepted =
13
						(
14
						(
14
							( iCode >= 48 && iCode <= 57 )		// Numbers
15
							( iCode >= 48 && iCode <= 57 )		// Numbers
15
							|| (iCode >= 37 && iCode <= 40)		// Arrows
16
							|| (iCode >= 37 && iCode <= 40)		// Arrows
16
							|| iCode == 8						// Backspace
17
							|| iCode == 8											// Backspace
17
							|| iCode == 46						// Delete
18
							|| iCode == 46										// Delete
Line 18... Line 19...
18
						) ;
19
						) ;
-
 
20
 
19
 
21
					return bAccepted ;
20
					return bAccepted ;
22
					]]>
21
			   </body>
23
				</body>
22
			</method>
24
			</method>
23
		</implementation>
25
		</implementation>
24
		<events>
26
		<events>