[Pas2js] TJSMouseEvent updated definition

warleyalex warleyalex at yahoo.com.br
Mon Jun 11 01:08:11 CEST 2018


today I've updated TJSMouseEvent definition, I had to include the
initMouseEvent and getModifierState  methods.

---------------------
  { TJSMouseEvent }

  TJSAbstractView = class external name 'AbstractView'
  end;

  TJSMouseEvent = class external name 'MouseEvent' (TJSUIevent)
  private
    FAltKey: Boolean; external name 'altKey';
    FBUtton: NativeInt; external name 'button';
    FBUttons: NativeInt; external name 'buttons';
    FClientX: Double; external name 'clientX';
    FClientY: Double; external name 'clientY';
    FCtrlKey: Boolean; external name 'ctrlKey';
    FMetaKey: Boolean; external name 'metaKey';
    FmovementX: Double; external name 'movementX';
    FmovementY: Double; external name 'movementY';
    FoffsetX: Double; external name 'offsetX';
    FoffsetY: Double; external name 'offsetY';
    FRegion: String; external name 'region';
    FRelatedTarget: TJSEventTarget; external name 'relatedTarget';
    FscreenX: Double; external name 'screenX';
    FscreenY: Double; external name 'screenY';
    FShiftKey: Boolean; external name 'shiftKey';
  Public
    Property altKey : Boolean read FAltKey;
    Property button: NativeInt read FBUtton;
    Property buttons: NativeInt read FBUttons;
    property clientX : Double read FClientX;
    property clientY : Double read FClientY;
    property ctrlKey : Boolean read FCtrlKey;
    property metaKey : Boolean read FMetaKey;
    property movementX : Double read FmovementX;
    property movementY : Double read FmovementY;
    property offsetX : Double read FoffsetX;
    property offsetY : Double read FoffsetY;
{$IFDEF FIREFOX}
    property pageX : Double read FpageX;
    property pageY : Double read FpageY;
{$ENDIF}
    property region : String read FRegion;
    property relatedTarget : TJSEventTarget read FRelatedTarget;
    property screenX : Double read FscreenX;
    property screenY : Double read FscreenY;
    property shiftKey : Boolean read FShiftKey;
    property x : Double read FClientX;
    property y : Double read FClientY;
    { public methods }
    function getModifierState(keyArg: String): boolean;
    procedure initMouseEvent(const typeArg: string; bubblesArg,
cancelableArg: boolean;
        viewArg: TJSAbstractView; detailArg, screenXArg, screenYArg,
clientXArg,
        clientYArg: Integer; ctrlKeyArg, altKeyArg, shiftKeyArg, metaKeyArg:
boolean;
        buttonArg: Integer; relatedTargetArg: TJSEventTarget); overload;
    procedure initMouseEvent(const typeArg: string; bubblesArg,
cancelableArg: boolean;
        viewArg: TJSWindow; detailArg, screenXArg, screenYArg, clientXArg,
        clientYArg: Integer; ctrlKeyArg, altKeyArg, shiftKeyArg, metaKeyArg:
boolean;
        buttonArg: Integer; relatedTargetArg: TJSEventTarget); overload;
  end;
---------------------



--
Sent from: http://pas2js.38893.n8.nabble.com/


More information about the Pas2js mailing list