>LOCAL laproclist[1],lavcxlist[1], lnRes, lnx >aaa= _vfp.ActiveProject > >FOR lnx = 1 TO aaa.Files.Count > dd=aaa.Files.Item[lnx] > DO CASE > CASE dd.type = "V" > lnRes = AVCXCLASSES(lavcxlist,JUSTFNAME(dd.name)) > *// Process here *Yes, I was thinking along these lines, but we need to extract the methods' names here... > CASE dd.type = "P" > lnRes = APROCINFO(laproclist,JUSTFNAME(dd.name)) > *// Process here > OTHERWISE > > ENDCASE >NEXT > >>