James
I guess I should have said I am in VFP6. I don't think I have access to project properties. I assume that is where you get "ActiveProject.HomeDir" from.

>Chuck
>
>This is what I do. I change the dir in foxpro to the project home dir.
>
>

>IF TYPE("_vfp.ActiveProject.name")<> "U"
>	lcHomeDir = _vfp.ActiveProject.HomeDir
>	CD (lcHomeDir)
>	_screen.Caption = "Microsoft Visual Foxpro " +_vfp.ActiveProject.name
>ENDIF 	
>
>

>
>>I could use some help with creating a projecthook that will set the default path and set path to default folders.
>>I am currently using the following code but I cannot catch the directory the project is opened from. Variables come in empty.
>>
>>

>>DEFINE CLASS projectpath AS projecthook
>>
>>	Height = 22
>>	Width = 23
>>	Name = "projectpath"
>>
>>	PROCEDURE Destroy
>>		set default to "O:\"
>>		set path to
>>	ENDPROC
>>
>>	PROCEDURE Init
>>		local lcDir,lcProjDir
>>		lcDir = allt(sys(5)+curdir())
>>		lcProjDir = allt(substr(curdir(),1,at('\',curdir(),2)-1))
>>		set default to &lcDir
>>		set path to "class,data,forms,icons,reports,help,prog,o:\"+lcProjDir+"\source\a blank oapp\class"
>>	ENDPROC
>>ENDDEFINE
>>