Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Popup Doesn't Close
Message
 
À
20/06/2006 11:58:56
James Blackburn
Qualty Design Systems, Inc.
Kuna, Idaho, États-Unis
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
01130251
Message ID:
01130284
Vues:
15
I had SHORTCUT in there. I didn't have RELATIVE

>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?
Everything makes sense in someone's mind
public class SystemCrasher :ICrashable
In addition, an integer field is not for irrational people
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform