Hi,

THanks, but whilst your code may be safer mine *had* ,in this case, safely identified the correct/valid loProject object. It was the reference to loProject.Files that was failing....

Regards,
Viv

>I do not trust For each in VFP8
>
>I use
>

>*Get Link to this hook (THIS does not respond, must not be active since controled by code)
>*TAG is  THIS.TAG = SYS(2015) in Init event
>FOR lnLoop2 = 1 TO _VFP.PROJECTS.COUNT
> IF TYPE('_VFP.Projects(lnLoop2).PROJECTHOOK')='O';
>   AND !ISNULL(_VFP.PROJECTS(lnLoop2).PROJECTHOOK);
>   AND _VFP.PROJECTS(lnLoop2).PROJECTHOOK.TAG=THIS.TAG THEN
>  loProject = _VFP.PROJECTS(lnLoop2)
>  EXIT
> ENDIF &&TYPE('_VFP.Projects(lnLoop2) ...
>ENDFOR &&lnLoop2
>
>FOR lnFile = 1 TO loProject.FILES.COUNT
> loFile = loProject.FILES(lnFile)
>  ...
>

>
>for this problem.
>
>HTH
>
>Agnes
>>>>In the INIT of a project hook I have:

FOR EACH loFile IN APPLICATION.ACTIVEPROJECT.FILES

which has been working for years. Now I get a 'Property FILES not found' error on this line. The debugger shows Application.Project appears to be the valid and correct project; .FILES is an object but .FILES.Count gives 'Expression could not be evaluated'. This isn't project specific - I get the identical error in another project. Also, at least AFAICS, there's no #INCLUDE that could mess this up and if I step out of the code the project opens normally with all files listed.
>>>
>>>I am not sure about this issue either as I have never hit it and I use project hooks all the time. One thing to try is to clean the project up via the Project | Clean Up Project option. It might be a problem with a corrupt record in the project.
>>
>>Hi,
>>Didn't appear to be a problem with the project files either. After I'd reinstalled VFP the same project/hook ran perfectly.