Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Lastkey() Loop within oTreeview: MouseUp
Message
General information
Forum:
Visual FoxPro
Category:
ActiveX controls in VFP
Title:
Lastkey() Loop within oTreeview: MouseUp
Miscellaneous
Thread ID:
00815757
Message ID:
00815757
Views:
74
Whilst using a simple TreeView connection to a Table all is fine.

I decided that a side menu activated by the Right-Click,(button=2) would be
good idea.

Yes, it all worked well until testing !

It was the USERs fault !

They decided to simultaniously click both the Left & Right mouse button at the same time. It stop the application, and my Treeview was all over the place.

I found the the Left&Right Mouse click created a LASTKEY()=27.

OK. So I trapped the problem. But how to I change the Lastkey() value ?


Sample

Object : oTrreview Procedure: MouseUp
*** ActiveX Control Event ***
LPARAMETERS button, shift, x, y

IF LASTKEY()==27

???

ENDIF

IF button==2
DO CASE
CASE ALLTRIM(datalog.type)=='EQUIP'
DO core_eq.mpr
RELEASE MENU core_eq
CASE ALLTRIM(datalog.type)=='FOLDER'
DO core_ut.mpr
RELEASE MENU core_ut
ENDCASE

RETURN

ENDIF

I have to release & clear but to no avail.

Am I missing something very basic in my old age ?
Next
Reply
Map
View

Click here to load this message in the networking platform