[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