Carlos,
Prueba
clear
close all
modify project YourProject nowait noshow
loProject = _vfp.Projects(1)
for each loFile in loProject.Files
if loFile.Type = 'K'
? loFile.Name
endif
endfor
"The five senses obstruct or deform the apprehension of reality."
Jorge L. Borges?
"Premature optimization is the root of all evil in programming."
Donald Knuth, repeating C. A. R. Hoare
"To die for a religion is easier than to live it absolutely"
Jorge L. Borges