Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Menu Pads & Menu Bars
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
The Mere Mortals Framework
Divers
Thread ID:
00466760
Message ID:
00466816
Vues:
11
Doug et al,

Thanks for explanation on the sub pads. The amenus.mainmenus.loadchildren class shows the "activities" pad loading and there is no "Project" in the laChildren array, that's why I'm wondering where it comes from. Code below.

*:ClassLibrary ctmenus.vcx
*:ClassLibrary cmenus.vcx
*:ClassLibrary amenus.vcx

#DEFINE NUMCHILDREN 8
LOCAL laChildren[NUMCHILDREN,ALEN(this.aChildren,2)]

laChildren[1,CHILD_CLASS] = "CFilePad"
laChildren[1,CHILD_NAME] = "oFilePad"
laChildren[2,CHILD_CLASS] = "CEditPad"
laChildren[2,CHILD_NAME] = "oEditPad"
laChildren[3,CHILD_CLASS] = "ActivitiesPad"
laChildren[3,CHILD_NAME] = "oActivitiesPad"
laChildren[4,CHILD_CLASS] = "AdministrationPad"
laChildren[4,CHILD_NAME] = "oAdministrationPad"
laChildren[5,CHILD_CLASS] = "CNavigationPad"
laChildren[5,CHILD_NAME] = "oNavigationPad"
laChildren[6,CHILD_CLASS] = "CUtilitiesPad"
laChildren[6,CHILD_NAME] = "oUtilitiesPad"
laChildren[7,CHILD_CLASS] = "CWindowPad"
laChildren[7,CHILD_NAME] = "oWindowPad"
laChildren[8,CHILD_CLASS] = "CHelpPad"
laChildren[8,CHILD_NAME] = "oHelpPad"

DIMENSION this.aChildren[NUMCHILDREN,ALEN(laChildren,2)]
=ACOPY(laChildren,this.aChildren)

RETURN NUMCHILDREN
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform