[Lazarus] OnMouseWheel[Down/Up] support in TControl (patch included)

[Luiz Americo Pereira Camara]

Mattias Gaertner wrote:
>
>>>   
>>>       
>> No, it's a Delphi compatibility. I tested CM_MOUSEWHEEL, the
>> equivalent message of LM_MOUSEWHEEL. Under Delphi XPos and YPos
>> fields returns screen coordinates.
>> Furthermore, OnMouseWheel MousePos also is at screen coordinates.
>>     
>
> The VCL sends OnMouseWheel to the right child control, but it sends
> screen coords? That would be very inconsistent.
>   


The test i done was with a TWinControl.
I tested with a TControl and Delphi does not send OnMouseWheel for TControl

Luiz