Hi Gregory

Yes, you can re-assign nKeyCode just like you can change any parameter.

I am busy programming just now, and a hour ago I needed to convert all ',' (comma) with '.' (point), and I use the following code which works without any problem:

..
CASE CHR(nKeyCode)=','
NODEFAULT
nKeyCode=ASC('.')
DODEFAULT()
..

BTW, I realize that you must add some more code to check for illegal values for nKeyCode, I just try to avoid the Keyboard command, I have learnt not to trust it always.



>Hi Tore,
>
>Have you tested this ?
>- I have doubts re reassigning nKeyCode
>- I have doubts re directly applying chr(nkeycode). ie what if nkeycode < 0
>
>
>
>>Hi
>>
>>A better solution for the keypress:
>>
>>do case
>> case chr(nkeycode) <> upper(chr(nkeycode))
>> NODEFAULT
>> nKeyCode=asc(upper(chr(nkeycode)))
>> DODEFAULT()
>>endcase
>>
>>
>>
>>
>>>>Hi everybody.
>>>>1. How can I make the text in the edit box ‘Justify’ (like MS Word)?
>>>>2. How can force the input in the edit box as upper case (like format ‘!’ for the text box)?
>>>>
>>>>Thanks and Regards,
>>>>Yashodhan.
>>>
>>>
>>>Yashodhan,
>>>
>>>(1) don;t think that is possible
>>>
>>>(2) since the ! format does not work, you could trap the char in the keypress event of the edit box. Code below seems to work
>>>

>>>** EditBox.KeyPress
>>>LPARAMETERS nkeycode,nshiftaltctrl
>>>
>>>do case
>>>case between(nkeycode, 0, 255)  and inlist(nShiftAltCtrl, 0, 1)
>>>	do case
>>>	case chr(nkeycode) <> upper(chr(nkeycode))
>>>		NODEFAULT
>>>		keyboard upper(chr(nkeycode)) PLAIN
>>>	endcase
>>>endcase
>>>