Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Formatting EditBox
Message
From
15/03/2003 08:06:00
 
 
To
15/03/2003 07:45:31
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00766165
Message ID:
00766166
Views:
30
>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
Gregory
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform