topic-42776

Posts: 3358

Joined: Fri Oct 07, 2005 08:20 PM

Dudas con la funcío cGetFile
Posted: Sat Feb 11, 2023 04: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 (fw): Select all Collapse

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

Jimmy

Posts: 1772

Joined: Thu Sep 05, 2019 05:32 AM

Re: Dudas con la funcío cGetFile
Posted: Sat Feb 11, 2023 05: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

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: Dudas con la funcío cGetFile
Posted: Sat Feb 11, 2023 02:45 PM

Code (fw): Select all Collapse

   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

Armando

Posts: 3358

Joined: Fri Oct 07, 2005 08:20 PM

Re: Dudas con la funcío cGetFile
Posted: Sat Feb 11, 2023 05: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

Armando

Posts: 3358

Joined: Fri Oct 07, 2005 08:20 PM

Re: Dudas con la funcío cGetFile
Posted: Sat Feb 11, 2023 05: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

FiveTech Support Forums

Continue the discussion