Hi,
I am a biginner in foxpro programming,i need your help. i made a popup menu when i select an option from the popup menu the popup will not disappear it resides under the calling interface. how can i disappear the popup menu please help me.
ln_bar = 1
DO WHILE .T.
DEFINE POPUP a1 ....
DEFINE BAR OF a1 ....
...
ON SELECTION POPUP a1 DEACTIVATE POPUP a1
ACTIVATE POPUP a1 BAR ln_bar
ln_bar = BAR()
RELEASE POPUP a1
DO CASE
CASE ln_bar = 1
DO program1
CASE ln_bar = 2
Do program2
.....
OTHERWISE
EXIT
ENDCASE
ENDDO
This routine will display a popupmenu from a database.
Complare your code to it and see if you can determine in your program what your are missing.
I suspect it is the release popup command
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.