Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
On Key Label?
Message
De
17/09/1997 17:31:25
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Divers
Thread ID:
00050292
Message ID:
00050479
Vues:
38
>Hello,
>
>I have an EditBox to key in notes for a customer. I would like to automatically insert todays date when the customer hits CTRL+D or whatever. I have played around with a few things to no avail like on key label in the keypress event of the editbox.
>
>Any ideas?
>
>Paul

It's kinda a pain, but it works for me,

1. NAME THE FORM! As in "Do Form Frmname as MYFRM

2. In the form's init

ON KEY LABEL CTRL+D do dateproc

3. In your procedure file

procedure dateproc

myfrm.frmobj.editbox.value = date()
return
"You don't manage people. You manage things - people you lead" Adm. Grace Hopper
Pflugerville, between a Rock and a Weird Place
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform