>i want to have an array of forms used in the project.
>how can i do it.
>
>for exemple to views used in the dbc : adbobjects(aall_views, "View")
Take a look at this message
Re: List Forms in project that are based on a given class Thread #
1489643 Message #
1489649local lnI
local array laForms[1]
lnI = 0
MODIFY PROJECT <your project>
oProject = _VFP.ActiveProject
FOR EACH oFile IN oProject.Files
IF oFile.Type = "K"
lnI = m.lnI + 1
dimension laForms[m.lnI]
laForms[m.lnI] = oFile.Name
ENDIF
ENDFOR
If it's not broken, fix it until it is.
My Blog