>Hi everybody,
>
>Do you know of a way to find all extra unneeded references in a monstrous project? Trying to build from the main program resulted in too many undefined functions/forms.
>

What I usually do is to create a cursor and/or a txt file containing all files from the old and new PJX, and then use a Diff tool like Beyond Compare to do the comparison.
I do that "manually" because while programmatically finding file names inside PRG,VCX,SCX,FRX,H etc. files might be easy, I believe it would get more complicated to track down constructions like "lcFile = ForceExt( 'myGreenBitmap'+Transform(m.lnCount), 'bmp' )


hth
-Stefan

IF VARTYPE(_vfp.ActiveProject) <> 'O'
	RETURN
ENDIF

*!*	CREATE CURSOR projectfiles (cfile c(254))
*!*	LOCAL loFile
*!*	FOR EACH loFile IN _vfp.ActiveProject.Files
*!*		INSERT INTO projectfiles VALUES (m.loFile.Name)
*!*	ENDFOR

CREATE CURSOR projectfiles (cfile c(254), cpath c(254))
INDEX ON (LEFT(cfile,120)+LEFT(cpath,120)) COLLATE 'machine' TAG x
LOCAL loFile
FOR EACH loFile IN _vfp.ActiveProject.Files
	INSERT INTO projectfiles VALUES ( ;
		JUSTFNAME(m.loFile.Name), ;
		JUSTPATH(m.loFile.Name) ;
		)
ENDFOR

GO TOP
BROWSE LAST NOWAIT