Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Popup Doesn't Close
Message
From
20/06/2006 11:58:56
James Blackburn
Qualty Design Systems, Inc.
Kuna, Idaho, United States
 
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
01130251
Message ID:
01130275
Views:
18
I think it is the key word "shortcut" that makes the difference.

>Ok, that worked - although I'm not sure why. What does the RELATIVE clause have to
>do with the popup closing???
>
>
>
>
>>Try
>>
DEFINE POPUP popMonths shortcut RELATIVE FROM MROW(),MCOL()
>>
>>>In a label I have:
>>>
>>>This.Parent.MonthClicked(This.Parent)
>>>
>>>
>>>
>>>and in the MonthClicked routine I have:
>>>
>>>
>>>** PROCEDURE MonthClicked
>>>LPARAMETERS oThis
>>>
>>>  WITH This
>>>
>>>    DEFINE POPUP popMonths FROM MROW(), MCOL() MARGIN
>>>
>>>    DEFINE BAR 1 OF popMonths PROMPT "\<January"
>>>    DEFINE BAR 2 OF popMonths PROMPT "\<February"
>>>    DEFINE BAR 3 OF popMonths PROMPT "\<March"
>>>    DEFINE BAR 4 OF popMonths PROMPT "\<April"
>>>    DEFINE BAR 5 OF popMonths PROMPT "\<May"
>>>    DEFINE BAR 6 OF popMonths PROMPT "\<June"
>>>    DEFINE BAR 7 OF popMonths PROMPT "\<July"
>>>    DEFINE BAR 8 OF popMonths PROMPT "\<August"
>>>    DEFINE BAR 9 OF popMonths PROMPT "\<September"
>>>    DEFINE BAR 10 OF popMonths PROMPT "\<October"
>>>    DEFINE BAR 11 OF popMonths PROMPT "\<November"
>>>    DEFINE BAR 12 OF popMonths PROMPT "\<December"
>>>	
>>>    ON SELECTION POPUP popMonths oThis.MonthSelected()
>>>    ACTIVATE POPUP popMonths
>>>
>>>ENDWITH
>>>
>>>RETURN
>>>
>>>
>>>Here is the MonthSelected routine:
>>>
>>>
>>>** PROCEDURE MonthSelected
>>>
>>>  LOCAL nMonth, nDay, nYear, tDateTime, dDate
>>>
>>>  WITH This
>>>
>>>    nMonth  = BAR()
>>>    nDay    = ._nDay
>>>    nYear   = ._nYear
>>>		
>>>    tDateTime =	DATETIME(nYear, nMonth, nDay)
>>>    dDate     = TTOD(tDateTime)
>>>
>>>    .LoadCalendar(dDate)
>>>	
>>>  ENDWITH
>>>
>>>RETURN
>>>
>>>
>>>When a bar is selected, the code in the MonthSelected routine runs, but the popup stays
>>>open. What gives?
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform