Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Arrow Keys Don't Fire When, GotFocus, Click in Grid txtB
Message
 
À
11/02/2002 18:42:22
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00618623
Message ID:
00618854
Vues:
24
>>Hi Chuck,
>>
>>You will need code in your textbox's KeyPress event to accomplist what you want. FWIW, I would put the code in the grid (or the form) and reference the same code from both the Click() and the Keypress()
>>
>>pamela
>
>Hiya Chuck, Pamela;
>
>What if you have 30 something columns on the grid? Perhaps if you do it this way...
>
>_activeform.keypress
>
>/pIF TYPE("THISFORM.ActiveControl") == "O" AND UPPER(THISFORM.ActiveControl.BaseClass) <> "GRID"
> IF INLIST(LAST(), leftarrow, rightarrow... leftclick...)
> pamelasnewformmethod()
> ENDIF
> ENDIF
>ENDIF /p
>
>Of course, this would only allow for one grid. If you had to, you could explicitly name it...
>
>IF TYPE("THISFORM.ActiveControl") == "O" AND UPPER(THISFORM.ActiveControl.BaseClass) <> "GRID" .AND. THISFORM.ActiveControl.Name = mygridname
>
>Just a thought...
>
>Ric

Hi Ric,

I do like the idea of not having to code all the txtBoxes in the grid. However, I've never used code before like what you are proposing.

Where does the line _activeform.keypress go?

What does the == "O" mean in the line IF TYPE("ThisForm.ActiveControl") == "O"

TIA, Chuck
Chuck Henry
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform