Dudas con la funcío cGetFile

Dudas con la funcío cGetFile

Postby Armando » Sat Feb 11, 2023 4:41 am

Hola Amigos del foro:

Tengo el siguiente código con la función cGetFile() a la cual le pre asigno un nombre (cFileName)
y se muestra el diálogo para que el usuario asigne un nombre de fichero, el dialogo contiene
dos botones ACEPTAR y CANCELAR.

La pregunta, cómo detectar cual botón oprimió el usuario?, ACEPTAR o CANCELAR?

Saludos

Code: Select all  Expand view  RUN

STATIC FUNCTION AExcel()
   cFilePath      := ""
    cFileName      := "C1_" + DTOS(DATE())

    cFilePath := cGetFile("*.Xlsx | *.Xlsx |*.Csv | *.Csv | *.* | *.*","Elija ruta y nombre del fichero",1,,(.T.),(.T.),,cFileName) + ".xlsx"

* Aquí necesito saber que botón eligió el usuario <=================
RETURN(.T.)
 
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
User avatar
Armando
 
Posts: 3228
Joined: Fri Oct 07, 2005 8:20 pm
Location: Toluca, México

Re: Dudas con la funcío cGetFile

Postby Jimmy » Sat Feb 11, 2023 5:23 am

hi,

when press "Cancel" or "ESC" than cGetFile() will return empty String
but you have add ".xlsx" ... i would add it later
greeting,
Jimmy
User avatar
Jimmy
 
Posts: 1732
Joined: Thu Sep 05, 2019 5:32 am
Location: Hamburg, Germany

Re: Dudas con la funcío cGetFile

Postby karinha » Sat Feb 11, 2023 2:45 pm

Code: Select all  Expand view  RUN

   If oBtn:lActive

      MsgStop("Botao ativo")

   Else

      MsgStop("Botao desativado")

   EndIf

ó:

   IsWindowEnabled( oControl:hWnd )

 


Regards, saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
User avatar
karinha
 
Posts: 7828
Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil

Re: Dudas con la funcío cGetFile

Postby Armando » Sat Feb 11, 2023 5:08 pm

Jimmy:

You are right, I'll try.

Regards
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
User avatar
Armando
 
Posts: 3228
Joined: Fri Oct 07, 2005 8:20 pm
Location: Toluca, México

Re: Dudas con la funcío cGetFile

Postby Armando » Sat Feb 11, 2023 5:09 pm

Karinha:

Thanks a lot,

Regards
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
User avatar
Armando
 
Posts: 3228
Joined: Fri Oct 07, 2005 8:20 pm
Location: Toluca, México


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot], pedroluis and 49 guests