When an object is disabled
the event MouseWheel is called on the object
and on the whole hierarchy up to the form,
a NODEF command stop the call sequence.
A non binded grid is implicitly disabled.
it is a design choice, debatable but subjective.
The bug:
On a not binded grid,
the mousewheel is called,
but the whole hierarchy up to the form
is not called.
Repro.
Expected :
- Form.Mousewheel call
and the Grid become RED.
Run and rotates the mouse wheel.
PUBLIC oform1
oform1=NEWOBJECT("form1")
oform1.Show
DEFINE CLASS form1 AS form
ADD OBJECT grid1 AS grid WITH ;
Anchor = 15,;
Height = 500, ;
RecordSource = " ", ;
Width = 500, ;
Name = "Grid1"
PROCEDURE MouseWheel
LPARAMETERS nDirection, nShift, nXCoord, nYCoord
this.grid1.backColor = 255
ENDPROC
ENDDEFINE