Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Create a menu and add items in a table to it from a table
Message
From
26/09/2006 15:17:27
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Menus & Menu designer
Title:
Create a menu and add items in a table to it from a table
Miscellaneous
Thread ID:
01157326
Message ID:
01157326
Views:
83
I want to add a menu of items in a table. I can put the items in an array.

What I need is a contrete example of how to add to a menu while the application in my start up program. If the user supplies a valid userid and password then code like the following is executed
	*-- Instantiate application object.
	RELEASE goApp
	PUBLIC goApp
	goApp = CREATEOBJECT("cApplication")

	appcaption = 'FTMS System, Visual Foxpro ' ;
					+ LEFT(TRANSFORM(VERSION(4),'99.99'),18)
					 
	goApp.SetCaption(appcaption)

	goApp.cStartupMenu=(gcDefDir)+"menus\menuftp"+ALLTRIM(STR(m.gnUserLev))
	goApp.cStartupForm=""
		
	*-- Show	application.
	goApp.Show
		
	*-- Release application.
	RELEASE goApp
The new menu should be created by a program TRANSDEF.PRG. In the above code where whould it be put to add the menu items. In it a put the name of the menus from a table into an array. After that what commands to I use and what order. A concrete example would be helpful.
Next
Reply
Map
View

Click here to load this message in the networking platform