Kent Belan wrote on 2013-08-13:
> Hello,
>
> I have been using this code for years and never had a problem until now.
>
> I put this code in the RightClick method of my textbox and editbox base
> class.
>
...
> So the user right clicks on the text box and the popup menu displays
fine.
>
> But if the user does not click on one of the popup options but rather
clicks
> on the DBI tree or list I get an error
> llNoTextSelected or llNothingToSelect not found.
>
> I have tried to put this code in the lostfocus of the text box, but it
does
> not help
> deactivate popup shortcut
> release popup shortcut
>
> Any ideas on how to fix this error ?
>
> Thanks,
> Kent
>
Kent,
Change
ACTIVATE POPUP shortcut
To
ON SELECTION POPUP shortcut lnBar = BAR()
ACTIVATE POPUP shortcut
RELEASE POPUPS shortcut
This should keep the shortcut active until it is clicked away, then clear
it.
If it doesn't, then you are having trouble with the ActiveX/BindEvent
related this.
You may need to call a method on the control that holds this code from the
RightClick event.
i.e. code like this
Procedure RightClick
This.HandleRightClick()
EndProc
Tracy Pearson
PowerChurch Software
_______________________________________________
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.
