Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Listbox numeric values and speedsearch
Message
 
 
To
02/12/2004 12:31:17
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Environment versions
Visual FoxPro:
VFP 8 SP1
OS:
Windows XP
Network:
Windows XP
Database:
Visual FoxPro
Miscellaneous
Thread ID:
00966403
Message ID:
00966466
Views:
10
This message has been marked as the solution to the initial question of the thread.
Set the form's KeyPreview to .T. and change list1.KeyPress to:
	PROCEDURE KeyPress
		LPARAMETERS nKeyCode, nShiftAltCtrl
		DO CASE
			CASE nKeyCode = 13 .or. nkeyCode = -9	&& Enter or F10
				THISFORM.cmdOK.click
			CASE nKeyCode = 27	&& escape
				THISFORM.cmdCancel.click
			OTHERWISE
				DODEFAULT(nKeyCode, nShiftAltCtrl)
		ENDCASE
	ENDPROC
Mark McCasland
Midlothian, TX USA
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform