cGetFile Problema en Windows Vista

cGetFile Problema en Windows Vista

Postby Ruben D. Fernandez » Thu Feb 28, 2008 6:54 pm

Amigos:

Tengo problemas en cGetFile con Windows Vista.

Vea mi post anterior npor favor.

Saludos

Ruben Fernandez
Ruben D. Fernandez
 
Posts: 189
Joined: Sun Jul 08, 2007 1:46 am
Location: Uruguay

Re: cGetFile Problema en Windows Vista

Postby JmGarcia » Thu Feb 28, 2008 7:38 pm

Ruben D. Fernandez wrote:Tengo problemas en cGetFile con Windows Vista.

Y si usas cGetFile32

Sintaxis:
cGetFile32( <cFileMask>, <cTitle>, [<nDefaultMask>], [<cInitialDirectory>], [lSave], [nFlags], [cInitialFile] ) --> cFileName
Mi abuelo decía: Los aviones vuelan porque Dios quiere, y los helicópteros ni Dios sabe porque vuelan.
FWH 16.02, xHarbour 1.2.3, Harbour 3.2.0, WorkShop 4.5, AJ Make 0.30, Borlan BCC 7.00, VisualStudio 2013
User avatar
JmGarcia
 
Posts: 654
Joined: Mon May 29, 2006 3:14 pm
Location: Madrid - ESPAÑA

Postby Ruben D. Fernandez » Thu Feb 28, 2008 9:30 pm

JM:

Segun tengo entendido cGetFile32 es para 16 bits,
de todas forma ya lo probe y tampoco funciona.

Muchas gracias.

Ruben Fernandez
Ruben D. Fernandez
 
Posts: 189
Joined: Sun Jul 08, 2007 1:46 am
Location: Uruguay

Postby Patricio Avalos Aguirre » Thu Feb 28, 2008 9:38 pm

Este codigo me funciona muy bien en XP

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



habria que ejecutarlo en Vista :x
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
User avatar
Patricio Avalos Aguirre
 
Posts: 1060
Joined: Fri Oct 07, 2005 1:56 pm
Location: La Serena, Chile

Postby JmGarcia » Thu Feb 28, 2008 9:40 pm

Ruben D. Fernandez wrote:Segun tengo entendido cGetFile32 es para 16 bits...

Anda... pues ahora me entero.
Como vi el 32 pense que era de 32bits... ;-)

Yo uso esto (pero en XP):
Code: Select all  Expand view  RUN
cFichXLS:=cGetFile32("Excel (*.xls)|*.xls|Todos (*.*)|*.*",;
          "Escoja fichero Excel (XLS)",1,;           // Número del filtro 1=*.xls, 2=*.*, etc...
          alltrim(cDirectorioLOCAL),.T.,2,cFichXLS) // El ".T.,2" es para si existe pedir confirmación
Mi abuelo decía: Los aviones vuelan porque Dios quiere, y los helicópteros ni Dios sabe porque vuelan.
FWH 16.02, xHarbour 1.2.3, Harbour 3.2.0, WorkShop 4.5, AJ Make 0.30, Borlan BCC 7.00, VisualStudio 2013
User avatar
JmGarcia
 
Posts: 654
Joined: Mon May 29, 2006 3:14 pm
Location: Madrid - ESPAÑA

Postby Ruben D. Fernandez » Fri Feb 29, 2008 1:09 am

Amigos:

En xp funciona cualquiera de las 2 formas, pero, en Windows Vista
no logro hacerlo andar, la aplicación se cierra.

Muchas gracias y saludos
(seguire buscando y preguntando)

Ruben Fernandez
Ruben D. Fernandez
 
Posts: 189
Joined: Sun Jul 08, 2007 1:46 am
Location: Uruguay

Postby Patricio Avalos Aguirre » Fri Feb 29, 2008 2:57 pm

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


Este código funciona bien en Windows VISTA HOME PREMIUN

Image
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
User avatar
Patricio Avalos Aguirre
 
Posts: 1060
Joined: Fri Oct 07, 2005 1:56 pm
Location: La Serena, Chile

Postby Mauricio » Tue May 27, 2008 7:11 am

Ruben,

Lograste hacer funcionar cGetFile32 en Vista?

Ahora se me esta presentando ese error, sobre todo cuando la variable esta vacia.

cVariable := cGetFile32( .......)

Se cierra la aplicacion sin decir .. agua va


Saludos,
Mauricio
User avatar
Mauricio
 
Posts: 199
Joined: Thu Oct 06, 2005 9:07 pm
Location: San Diego, CA

Postby Antonio Linares » Tue May 27, 2008 10:27 am

cGetFile32() es para 16 bits

Para 32 bits usad cGetFile()
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42160
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

asi

Postby fleal » Tue May 27, 2008 11:18 am

Yo siempre lo he usado asi y funciona en Windows vista y XP.
aPub[5] := cFilePath( GetModuleFileName( GetInstance() ) ) // Path donde está instalado el Exe

local cFile := ""

cFile := cGetFile( "*.xls", "Selecciona un archivo", 1, aPub[5] )

if empty( cFile )
return FALSE
endif

cSay := cFile
fleal
 
Posts: 234
Joined: Tue Oct 25, 2005 12:39 am
Location: México, DF


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 40 guests