Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Problems with Popups?
Message
From
29/07/2002 16:00:55
 
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00683169
Message ID:
00683679
Views:
28
>>Hi all,
>>I have some popups created with DEFINE POPUP PROMPT FIELD.
>>I'm having hard time with them in VFP7, they run fine in VF5 but in VFP7 it is like the froze.
>>Is this a known problem?
>
>Hi Maria,
>
>Can you post some code that illustrates the problem?

It was something simple like this:
PROCEDURE GetGender
   PARAMETERS lcGender
   PRIVATE lnActualWA,lnBar
   lnActualWA = SELECT()
   
   CREATE CURSOR cGenderPopup (todisp c(15), ccode c(1))
   INSERT INTO cGenderPopup (todisp,ccode) VALUES ("Unknown"," ")
   INSERT INTO cGenderPopup (todisp,ccode) VALUES ("Male","M")
   INSERT INTO cGenderPopup (todisp,ccode) VALUES ("Female","G")

   LOCATE FOR cGenderPopup.ccode = lcGender
   IF FOUND()
      lnBar = RECNO()
   ELSE
      lnBar = 1
   ENDIF

   DEFINE POPUP popGender PROMPT FIELD todisp ;
      TITLE 'SELECT Gender'
   ON SELECTION POPUP popGender DEACTIVATE POPUP popGender
   ACTIVATE POPUP popGender BAR lnBar REST AT ROW(),COL()

   RELEASE POPUP popGender EXTENDED
   lcGender = cGenderPopup.ccode
   USE
   SELECT(lnActualWA)

   RETURN lcGender
It is working fine now but it was freezing in VFP7.
I did some changes though, the original code named "desc" the description field.
"Desc" is a reserved word, so perhaps that was causing VFP7 to get confused.
However, I have seen the same behavior with popups in the VFP UI (i.e. the "field order" popup when modifying structure).
Thanks anyway.
Maria E. Zambrano
Previous
Reply
Map
View

Click here to load this message in the networking platform