On 27/10/2011 10:55, Max Vlasov wrote:
On Thu, Oct 27, 2011 at 5:43 PM, Felipe Monteiro de Carvalho <[email protected] <mailto:[email protected]>> wrote:



    TLMMouseEvent does not exist in Delphi AFAIK



Just looked, the original had
TBaseVirtualTree.CMMouseWheel(var Message: TCMMouseWheel);message CM_MOUSEWHEEL;

TCMMouseWheel of Delphi has ...ShiftState: TShiftState;

looking at TLMMouseEvent, shift is last (ShiftState in delphi is not) so probably the one who ported it, also added the field to the lazarus record just for this case. If so, I agree this is a good change to remove field added previously just for one particular component. Maybe Luiz later will add some details.

As far as i remember, i did not change the LCL.

I adapted the Delphi code from what LCL provided. I will investigate further the reasons i choose.

Luiz

--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Reply via email to