Page 2 of 2
Re: DBLCLICK en TCALeNDAR no funciona
Posted: Sat Dec 17, 2022 9:37 am
by Antonio Linares
José Luis,
Nosotros usamos bcc7 también y funciona ok
Te envío por email las libs de FWH más recientes
Re: DBLCLICK en TCALeNDAR no funciona
Posted: Mon Dec 19, 2022 3:14 pm
by José Luis Sánchez
Antonio,
con las librerias que me has enviado el ejcmplo funciona correctamente y he probado con otros programas y también lo hace.
Pero sigo teniendo un programa en que el dobe click en el calendario no funciona, y es basicamente el único que mantengo. Hago algo tan simple como
Code: Select all | Expand
REDEFINE CALENDAR oCalendar VAR dFecha ;
ID 11 OF oDlg DBLCLICK {|| ( MsgInfo('Dobleclick'), lOk := .T., oDlg:End() ) }
y el MsgInfo() del DBLCLICK no funciona.
Pero se me ha ocurrido algo tan tonto como hacer:
Code: Select all | Expand
REDEFINE CALENDAR oCalendar VAR dFecha ;
ID 11 OF oDlg // DBLCLICK {|| ( MsgInfo('Dobleclick'), lOk := .T., oDlg:End() ) }
oCalendar:bLDblClick := {|| ( MsgInfo('Dobleclick'), lOk := .T., oDlg:End() ) }
y ¡¡me funciona!!
¿ Alguna explicación a esto ? ¿ No es extraño ?
Muchísimas gracias por tu ayuda
Saludos,
Re: DBLCLICK en TCALeNDAR no funciona
Posted: Mon Dec 19, 2022 3:37 pm
by José Luis Sánchez
Creo que el error que estaba teniendo debería venir de algún .ch que tengo en ese programa en concreto que machacaba el original de FWH, voy a investigar a ver si encuentro algo.
Saludos,
Re: DBLCLICK en TCALeNDAR no funciona
Posted: Mon Dec 19, 2022 3:43 pm
by karinha
José Luis Sánchez wrote:Creo que el error que estaba teniendo debería venir de algún .ch que tengo en ese programa en concreto que machacaba el original de FWH, voy a investigar a ver si encuentro algo.
Saludos,
creo que no. con FWH1905, tú ejemplo también no funciona el doble click.
Regards, saludos.
Re: DBLCLICK en TCALeNDAR no funciona
Posted: Mon Dec 19, 2022 3:45 pm
by Antonio Linares
José Luis,
Creo que es tan simple como cambiar esto:
DBLCLICK {|| ( MsgInfo('Dobleclick'), lOk := .T., oDlg:End() ) }
por
DBLCLICK ( MsgInfo('Dobleclick'), lOk := .T., oDlg:End() )
gracias por tu feedback
Re: DBLCLICK en TCALeNDAR no funciona
Posted: Mon Dec 19, 2022 4:01 pm
by karinha
Antonio Linares wrote:José Luis,
Creo que es tan simple como cambiar esto:
DBLCLICK {|| ( MsgInfo('Dobleclick'), lOk := .T., oDlg:End() ) }
por
DBLCLICK ( MsgInfo('Dobleclick'), lOk := .T., oDlg:End() )
gracias por tu feedback
Maestro Antonio, tampoco funciona. El problema es que DOBLE CLICK() no activa ninguna acción.
Gracias.
Regards, saludos.
Re: DBLCLICK en TCALeNDAR no funciona
Posted: Mon Dec 19, 2022 4:19 pm
by Antonio Linares
Querido Joao,
[ DBLCLICK <bLDblClick> ] se preprocesa en [\{|Self| <bLDblClick>\}] por eso no podemos pasarle un bloque de código ya que el preprocesador crea el bloque de código.
Con los _ pienso que puede que le funcione bien a Jose Luis
Re: DBLCLICK en TCALeNDAR no funciona
Posted: Mon Dec 19, 2022 4:23 pm
by karinha
Antonio Linares wrote:Querido Joao,
[ DBLCLICK <bLDblClick> ] se preprocesa en [\{|Self| <bLDblClick>\}] por eso no podemos pasarle un bloque de código ya que el preprocesador crea el bloque de código.
Con los _ pienso que puede que le funcione bien a Jose Luis
Bien, amado maestro. Pero hubo un error, lo hubo. jajajajajajajaja broma, broma.
Regards, saludos.
Re: DBLCLICK en TCALeNDAR no funciona
Posted: Mon Dec 19, 2022 5:31 pm
by José Luis Sánchez
Antonio,
Code: Select all | Expand
REDEFINE CALENDAR oCalendar VAR dFecha ;
ID 11 OF oDlg DBLCLICK ( MsgInfo('Dobleclick'), lOk := .T., oDlg:End() )
funciona correctamente.
Muchas gracias otra vez