Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Obtener nombres de archivo del dir...
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00811719
Message ID:
00811724
Vues:
13
>Hola a todos, quisiera llenar un listbox, con los nombres de archivos contenidos en un directorio de windows, es posible esto en VFP, alguien puede orientarme de como lograrlo ?...
>Como siempre mil gracias ....


Para darte una idea solamente puedes poner este codigo en el init de un listbox:
local laFiles(1), lnFiles, i

with thisform
	lnFiles	= adir(laFiles, 'C:\FOX\*.*')
	.AddProperty('aFiles(1)')
	dimension .aFiles(lnFiles)
	for i=1 to lnFiles
		.aFiles[i] = justfname(laFiles[i, 1])  && solo el nombre, sin path
	next i
endwith
with this
	if lnFiles >= 1
		.RowSource = 'thisform.aFiles'
		.RowSourceType = 5	&& Array
		.Sorted = .t.
*		.Style = 2			&& Listbox
		.ListIndex = 1
	endif	
endwith
Como veraz solo pongo el nombre en el combo, pero si quieres puedes agregarle la fecha, tamaño etc fácilmente
"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
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform