>Can I add buttons or menu items to VFP IDE? For example, say two buttons, one that implements "MODI COMM ?" and one that implements "MODI CLASS ?". Is this done with Project Hooks? Does someone know of a good example or white paper?
>
>Just curious.
>
>Thanks.

Thomas, if I could remember where I got these ideas from I would give attribution, but I'll just guess and say that Will Hertzenwerke published them.

In the Tools-Options-File Locations, under startup program I put "c:\jlkstart.prg". Here is that program:

* jlkstart.prg
SET SYSMENU TO DEFAULT
DO C:\JLKStart.MPR
SET
KEYBOARD "{CTRL+F2}"
*
FUNCTION l_gofox
	LPARAMETERS m.tcNaApp
	DO CASE
		CASE UPPER(ALLTRIM(m.tcNaApp)) == "GAMINGPROD"
			RESTORE MACROS FROM n:\Production\gaming\ppubvars.fky
			KEYBOARD "{ALT+F12}"
			KEYBOARD "{ENTER}"
			MODIFY WINDOW SCREEN TITLE "We're developing in "+VERSION()+" n:\Production\gaming"					
			KEYBOARD "{ENTER}"
			KEYBOARD "gcDataPath=gcDefaultDir+'\data\'"
			KEYBOARD "{ENTER}"
*!*	
		CASE UPPER(ALLTRIM(m.tcNaApp))=="GAMINGDEV"
			RESTORE MACROS FROM n:\test\gaming\dpubvars.fky
			KEYBOARD "{ALT+F12}"
			KEYBOARD "{ENTER}"
			MODIFY WINDOW SCREEN TITLE "We're developing in "+VERSION()+" n:\test\gaming"					
			KEYBOARD "{ENTER}"	
			KEYBOARD "gcDataPath=gcDefaultDir+'\data\'"
			KEYBOARD "{ENTER}"		
					
		CASE UPPER(ALLTRIM(m.tcNaApp))=="TIMERECS"
			KEYBOARD "CD L:\TimeRecs"
			KEYBOARD "{ENTER}"	
			KEYBOARD "SET PATH TO L:\TimeRecs;L:\TimerRecs\Data;L:\TimeRecs\Programs"		
			KEYBOARD "{ENTER}"
			KEYBOARD "SET DEFAULT TO L:\TimeRecs"
			KEYBOARD "{ENTER}"	
			MODIFY WINDOW SCREEN TITLE "We're developing in "+VERSION()+" L:\TimeRecs"		
						
		CASE UPPER(ALLTRIM(m.tcNaApp))=="HAP2000"
			KEYBOARD "CD M:\DEV_HAP\Hap2000"
			KEYBOARD "{ENTER}"	
			KEYBOARD "SET PATH TO M:\DEV_HAP\Hap2000;M:\DEV_HAP\Hap2000\Data"
			KEYBOARD "{ENTER}"
			KEYBOARD "SET DEFAULT TO M:\DEV_HAP\Hap2000"
			KEYBOARD "{ENTER}"
			MODIFY WINDOW SCREEN TITLE "We're developing in "+VERSION()+" M:\DEV_HAP\Hap2000"									
			
		CASE UPPER(ALLTRIM(m.tcNaApp))=="PHONEBILL"
			KEYBOARD "CD P:\"
			KEYBOARD "{ENTER}"
			KEYBOARD "SET PATH TO P:\"
			KEYBOARD "{ENTER}"
			KEYBOARD "SET DEFAULT TO P:\"
			KEYBOARD "{ENTER}"				
			MODIFY WINDOW SCREEN TITLE "We're developing in "+VERSION()+" P:\ "		

		CASE UPPER(ALLTRIM(m.tcNaApp))=="VMP"
			KEYBOARD "DO E:\VMP4\Path.prg"
			KEYBOARD "{ENTER}"
			KEYBOARD "SET DEFAULT TO E:\VMP4\VM"
			KEYBOARD "{ENTER}"	
			MODIFY WINDOW SCREEN TITLE "We're developing in "+VERSION()+" E:\VMP4\VM"		
												
		OTHER
			WAIT WINDOW "Better clean up the Menu!"
			
	ENDCASE

	CLEAR
	CLEAR PROGRAM
	RETURN .T.
ENDFUNC

Here is the MPR for the menu:

*       *********************************************************
*       *                                                         
*       * 07/14/2000           JLKSTART.MPR             10:56:16  
*       *                                                         
*       *********************************************************
*       *                                                         
*       * Author's Name                                           
*       *                                                         
*       * Copyright (C) 2000 Company Name                         
*       * Address                                                 
*       * City,     Zip                                           
*       *                                                         
*       * Description:                                            
*       * This PROGRAM was automatically generated BY GENMENU.    
*       *                                                         
*       *********************************************************


*       *********************************************************
*       *                                                         
*       *                      Menu Definition                    
*       *                                                         
*       *********************************************************
*


DEFINE PAD _05g0nfz1a OF _MSYSMENU PROMPT "\<Dev" COLOR SCHEME 3 ;
	KEY ALT+D, ""
ON PAD _05g0nfz1a OF _MSYSMENU ACTIVATE POPUP dev

DEFINE POPUP dev MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF dev PROMPT "GAMINGPROD"
DEFINE BAR 2 OF dev PROMPT "GAMINGDEV"
DEFINE BAR 3 OF dev PROMPT "TIMERECS"
DEFINE BAR 4 OF dev PROMPT "PHONEBILL"
DEFINE BAR 5 OF dev PROMPT "HAP2000"
ON SELECTION BAR 1 OF dev DO l_gofox IN  C:\JLKstart.prg WITH PROMPT()
ON SELECTION BAR 2 OF dev DO l_gofox IN  C:\JLKstart.prg WITH PROMPT()
ON SELECTION BAR 3 OF dev DO l_gofox IN  C:\JLKstart.prg WITH PROMPT()
ON SELECTION BAR 4 OF dev DO l_gofox IN  C:\JLKstart.prg WITH PROMPT()
ON SELECTION BAR 5 OF dev DO l_gofox IN  C:\JLKstart.prg WITH PROMPT()

The keyboard macros contain commands to set up each environment as needed.