Le 20 mars 07 à 00:55 Matin, Brian Heibert a écrit: > Dim s as String > Dim i as Integer > Dim last as Integer > > s="Yahoo,Excite,Google,Ask.com,DogPile,AltaVista,HotBot,WebCrawler,Lyc > os > " > last= CountFields(s,",") > //Me.caption="Month" > //Me.captionalign=0 //flush left > Me.hasMenu=1 //menu on right > For i=1 to last > me.addRow NthField(s,",",i) > Next > > I have the above code to populate a bevelbutton menu > Now how do I do something with it say the user clicked on Yahoo > I want to do a htmlviewer1.loadurl "http://www.yahoo.com";
You can use a dictionary in your window. You first fill the dictionary. The keys are the text you show in your bevelbutton and the values are the URLs. Then, you fill the bevelbutton with every key you have in your dictionary. And, finally, when the user chooses a menu item in the bevelbutton, you find the corresponding URL in the dictionary. _______________________________________________ Unsubscribe or switch delivery mode: <http://www.realsoftware.com/support/listmanager/> Search the archives: <http://support.realsoftware.com/listarchives/lists.html>
