cGetFile

Post Reply
User avatar
Manuel Valdenebro
Posts: 706
Joined: Thu Oct 06, 2005 9:57 pm
Location: Málaga-España

cGetFile

Post by Manuel Valdenebro »

Hola,
Necesito que en un dialogo de Windows, me muestre un fichero de un directorio y no todos los fichero. Estoy intentándolo de la siguiente manera:

cGetFile( cNomFich, "Elija el fichero.",1,cDir,.F.,.T.)

donde cNomFich es el nombre del fichero completo (incluida extensión) y cDir es el path. En el diálogo me muestra todos los ficheros con extensión ".doc" que es la extensión de ese fichero, pero tengo que buscar manualmente ese fichero. No se posiciona el cursor en el nombre de fichero que busco.

Si lo hago asi:

cGetFile("*.doc", "Elija el fichero.",1,cDir,.F.,.T.,,cNomFich) obtengo el mismo resultado.

Un saludo y gracias
Un saludo

Manuel
User avatar
Enrico Maria Giordano
Posts: 7355
Joined: Thu Oct 06, 2005 8:17 pm
Location: Roma - Italia
Contact:

Re: cGetFile

Post by Enrico Maria Giordano »

Try

Code: Select all

cGetFile( cNomFich + "|" + cNomFich, "Elija el fichero.",1,cDir,.F.,.T.)
EMG
User avatar
armando.lagunas
Posts: 340
Joined: Mon Oct 05, 2009 3:35 pm
Location: Curico-Chile
Contact:

Re: cGetFile

Post by armando.lagunas »

Un ejemplo para archivos de imagen que utilizo en mis programas

Code: Select all

gcFile := cGetFile( "Bitmap (*.bmp)| *.bmp|" +         ;
                             "PCX   (*.pcx)| *.pcx|"  +         ;
                             "JPEG  (*.jpg)| *.jpg|"  +         ;
                             "TARGA (*.tga)| *.tga|"  +         ;
                             "RLE   (*.rle)| *.rle|"  +         ;
                             "Todos los Archivos (*.*)| *.*"    ;
                            ,"Elegir una archivo de imagen Valido...", 1 )
Saludos
User avatar
jvtecheto
Posts: 357
Joined: Mon Mar 04, 2013 4:32 pm
Location: Spain

Re: cGetFile

Post by jvtecheto »

Hola Manuel.

Esto tambien funciona:

Code: Select all

cGetFile("ficheros include(*.ch)|*.ch|","Elija el fichero include.", ,"c:\fwh\include",.F., , ,"fivewin.ch")
 
Saludos.

Jose.
Fwh 19.06 32 bits + Harbour 3.2dev(r2011030937)+ Borland 7.4 + FivEdit
User avatar
Manuel Valdenebro
Posts: 706
Joined: Thu Oct 06, 2005 9:57 pm
Location: Málaga-España

Re: cGetFile

Post by Manuel Valdenebro »

Gracias Enrico, funciona perfectamente.

Gracias tambien a los otros compañeros por su ayuda.

Saludos
Un saludo

Manuel
Post Reply