HOWTO: Using the ProjectHook Class to Create a Generic Project (192330)

MORE INFORMATION

1. Using the Windows Explorer, create a new folder.
2. Launch Visual FoxPro 6.0.
3. Set the default directory to the directory created in step 1.
   
4. Create a new ProjectHook Class:
   
   1. 
      
   2. From the File menu, choose New, and then select Program.
      
   3. Type the following code in the program window:
      **PROJECT HOOK TEST
      
   4. Save the program as c:\Ph_main.prg and close the program window.
      
   5. From the File menu, choose New and then select Class.
      
   6. When the New Class dialog box opens, type the following and then click OK:
      Class Name: MyHook
      Based On: ProjectHook
      Store In: HookClass
      
      
   7. When the Class Designer window opens, open the INIT method of the class and type the following code:
      

                  LOCAL cPrgPath
                  IF !FILE('PH_MAIN.PRG')
                     cPrgPath = _vfp.ActiveProject.homedir+"\PH_main.prg"
                     COPY FILE C:\PH_MAIN.PRG to (cPrgPath)
                     _VFP.ActiveProject.Files.Add(cPrgPath)
                  ENDIF
      							

      
      
   8. Save the class and close the Class Designer.
      
   9. Configure Visual FoxPro to use the ProjectHook class. a. From the Tools menu, choose Options, and then click the Projects tab. b. Select the Project Class check box on the bottom of the Projects tab. c. In the text box next to the Project Class check box, enter the path to the class created in step 4.
   Now test the ProjectHook class by creating a new project. Note that when the project is created, the MyHook class is instantiated and the Ph_main.prg file is copied to the currently selected directory and included in the newly created project.