On 25/03/2014 03:23 PM, Sytze de Boer wrote:
Hi folk
In a new system I'm developing, I have a form with provision for a large
edit box
When a person is typing in this box, I want them to be able to insert a
date at the point where the cursor is.
So, in the *when* procedure, I have it where if the person presses F5, it
inserts the date.
The problem is, it inserts the date at the beginning of the Edit box
instead of where the cursor is. Can someone help me out with this ?



Sytze,

something like this should work in your edit box's KeyPress event:

LPARAMETERS nKeyCode, nShiftAltCtrl

#define F5 -4

IF m.nKeyCode = F5
this.Value = SUBSTR(this.Value, 1, this.SelStart) + TRANSFORM(DATETIME()) + SUBSTR(this.Value, this.SelStart + 1)
ENDIF

--

Frank.

Frank Cazabon


_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://mail.leafe.com/mailman/listinfo/profox
OT-free version of this list: http://mail.leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: http://leafe.com/archives/byMID/profox/[email protected]
** All postings, unless explicitly stated otherwise, are the opinions of the 
author, and do not constitute legal or medical advice. This statement is added 
to the messages for those lawyers who are too stupid to see the obvious.

Reply via email to