[Lazarus] macOS trackpad horz scroll

[Alexey]

Carbon has

       LM_MOUSEWHEEL:
       begin
         y := PLMMouseEvent(@AMessage)^.Y;
         x := PLMMouseEvent(@AMessage)^.X;
       end;
but need one more: LM_MOUSEWHEEL_HORZ, maybe. Mac trackpad can scroll 
view with 2 fingers: vert scroll already does lm_mousewheel, and horz 
scroll....? Does nothing. It does 1/n part of mousewheel, and so my app 
scrolls vertical. App must scroll horizontal only. Can we have new LM?


-- 
Regards,
Alexey