FiveTech Software tech support forums

Maestro Antonio:

Muchas gracias, pruebo y aviso.

Saludos

Prueba a añadirle este método a la Clase TComboBox:

METHOD MouseWheel() INLINE 1

Amigos del foro:

Necesito poder inhibir, que no funcione, la rueda del ratón en un combo box, alguna ayuda?

Saludos

Aqui está el EXE por si quereis probarlo:

https://github.com/FiveTechSoft/FWH_too ... ontrol.exe

Con el botón izquierdo del ratón movemos el círculo
Con doble click izquierdo lanzamos una acción
Con el click derecho lo cerramos

Maestro Antonio y Mr. Rao:

Tienen la boca llena de razón, tengo dos PRG que usan el control, ahora que lo mencionaste
comparé uno con otro y efectivamente, uno funciona y en el otro no.

Revisé el control y en el que no funcionaba tenia yo el WINDOWS-STYLE Vert Scrollbar a NO.

Me disculpo fue mi ...

Estábamos equivocados :-)

Sin ningún cambio en FWH, la rueda de mouse SI funciona con listas de combobox cuando la lista es más grande que el área de la lista.

Cuando la lista es grande, vemos una barra de desplazamiento y luego tanto la barra de desplazamiento como la rueda de mouse funcionan ...

Estimado Armando,

La cuestión que planteas aunque parece fácil es bastante complicada. Te explico el por qué:

1. Windows no proporciona un estilo de combobox que automaticamente procese el mensaje WM_MOUSEWHEEL en la lista desplegada del combobox.
2. Los mensajes WM_MOUSEWHEEL llegan a la lista ...

Foreros:

Resulta que la rueda del ratón (MouseWheel) no funciona en un ComboBox
con estilo DROPDOWNLIST, alguna idea?

Saludos

Amigos del foro, saludos

En un xBrowse con la tecla de flecha hacia abajo avanzo y al retroceder
con la tecla flecha hacia arriba o la rueda del ratón el repintado del browse
se distorsiona, tal como se ve en la imagen adjunta, eso pasa en el servidor
de mi cliente, en mi PC de desarrollo no sucede ...

Muchas gracias a los 2.

Lo he reesuelto con:

oXBrowse:bLButtonUp

Parece que no entro en conflicto con otros eventos, haré más pruebas pero parece que funcionará como lo tengo.

Muchas gracias,

Creo que es lo que necesitas

:bRClicked := {|nRow, nCol | msginfo(oBrw:nArrayAt) }


Si quieres mostrar un menú debes hacer lo siguiente


:bRClicked := {|nRow, nCol | Mymenu( nRow,nCol,oBrw) }

function Mymenu( nRow, nCol, oBrw )
Local oPopup
MENU oPopup POPUP 2015
MENUITEM "Mis acciones ...

Carlos,

Mírate por favor:
Salu2

Hola a todos,

¿Sabrían decirme que METHOD se lanza cuando se pulsa el ratón sobre una lína de un XBrowse?

Es decir, pulso sobre una línea de un XBrowse y quisiera mostrar un mensaje "Hola Mundo", y si puede ser el registro de donde venía y/o sobre cual he pulsado.

Muchas gracias

... pero los controles me quedan atrás de la imagen
aunque en los recursos he definido la imagen como TRANSPARENTE y hasta que paso el
puntero del ratón aparecen.


REDEFINE IMAGE oImg FILENAME oApp:cImagen ID 25 OF oDlg UPDATE ADJUST

REDEFINE GET aGets[ 02 ] VAR cPsw ID 102 OF oDlg ;
MESSAGE ...

... T.)


Hasta aquí todo bien, pero en la función Registrar() necesito conocer el número de la columna en la
que el usuario dio el clic derecho del ratón, el problema se presenta así

Ejemplo si el usuario da clic derecho en la primera columna, la variable nCol me da el número 01
que corresponde a la ...