Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Utilitizing a Favorites Feature
Message
De
17/03/2001 00:34:58
 
 
À
16/03/2001 19:18:45
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire de menu & Menus
Divers
Thread ID:
00486184
Message ID:
00486212
Vues:
10
Hi Mike,

Been there, although the behavior I was trying to emulate was the last "n" documents accessed under the File menu pad, but I guess it's similar.

OK, here's some code. This assumes a "favorites table" and a Favorites menu pad in the system menu named padFavorites.
ON PAD padFavorites OF _MSYSMENU ACTIVATE POPUP popFaves
DEFINE POPUP popFaves MARGIN RELATIVE SHADOW COLOR SCHEME 4
nIndex=1  && Could be based on CNTBAR() if you have preset bars defined like
          && "Add to Favorites"
SELECT favorites
SCAN
   DEFINE BAR nIndex OF popFaves ;
   PROMPT favorites.orgname ;
   ON SELECTION BAR nIndex OF popFaves SomeObject.SomeMethod(PRMBAR("popfaves",nIndex))
ENDSCAN
You then have to decide where to put "someobject.somemethod" and wrtie code there to take the bar prompt and locate the actual org. record.




>I have an address book system that I am programming of names of organizations and their executives. I thought it would be cool to have a favorites list where someone adds an organization to the favorites list and then those favorites populate the favorites menu to quickly retrieve a favorite (Like IE's favorites list). Has anyone implements this type of thing? I would like to discuss with you how you went about doing that.
>
>Thanks.
------------------------------------------------
John Koziol, ex-MVP, ex-MS, ex-FoxTeam. Just call me "X"
"When the going gets weird, the weird turn pro" - Hunter Thompson (Gonzo) RIP 2/19/05
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform