FiveTech Software tech support forums

Posted: **Mon Jul 25, 2016 4:26 am**

Tal vez haya alguna razón para ello, pero este evento (Right button double click) no es manejado por la clase tWindow

Sólo haría falta agregar:

Code: Select all

#define WM_RBUTTONDBLCLK                0x0206

DATA bRDblClick

METHOD RDblClick( nRow, nCol, nKeyFlags ) CLASS TWindow
   if ::bRDblClick != nil
      return Eval( ::bRDblClick, nRow, nCol, nKeyFlags, Self )
   endif
return nil

y en el método HandleEvent:

Code: Select all

  case nMsg == WM_RBUTTONDBLCLK
       return ::RDblClick( nHiWord( nLParam ), nLoWord( nLParam ), nWParam )

César Lozada

Posted: **Mon Jul 25, 2016 4:38 am**

Nota: De acuerdo a http://winapi.conclase.net/curso/?winms ... TTONDBLCLK,

sólo las ventanas que tienen el estilo CS_DBLCLKS pueden recibir mensajes WM_RBUTTONDBLCLK

Pero no hay ningún problema con esto, pues en el method Register la clase tWindow asigna automáticamente este estilo a las ventanas.

César Lozada

Posted: **Mon Jul 25, 2016 6:24 am**

César,

Te funciona bien asi ?

gracias

Posted: **Mon Jul 25, 2016 4:45 pm**

No, Antonio. Lo probé en tWindow y no funciona.

No pude implementarlo en tControl o no supe cómo hacerlo.

Pero si hago las modificaciones en un control en particular entonces sí que funciona. (Lo hice en tListBox)

Saludos,
César

Posted: **Tue Jul 26, 2016 5:24 am**

César,

Entonces de momento lo tienes solucionado asi ?

Posted: **Wed Jul 27, 2016 12:47 am**

Antonio,

Sí. En un listbox funciona correctamente. Gracias por tu interés.

César Lozada

FiveTech Software tech support forums

Evento WM_RBUTTONDBLCLK

Evento WM_RBUTTONDBLCLK

Re: Evento WM_RBUTTONDBLCLK

Re: Evento WM_RBUTTONDBLCLK

Re: Evento WM_RBUTTONDBLCLK

Re: Evento WM_RBUTTONDBLCLK

Re: Evento WM_RBUTTONDBLCLK