Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
ListBox Woes
Message
De
11/08/2004 16:16:12
 
 
À
11/08/2004 15:52:52
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Divers
Thread ID:
00932469
Message ID:
00932476
Vues:
12
Hi Tracy,
I test it in VFP8 (SP1)
	Procedure lstletter.KeyPress
	Lparameters nKeyCode, nShiftAltCtrl

	If Lastkey() = 13 .Or. Lastkey() = -9
		nKeyCode = 13
		nShiftAltCtrl = 0
	Endif

	If nKeyCode = 13 .Or. nKeyCode = -9
		Nodefault
		Clear Typeahead
		Thisform.cmdok.Click
*!* Remove dodefault() from your keypress event code
*!*	Else
*!*		DoDefault()
	Endif
	Endproc
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform