[Lazarus] TLMMouseEvent axis

[Alexey]

Hi

It is needed (for Carbon with mac trackpad) to use Axis field (1 bit is 
okay: vertical=0; horiz=1) in this record.

Pls add it? Maybe add at end.

   PLMMouseEvent = ^TLMMouseEvent;
   TLMMouseEvent = record
     Msg: Cardinal;
{$ifdef cpu64}
     UnusedMsg: Cardinal;
{$endif}
{$IFDEF FPC_LITTLE_ENDIAN}
     Button: Word;         // 1=left, 2=right, 3=middle
     WheelDelta: SmallInt; // -1 for up, 1 for down
{$ELSE}
     WheelDelta: SmallInt; // -1 for up, 1 for down
     Button: Word;         // 1=left, 2=right, 3=middle
{$ENDIF}
{$ifdef cpu64}
     Unused1 : Longint;
{$endif cpu64}
     X: Smallint;          // under gtk this is longint
     Y: Smallint;          // ditto
{$ifdef cpu64}
     Unused2 : Longint;
{$endif cpu64}
     Result: LRESULT;      // to fit std message size
     UserData: pointer;    // used under gtk
     State: TShiftState;   // in win is the equivalent of button
   end;



-- 
Regards,
Alexey