FiveTech Software tech support forums

José Luis,

Nosotros usamos bcc7 también y funciona ok

Te envío por email las libs de FWH más recientes

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 view

  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 view

  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,

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,

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.

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

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.

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 últimos cambios pienso que puede que le funcione bien a Jose Luis

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 últimos cambios pienso que puede que le funcione bien a Jose Luis

Bien, amado maestro. Pero hubo un error, lo hubo. jajajajajajajaja broma, broma.

Regards, saludos.

Antonio,

Code: Select all  Expand view

  REDEFINE CALENDAR oCalendar VAR dFecha ;
      ID 11 OF oDlg DBLCLICK ( MsgInfo('Dobleclick'), lOk := .T., oDlg:End() )

funciona correctamente.
Muchas gracias otra vez