FiveTech Software tech support forums

Quique:

Tienes razón, si escribo solo el nombre no me devuelve la extensión

Saludos

Quique: Tengo esto y me devuelve el archivo y su extensión         REDEFINE BTNGET oGet VAR cFile ID 100 OF oDlg RESOURCE "Buscar" UPDATE;            PICTURE "@!K";  ...

Quique,
Y ya probaste de esta forma:

Code: Select all  Expand view

cFile := cGetFile(    "HOJA EXCEL (*.xls)| *.xls|"  ;
                            ,"Por Favor Seleccione el archivo xls" )

Saludos.

Carlos.

Quique,

En FWH/source/winapi/getfile.c busca por:

ofn.Flags

y modificalo asi:

Code: Select all  Expand view

  ofn.Flags           = OFN_PATHMUSTEXIST | OFN_NOCHANGEDIR | OFN_ADDEXTENSION |
                        IF( bSave, OFN_HIDEREADONLY, 0 ) |
                        IF( bLongNames, OFN_LONGNAMES, 0 );

Quique, creo q no va funcionar, porque WINDOWS 7 solo se puede modificar la fecha y hora, como administrador.

Gracias, salu2.

Quique A mi la funcion cGetFile32( "*.PRG", "Fichero", 1, ".\" ) me devuelve el fichero seleccionado con el PATH y la Extension del fichero Si lo que necesitas es que ponga la extension del fichero ...

Quique,

Yo uso los get asignadole un cGet:=space(30) por ejemplo.

Luego antes de usar el contenido del cGet para una búsqueda, hago cGet:=alltrim(cGet) y eso le saca todos los espacios en blanco antes del primer caracter y después del último de la cadena del cGet.

Saludos

Rolando

Quique,

Prueba a usar un control EDIT en vez de un GET. Revisa FWH/samples/TestEdit.prg

Quique, Asi va bien. Tras crear el diálogo restaura los aceleradores de la ventana principal. Falta modificar en FWH que los aceleradores se disparen en diálogos no modales. En modales va bien. #include "FiveWin.ch"function ...

Quique,

Mientras no haya una ventana hija creada puedes hacer:

oWnd:oWndClient:bGotFocus = { || msgBeep(), oWnd:oMenu:oAccTable:Activate() }

Quique, Aqui parece estar la documentación necesaria de Windows: http://msdn.microsoft.com/en-us/library/aa376389%28VS.85%29.aspx BOOL IsUserAdmin(VOID)/*++ Routine Description: This routine returns ...

Quique,

Has probado asi ?

oWnd:oWndActive:bGotFocus = { || msgBeep(), oWnd:oMenu:oAccTable:Activate() }

Quique,

Hechas la pruebas en TeamViewer:

1. El ejemplo 1 va bien.
2. El ejemplo 2 falla (no restaura aceleradores)
3. El ejemplo 3 va bien (?)

si crees que sea mas facil para organizarnos, agregame a cualquiera de estos

msn: quique@quiquesoft.com
googletalk: quique@quiquesoft.com
yahoo: quiquesoft
o por facebook, ya me aceptaste soy quique that'sme

pasame los datos o mandamelos a quique@quiquesoft.com para probar, porfa