Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
On Key Label?
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Miscellaneous
Thread ID:
00050292
Message ID:
00050479
Views:
31
>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
Previous
Reply
Map
View

Click here to load this message in the networking platform