We don't use "lastkey". We use this to trap each key as it is pressed, and
here's some examples of the code that would follow:
GETPROPERTY keyword TEXTVALUE vkeyword
IF vkeyword = ' ' OR vkeyword IS NULL OR vkeyword = (CHAR(32)) OR vkeyword =
(CHAR(255)) THEN
RETURN
ENDIF
IF vkeyword = '*' OR vkeyword = '%' THEN
-- Define Where Clause
SET VAR vwhereclause = (.vwheresearch + ' IS NOT NULL')
PROPERTY lv_customers refreshlist 'TRUE'
PROPERTY lv_customers set_focus 'TRUE'
GOTO done
ENDIF
-- Need to replace any apostrophe with double single quotes
SET VAR vkeyword = (SRPL(.vkeyword, CVAL('QUOTES'), (CVAL('QUOTES') +
CVAL('QUOTES')),0 ))
Karen
-----Original Message-----
From: classicmicro . <[email protected]>
To: rbase-l <[email protected]>
Sent: Fri, Jan 13, 2017 4:01 pm
Subject: [RBASE-L] - On Keypress EEP not working
I had a desire to enable an entry field auto popup lookup based on a specific
key pressed in that field I would change the properties of the lookup, etc. I
enable On Keypress EEP and put code looking at Lastkey(0) for example but the
key press is recognized intermittently. In otherwords, putting code for
diagnostic purposes just to display the trapped keystroke via a PAUSE
statement, I might press 3 or 4 keys and nothing is recognized (not triggering
the EEP), then it is for a few keystrokes.
I'm using 9.5 update 5.
Any thoughts?
--
You received this message because you are subscribed to the Google Groups
"RBASE-L" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to [email protected].
For more options, visit https://groups.google.com/d/optout.
--
You received this message because you are subscribed to the Google Groups
"RBASE-L" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to [email protected].
For more options, visit https://groups.google.com/d/optout.
