Buscar y Seleccionar un archivo

Post Reply
dobfivewin
Posts: 325
Joined: Sun Feb 03, 2008 11:04 pm
Location: Argetnina

Buscar y Seleccionar un archivo

Post by dobfivewin »

Estimados

como puedo hacer por medio de un rutina el usuario pueda buscar en las carpetas del disco y visualizar los archivos con una determinada extención y lo pueda seleccionar, osea que el nombre dicho archivo seleccionado me quede cargado en una variable...

me explique ??

David
argentina
User avatar
Ricardo Ramirez E.
Posts: 161
Joined: Wed Jan 25, 2006 10:45 am
Location: Praia - Cape Verde
Contact:

Post by Ricardo Ramirez E. »

David :
Busca en \fwh\manual\fwfun.chm la sintaxis de esta función :


Code: Select all

cGetFile32( <cFileMask>, <cTitle>, [<nDefaultMask>], [<cInitialDirectory>], [lSave], [nFlags], [cInitialFile] )  --> cFileName 
Saludos
Ricardo R.
xHarbour 1.1.0 Simplex , Microsoft Visual Studio 2008, Bcc55, Fwh Build. 9.01
User avatar
cuatecatl82
Posts: 614
Joined: Wed Mar 14, 2007 6:49 pm
Location: San Cristobal de las Casas, Chiapas México
Contact:

Post by cuatecatl82 »

Saludos David:

La sintaxis para guardar archivos es la siguiente:

Code: Select all

cFile:= cGetFile( "Documento de MS Word   | *.Doc", "Guardar Reporte", 1, "C:\", .T., .T.)

msginfo(cFile)
y este es para abrir archivos de uno o varios tipos:

Code: Select all

gcFile:= cGetFile32( "JPEG  (*.jpg)| *.jpg|" +;
                     "BITMAP  (*.bmp)| *.bmp|"+;
                     "GIF  (*.gif)| *.gif|" +;
                     "PCX  (*.pcx)| *.pcx|" +;                   
                     "Seleccione un archivo de Imagen",3)

msginfo(gcFile)
Espero te sirva
Soluciones y Diseño de Software
Damos Soluciones...

I.S.C. Victor Daniel Cuatecatl Leon
Director y Diseñador de Proyectos

http://www.soldisoft.unlugar.com
http://www.sisa.unlugar.com
danyleon82@hotmail.com
www.facebook.com/victordaniel.cuatecatlleon
dobfivewin
Posts: 325
Joined: Sun Feb 03, 2008 11:04 pm
Location: Argetnina

Post by dobfivewin »

Estimados....

muchas gracias

probé y funciona ok... :wink:

muchas gracias nuevamente

david
argentina
Post Reply