FoxPro/Visual FoxPro - SCROLL EN COMBO BOX

   
Vista:

SCROLL EN COMBO BOX

Publicado por patrick (5 intervenciones) el 22/04/2008 02:28:20
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
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:SCROLL EN COMBO BOX

Publicado por Gabriel (406 intervenciones) el 22/04/2008 16:11:50
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ú)
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:SCROLL EN COMBO BOX

Publicado por PATRICK (5 intervenciones) el 22/04/2008 18:45:21
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
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:SCROLL EN COMBO BOX

Publicado por enrique (1041 intervenciones) el 22/04/2008 20:12:30
Cheka en el MSDN (help) el evento MouseWheel
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:SCROLL EN COMBO BOX

Publicado por Gabriel (406 intervenciones) el 23/04/2008 01:21:28
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
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar