FoxPro/Visual FoxPro - SCROLL EN COMBO BOX

Buenas noches a todos, tengo un problema, hay posibilidad de que el barra de desplazamiento de un control "combobox" se pueda controlar con la rueda del mouse, en el caso del grid funciona perfectamente no configuro nada, pero en un "combobox", es factible??? alguien podria brindarme su ayuda con esto??

Gracias

Que tal Amigo :

Talvez el evento evento MOUSEDOWN te sirva...

IF CONDICION1 = .T.
NODEFAULT
THIS.STATUSBARTEXT = 'The control is read-only'
RETURN
ELSE
DODEFAULT(nButton, nShift, nXCoord, nYCoord)
ENDIF

Saludos,

Gabriel
(Lima-Perú)

Gracias Gabriel, le puse de la siguiente forma:

IF !empt(this.displayvalue)
NODEFAULT
THIS.STATUSBARTEXT = 'The control is read-only'
RETURN
ELSE
DODEFAULT(nButton, nShift, nXCoord, nYCoord)
ENDIF

*****

IF !empt(this.value)
NODEFAULT
THIS.STATUSBARTEXT = 'The control is read-only'
RETURN
ELSE
DODEFAULT(nButton, nShift, nXCoord, nYCoord)
ENDIF

****

IF this.selected = .t.
NODEFAULT
THIS.STATUSBARTEXT = 'The control is read-only'
RETURN
ELSE
DODEFAULT(nButton, nShift, nXCoord, nYCoord)
ENDIF

y nada amigo, mas bien se desactiva

Cheka en el MSDN (help) el evento MouseWheel

Posiblemente te puede servir este comando

MiddleClick (Evento)
Se aplica a

CheckBox, ComboBox, CommandButton, CommandGroup, Container, Control,
EditBox, Form, Grid, Header, Image, Label, Line, ListBox, OptionButton,
OptionGroup, Page, PageFrame, Shape, Spinner, TextBox, ToolBar

Tiene lugar cuando el usuario hace clic en el botón medio del mouse en un
mouse con tres botones sobre un control.

Sintaxis

PROCEDURE Control.MiddleClick
[LPARAMETERS nÍndice]

Parámetros

nÍndice

Identifica a un control sólo si se encuentra en una matriz de controles.

atte,

Gabriel