>Hi
>
>I want to display someother characters as soon as user keys-in.
>
>E.g. If user keyis in "A" it should give "X".
> For "B" it should display "Z"
>
>This is because I want to create a text box which displays indian font.
>And when user's key's in "A" I will capture "A" and related character will
>be displayed in text box.
>
>In this How I will be able to take care of Backspace ?
>
>I tried kypress Event.
>But it doesn't work properly.
>
>Thanks in Advance.
>
>Ashish
lparameters nKeyCode, nShiftAltCtrl
if chr(nKeyCode)$'AB...'
nodefault
do case
case nKeyCode = asc('A')
keyboard 'X'
endcase
endif
Better you could maintain a string of replacement chars and use substr to get char. ie:
if chr(nKeyCode) $ myReplaceFromStr
nodefault
keyboard chr(asc(substr(myReplaceTo,nKeyCode)))
endif
Cetin