cancel
Showing results for 
Show  only  | Search instead for 
Did you mean: 
  • Register to attend Discovery Summit 2025 Online: Early Users Edition, Sept. 24-25.
  • New JMP features coming to desktops everywhere this September. Sign up to learn more at jmp.com/launch.
%3CLINGO-SUB%20id%3D%22lingo-sub-800088%22%20slang%3D%22en-US%22%20mode%3D%22CREATE%22%3EMausbox%20%E2%80%93%20Aktion%20zum%20Hochdr%C3%BCcken%20der%20Taste%3F%3C%2FLINGO-SUB%3E%3CLINGO-BODY%20id%3D%22lingo-body-800088%22%20slang%3D%22en-US%22%20mode%3D%22CREATE%22%3E%3CP%3EF%C3%BCr%20die%20Mausbox%20ist%20der%20Ansatz%20%C3%BCber%3CBR%20%2F%3E%20%3CFONT%20face%3D%22courier%20new%2Ccourier%22%3E%26lt%3B%3C%2FFONT%3E%20%3CSETCLICKENABLE%3E%20%3CFONT%20face%3D%22courier%20new%2Ccourier%22%3E%3CBR%20%2F%3E%3CFONT%20face%3D%22courier%20new%2Ccourier%22%3E%26lt%3B%3C%2FFONT%3E%3C%2FFONT%3E%20%3CSETCLICK%3E%3C%2FSETCLICK%3E%20%3CFONT%20face%3D%22courier%20new%2Ccourier%22%3E%3CFONT%20face%3D%22courier%20new%2Ccourier%22%3E%3CBR%20%2F%3E%3C%2FFONT%3E%22feuert%22%20zu%20oft.%3CBR%20%2F%3E%20Das%20Hinzuf%C3%BCgen%20einer%20Totzeit%20f%C3%BChlt%20sich%20extrem%20verz%C3%B6gert%20an.%3CBR%20%2F%3E%3CBR%20%2F%3E%20%22Feuert%22%20die%20Mouse%20ox%20auch%2C%20wenn%20man%20die%20Taste%20losl%C3%A4sst%3F%20Gibt%20es%20daf%C3%BCr%20eine%20spezielle%20Einstellung%3F%3C%2FFONT%3E%3C%2FSETCLICKENABLE%3E%3C%2FP%3E%3CP%3E%3CFONT%20face%3D%22courier%20new%2Ccourier%22%3E%20%3C%2FFONT%3E%3C%2FP%3E%3CP%3E%3CFONT%20face%3D%22courier%20new%2Ccourier%22%3EAndererseits%3A%20Gibt%20es%20eine%20Funktion%20wie%20IS%20CTRL()%2C%20die%20den%20aktuellen%20Status%20der%20Maustasten%20zur%C3%BCckgibt%3F%3C%2FFONT%3E%3C%2FP%3E%3C%2FLINGO-BODY%3E%3CFONT%20face%3D%22courier%20new%2Ccourier%22%3E%3CLINGO-LABS%20id%3D%22lingo-labs-800088%22%20slang%3D%22en-US%22%20mode%3D%22CREATE%22%3E%3CLINGO-LABEL%3EAutomatisierung%20und%20Skripting%3C%2FLINGO-LABEL%3E%3C%2FLINGO-LABS%3E%3C%2FFONT%3E%3CLINGO-SUB%20id%3D%22lingo-sub-800098%22%20slang%3D%22en-US%22%20mode%3D%22CREATE%22%3EBetreff%3A%20Mausbox%20%E2%80%93%20Aktion%20f%C3%BCr%20Taste%20nach%20oben%3F%3C%2FLINGO-SUB%3E%3CLINGO-BODY%20id%3D%22lingo-body-800098%22%20slang%3D%22en-US%22%20mode%3D%22CREATE%22%3E%3CPRE%3E%3CCODE%20class%3D%22%20language-jsl%22%3Ew%20%3D%20New%20Window(%20%22Mouse%20Messages%22%2C%20%2F%2F%20modified%20from%20scripting%20index%20setClick%0A%09Border%20Box(%20Left(%2020%20)%2C%20Right(%2020%20)%2C%20top(%2020%20)%2C%20bottom(%2020%20)%2C%0A%09%09MouseBox(%20%2F*%20%26lt%3B%26lt%3B%26lt%3B%26lt%3B%26lt%3B%26lt%3B%26lt%3B%26lt%3B%20handler%20for%20mouse%20events%20*%2F%0A%09%09%09window%3Atb%20%3D%20Text%20Box(%20%22click%20me!%22%2C%20%26lt%3B%3CSETFONTSIZE%3E%3C%2FSETFONTSIZE%3E%3C%2FCODE%3E%3C%2FPRE%3E%3CCODE%20class%3D%22%20language-jsl%22%3E%0A%3CP%3E%3C%2FP%3E%3CDIV%20class%3D%22lia-vid-container%20video-embed-center%20lia-video-unavailable%22%3E%3CDIV%20id%3D%22lia-vid-6362132885112w400h300r408%22%20class%3D%22lia-video-ooyala-player-container%22%3E%3CDIV%20class%3D%22lia-video-status-message%22%3EDieses%20Video%20wird%20gerade%20verarbeitet.%20Bitte%20versuchen%20Sie%20es%20in%20ein%20paar%20Minuten%20noch%20einmal.%3C%2FDIV%3E%3C%2FDIV%3E%3CA%20class%3D%22video-embed-link%22%20href%3D%22https%3A%2F%2Fcommunity.jmp.com%2Ft5%2Fvideo%2Fgallerypage%2Fvideo-id%2F6362132885112%22%20target%3D%22_blank%22%3E(in%20%E2%80%9EMeine%20Videos%E2%80%9C%20anzeigen)%3C%2FA%3E%3C%2FDIV%3EYou%20might%20want%20to%20ignore%20Moved%20as%20well%20as%20Ticked.%3CP%3E%3C%2FP%3E%0A%3CP%3E%20%3C%2FP%3E%0A%3CP%3EMausBox%26lt%3B%20%3CSETCLICK%20example%3D%22%22%20in%3D%22%22%20the%3D%22%22%20scripting%3D%22%22%20index%3D%22%22%20is%3D%22%22%20one%3D%22%22%20of%3D%22%22%3E%3CA%20href%3D%22https%3A%2F%2Fcommunity.jmp.com%2Ft5%2FUncharted%2FThree-JSL-Easter-Eggs%2Fm-p%2F21181%23U21181%22%20class%3D%22lia-mention-container-editor-message%20lia-img-icon-blog-thread%20lia-fa-icon%20lia-fa-blog%20lia-fa-thread%20lia-fa%22%20target%3D%22_blank%22%3E%20Drei%20JSL-Easter%20Eggs%3C%2FA%3E%3C%2FSETCLICK%3E%3C%2FP%3E%3C%2FCODE%3E%3C%2FLINGO-BODY%3E%3CLINGO-SUB%20id%3D%22lingo-sub-800130%22%20slang%3D%22en-US%22%20mode%3D%22UPDATE%22%3EBetreff%3A%20Mausbox%20%E2%80%93%20Aktion%20f%C3%BCr%20Taste%20nach%20oben%3F%3C%2FLINGO-SUB%3E%3CLINGO-BODY%20id%3D%22lingo-body-800130%22%20slang%3D%22en-US%22%20mode%3D%22UPDATE%22%3E%3CP%3EDanke.%20Wunderbar%3CLI-EMOJI%20id%3D%22lia_slightly-smiling-face%22%20title%3D%22%3Acara_con_una_leve_sonrisa%3A%22%3E%3C%2FLI-EMOJI%3E%3C%2FP%3E%3CP%3E%3CBR%20%2F%3Esehr%20gut%20dokumentiert%20im%20Skriptindex%20%E2%80%93%20wie%20konnte%20ich%20das%20%C3%BCbersehen%20%E2%80%A6%3C%2FP%3E%3CP%3E%20%3C%2FP%3E%3C%2FLINGO-BODY%3E%3CLINGO-SUB%20id%3D%22lingo-sub-822405%22%20slang%3D%22en-US%22%20mode%3D%22UPDATE%22%3EBetreff%3A%20Mausbox%20%E2%80%93%20Aktion%20f%C3%BCr%20Taste%20nach%20oben%3F%3C%2FLINGO-SUB%3E%3CLINGO-BODY%20id%3D%22lingo-body-822405%22%20slang%3D%22en-US%22%20mode%3D%22UPDATE%22%3E%3CP%3EUnd%20ist%20mit%20dem%20Hovern%20%C3%BCber%20der%20MouseBox%20eine%20Aktion%20verkn%C3%BCpft%20%E2%80%93%20etwa%20bei%20Hoverlabels%3F%3C%2FP%3E%3CP%3E%20%3C%2FP%3E%3CP%3EIch%20habe%20versucht%2C%20dem%20%3CFONT%20face%3D%22courier%20new%2Ccourier%22%3ETooltip%3C%2FFONT%3E%20einen%20JSL-Befehl%20hinzuzuf%C3%BCgen%20%E2%80%93%20aber%20leider%20wird%20das%20Argument%20%26lt%3B%26lt%3B%20%3CFONT%20face%3D%22courier%20new%2Ccourier%22%3EsetTooltip%3C%2FFONT%3E%20bereits%20ausgewertet.%3CBR%20%2F%3E%20Bearbeitet%3A%3CBR%20%2F%3E%20Wenn%20Sie%20den%20Befehl%20in%20%3CFONT%20face%3D%22courier%20new%2Ccourier%22%3EExpr()%3C%2FFONT%3E%20einf%C3%BCgen%2C%20wird%20verhindert%2C%20dass%20JMP%20den%20Befehl%20beim%20Erstellen%20des%20Fensters%20auswertet.%3C%2FP%3E%3CP%3ELeider%20wird%20es%20auch%20sp%C3%A4ter%20nicht%20ausgewertet.%3C%2FP%3E%3CPRE%3E%3CCODE%20class%3D%22%20language-jsl%22%3Enew%20window(%22%22%2CMouse%20Box%20(Text%20Box(%22Caption%20when%20mouseover%3F%22)%2C%26lt%3B%3CSETTOOLTIP%3E%3C%2FSETTOOLTIP%3E%3C%2FCODE%3E%3C%2FPRE%3E%3CP%3E%3CCODE%20class%3D%22%20language-jsl%22%3E%20%3C%2FCODE%3E%3C%2FP%3E%3CP%3E%3CCODE%20class%3D%22%20language-jsl%22%3EMy%20next%20try%3A%20use%20%3CFONT%20face%3D%22courier%20new%2Ccourier%22%3E%26lt%3B%26lt%3B%20setKeyEnabled(1)%3C%2FFONT%3Eand%20use%20a%20key%20on%20the%20keyboard%20to%20trigger%20the%20action.%3CBR%20%2F%3EBut%20the%20Mouse%20Box%20needs%20a%20%3CFONT%20face%3D%22courier%20new%2Ccourier%22%3E%26lt%3B%3CSET%20focus%3D%22%22%3E%26lt%3B%20ont%26gt%3B%20-%20scheint%20also%20nicht%20die%20richtige%20Wahl%20f%C3%BCr%20ein%20MouseOver%20zu%20sein.%3C%2FSET%3E%3C%2FFONT%3E%3C%2FCODE%3E%3C%2FP%3E%3C%2FLINGO-BODY%3E%3CLINGO-SUB%20id%3D%22lingo-sub-822727%22%20slang%3D%22en-US%22%20mode%3D%22CREATE%22%3EBetreff%3A%20Mausbox%20%E2%80%93%20Aktion%20f%C3%BCr%20Taste%20nach%20oben%3F%3C%2FLINGO-SUB%3E%3CLINGO-BODY%20id%3D%22lingo-body-822727%22%20slang%3D%22en-US%22%20mode%3D%22CREATE%22%3E%3CP%3ENur%20die%20Cursor%C3%A4nderung%2C%20glaube%20ich.%20Trotzdem%20eine%20tolle%20Idee.%3C%2FP%3E%3C%2FLINGO-BODY%3E
Choose Language Hide Translation Bar
hogi
Level XII

Mouse box - action for button up?

For Mouse box , the approach via 
<<setClickEnable( 1 ),
<<setClick()

"fires" too often.
Adding a dead time feels extremely laggy.

Does the Mouse ox also "fire" when the button is released? Is there a special setting?

 

On the other hand: is there some function like IS CTRL() which returns the current status of the mouse buttons?

1 ACCEPTED SOLUTION

Accepted Solutions
Craige_Hales
Super User

Re: Mouse box - action for button up?

w = New Window( "Mouse Messages", // modified from scripting index setClick
	Border Box( Left( 20 ), Right( 20 ), top( 20 ), bottom( 20 ),
		MouseBox( /* <<<<<<<< handler for mouse events */
			window:tb = Text Box( "click me!", <<setFontSize( 48 ), <<setwrap( 999 ) ), /* <<<<<< child box does not receive the mouse events */
			<<setClickEnable( 1 ),
			<<setClick( /* button-down, move, button-release handler */
				// the Ticked event happens frequently, and makes it hard to see the Pressed event, so ignore it...
				Function( {this, clickpt, event}, /*Is Alt Key(),Is Control Key(),Is Shift Key() should be captured on "Pressed" */
					If(  event != "Ticked",
						window:tb << settext( event || Char( clickpt ) );
					)
				)
			)
		)
	);
);

You might want to ignore Moved as well as Ticked.

 

MouseBox<<setClick example in the scripting index is one of the Three JSL Easter Eggs 

Craige

View solution in original post

4 REPLIES 4
Craige_Hales
Super User

Re: Mouse box - action for button up?

w = New Window( "Mouse Messages", // modified from scripting index setClick
	Border Box( Left( 20 ), Right( 20 ), top( 20 ), bottom( 20 ),
		MouseBox( /* <<<<<<<< handler for mouse events */
			window:tb = Text Box( "click me!", <<setFontSize( 48 ), <<setwrap( 999 ) ), /* <<<<<< child box does not receive the mouse events */
			<<setClickEnable( 1 ),
			<<setClick( /* button-down, move, button-release handler */
				// the Ticked event happens frequently, and makes it hard to see the Pressed event, so ignore it...
				Function( {this, clickpt, event}, /*Is Alt Key(),Is Control Key(),Is Shift Key() should be captured on "Pressed" */
					If(  event != "Ticked",
						window:tb << settext( event || Char( clickpt ) );
					)
				)
			)
		)
	);
);

You might want to ignore Moved as well as Ticked.

 

MouseBox<<setClick example in the scripting index is one of the Three JSL Easter Eggs 

Craige
hogi
Level XII

Re: Mouse box - action for button up?

Thanks. wonderful  


very well documented in the scripting index - how could I miss it  ...

 

hogi
Level XII

Re: Mouse box - action for button up?

And is there an action associated with hovering over the mouseBox - like with Hoverlabels?

 

I tried to add a JSL command to the Tooltip - but unfortunately the argument of << setTooltip is pre-evaluated.
Edited:
Putting the command inside Expr() stops JMP from evaluating the command while creating the window.

Unfortunately, it also doesn't get evaluated later.

new window("",Mouse Box (Text Box("Caption when mouseover?"),<<setTooltip(Caption ("Hello"); "click to revert" )))

 

My next try: use << setKeyEnabled(1) and use a key on the keyboard to trigger the action.
But the Mouse Box needs a <<set focus - so doesn't seem to be the right choice for a MouseOver.

Craige_Hales
Super User

Re: Mouse box - action for button up?

Just the cursor change, I think. Great idea though.

Craige

Recommended Articles