FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexAll discussionsLogin (GitHub)
Board index FiveWin para Harbour/xHarbour cGetFile32 no me funciona en Windows 7
csincuir
Posts: 476
Joined: Sat Feb 03, 2007 06:36 AM
cGetFile32 no me funciona en Windows 7
Posted: Mon Mar 01, 2010 08:50 PM

Hola a todos.
He estado probando obtener archivos con la funcion cGetFile32() en windows 7 pero tengo el inconveniente que cuando levanta la ventana para buscar los archivos de repente se bloquea el sistema y luego me da el error normal de windows que la aplicacion ha dejado de funcionar, he probado con la funcion cGetfile() y tengo el mismo problema. Esto no sucede con Windows XP.
Alguien habra tenido este mismo problema?
Habra alguna otra forma de buscar archivos que no sea con esta funcion?

Agradeceria mucho me pudieran ayuda con este problema.
Estoy utilizando FWH Dic/2007 y xHarbour 1.0.0

Saludos cordiales.

Carlos Sincuir.

jll-fwh
Posts: 408
Joined: Fri Jan 29, 2010 08:14 PM
Re: cGetFile32 no me funciona en Windows 7
Posted: Tue Mar 02, 2010 02:11 PM

Hola Sincuir:

Yo estoy usando cGetFile() con Windows 7 y no tengo problemas.

       cFile := cGetFile( "Bitmap (*.bmp)| *.bmp|"+;
                          "DIB    (*.dib)| *.dib|"+;
                          "PCX    (*.pcx)| *.pcx|"+;
                          "JPEG   (*.jpg)| *.jpg|"+;
                          "GIF    (*.gif)| *.gif|"+;
                          "TARGA  (*.tga)| *.tga|"+;
                          "RLE    (*.rle)| *.rle|"+;
                          "All Files (*.*)| *.*";
                          ,"IMAGES\", 4 )

Un saludo
JLL

Libreria: FWH/FWH1109 + Harbour 5.8.2 + Borland C++ 5.8.2
Editor de Recursos: PellecC
ADA, OURXDBU
S.O: XP / Win 7 /Win10
Blog: http://javierlloris.blogspot.com.es/
e-mail: javierllorisprogramador@gmail.com
carlos vargas
Posts: 1789
Joined: Tue Oct 11, 2005 05:01 PM
Re: cGetFile32 no me funciona en Windows 7
Posted: Tue Mar 02, 2010 03:45 PM
umm...

Si no estoy mal, cGetFile32 es una funcion que hace uso de una dll o un exe externo para mostrar el dialogo de apertura de archivo, era usado por efecto de compatibilidad, lo correcto es usar cGetFile en entorno de 32 y 64 bits.

Code (fw): Select all Collapse
cGetFile32( <cFileMask>, <cTitle>, [<nDefaultMask>], [<cInitialDirectory>], [lSave], [nFlags], [cInitialFile] )  --> cFileName  
 
This function invokes the 32 bits Windows default select a file DialogBox.  

This function only works on Win 95/98 and NT machines. The file RunDlg32.exe must be present on every PC in the \windows or \windows\system directory.

salu2
carlos vargas
Salu2

Carlos Vargas

Desde Managua, Nicaragua (CA)
csincuir
Posts: 476
Joined: Sat Feb 03, 2007 06:36 AM
Re: cGetFile32 no me funciona en Windows 7
Posted: Tue Mar 02, 2010 09:27 PM

Gracias JLL y Carlos por sus comentarios.
Realmente no se que puede estar pasando, pero a mi me funciona 1 vez, ya sea cGetFile() o cGetFile32(), pero luego ya no, siempre se bloquea el sistema y sale el mesaje que les comente, "que el sistema dejo de funcionar", y a afuera.

No lo entiendo, porque que el mismo sistema en Windows XP trabaja sin ningun problema, pero en Windows 7 no trabaja bien, bueno al menos a mi pues, y ya ni se como darle esta funcionalidad al cliente en mi sistema, ya que es muy tedioso que se escriba el path o direccion de un archivo, trabajando con Windows.

Al menos para mi, este es un problema no resuelto con FWH + xHarbour, que si encuentro el problema no duden en que lo pondre en el foro.

Saludos cordiales.

Carlos Sincuir

Patricio Avalos Aguirre
Posts: 1074
Joined: Fri Oct 07, 2005 01:56 PM
Re: cGetFile32 no me funciona en Windows 7
Posted: Tue Mar 02, 2010 09:41 PM

Hola

Prueba con correo GMail insertando archivos adjunto a un correo, si se bloque puede sea el windows 7

yo utilizo windows 7 y no tengo ningun problema..

Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl
jll-fwh
Posts: 408
Joined: Fri Jan 29, 2010 08:14 PM
Re: cGetFile32 no me funciona en Windows 7
Posted: Thu Mar 04, 2010 02:50 PM

Hola Sincuir:

Copia y pega la funcion que te puse y a ver si tambien te da ese error, pq yo no tengo ese problema.

Un saludo
JLL

Libreria: FWH/FWH1109 + Harbour 5.8.2 + Borland C++ 5.8.2
Editor de Recursos: PellecC
ADA, OURXDBU
S.O: XP / Win 7 /Win10
Blog: http://javierlloris.blogspot.com.es/
e-mail: javierllorisprogramador@gmail.com
csincuir
Posts: 476
Joined: Sat Feb 03, 2007 06:36 AM
Re: cGetFile32 no me funciona en Windows 7
Posted: Fri Mar 05, 2010 04:34 AM

Hola JLL.
Copie tu funcion como la enviaste, pero igual, me da el mismo error.

Gracias por tu ayuda e interes.

Saludos cordiales.

Carlos Sincuir.

Daniel Garcia-Gil
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 PM
Re: cGetFile32 no me funciona en Windows 7
Posted: Fri Mar 05, 2010 05:00 AM

Saludos Carlos...

Podrias copiar aca como haces uso de la funcion, si pudieras colocar exactamente las lineas de la llamada que produce el error mejor

our best documentation is the source code
Isla de Margarita Venezuela.
danielgarciagil@gmail.com
http://tdolphin.blogspot.com/
https://www.dropbox.com/referrals/NTI5Njk4MDc1OQ?src=global9
csincuir
Posts: 476
Joined: Sat Feb 03, 2007 06:36 AM
Re: cGetFile32 no me funciona en Windows 7
Posted: Fri Mar 05, 2010 11:54 AM
Daniel.
Gracias por contestar.

Utilizo la funcion de esta forma:
Code (fw): Select all Collapse
  gcFile := cGetFile(    "BITMAP   (*.bmp)| *.bmp|" +  ;
                           "JPG (*.jpg)| *.jpg|"   ;
                            ,"Por Favor Seleccione un Archivo de Imágen" )


Y una lista de lineas de llamadas de error no hay, ya que no se produce ningun error de ese tipo, el error es que cuando levanta la ventana para buscar los archivos, cambia el color de la pantalla, empieza a funcionar el ciruclo en movimiento de windows 7, y por ultimo el mensaje de que la aplicacion ha dejado de funciona, o si no, otras veces, simplemente la aplicacion se sale, sin decir nada.

Pero este mismo sistema en Windows XP y Vista, funciona correctamente.

Saludos cordiales.

Carlos Sincuir
Patricio Avalos Aguirre
Posts: 1074
Joined: Fri Oct 07, 2005 01:56 PM
Re: cGetFile32 no me funciona en Windows 7
Posted: Fri Mar 05, 2010 01:13 PM
Carlos

Yo lo utilizo de la siguiente manera

Code (fw): Select all Collapse
cArch := cGetFile32("JPEG  | *.jpg |" , "Seleccione una imagen",1,,,.T. )



espero qu ete sirva
Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl
Daniel Garcia-Gil
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 PM
Re: cGetFile32 no me funciona en Windows 7
Posted: Fri Mar 05, 2010 01:16 PM

Carlos...

he probado la funcion tal cual como la usas, yo uso windows 7 ultimate, no me genera ningun error, la aplicacion continua normalmente

en la carpeta SAMPLES tienes muchos ejemplos donde se usa cGetFile,

samples\testgfil.prg
samples\testbrus.prg
samples\testbmp1.prg
...

he construido varios, con la misma version que usas junto con win7 y funcionan correctamente

intenta publicar un ejemplo que logre reproducir ese comportamiento

our best documentation is the source code
Isla de Margarita Venezuela.
danielgarciagil@gmail.com
http://tdolphin.blogspot.com/
https://www.dropbox.com/referrals/NTI5Njk4MDc1OQ?src=global9
karinha
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: cGetFile32 no me funciona en Windows 7
Posted: Fri Mar 05, 2010 02:02 PM
Code (fw): Select all Collapse
   LOCAL cFile


   //-> Busqueda en RED
   cFile := SubStr( cGetFile( "*.BMP", "Seleccione un Archivo Bitmap (.BMP)" ), 3 )

   IF Empty( cFile )
      Return Nil
   ENDIF
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
csincuir
Posts: 476
Joined: Sat Feb 03, 2007 06:36 AM
Re: cGetFile32 no me funciona en Windows 7
Posted: Fri Mar 05, 2010 04:57 PM

Agradezco a todos los que me han contestado.
He hecho las pruebas con las opciones que me envian, pero igual, siempre tengo el mismo problema.
Creo que el problema estara en la instalacion del Windows 7 Ultimate, que tengo en mi notebook. Voy a tener que hacer pruebas con otra computadora con Windows 7, y les comento si me da el mismo error.

Saludos cordiales.

Carlos Sincuir

carlos vargas
Posts: 1789
Joined: Tue Oct 11, 2005 05:01 PM
Re: cGetFile32 no me funciona en Windows 7
Posted: Sun Mar 07, 2010 01:26 AM

estimado, no esta usando en esa pc win7 64bits?

salu2
carlos vargas

Salu2

Carlos Vargas

Desde Managua, Nicaragua (CA)
csincuir
Posts: 476
Joined: Sat Feb 03, 2007 06:36 AM
Re: cGetFile32 no me funciona en Windows 7
Posted: Sun Mar 07, 2010 02:01 AM
Pues no Carlos, el Windows 7 que tengo instalado no es de 64 Bits.
Es una Notebook HP Probook 4515s
http://h10010.www1.hp.com/wwpc/ec/es/sm/WF05a/321957-321957-64295-3955552-3955552-3935146.html

Saludos cordiales.

Carlos Sincuir.
Static archive · New replies & topics via GitHub Discussions