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%3EBo%C3%AEte%20%C3%A0%20souris%20-%20action%20pour%20bouton%20vers%20le%20haut%20%3F%3C%2FLINGO-SUB%3E%3CLINGO-BODY%20id%3D%22lingo-body-800088%22%20slang%3D%22en-US%22%20mode%3D%22CREATE%22%3E%3CP%3EPour%20la%20bo%C3%AEte%20%C3%A0%20souris%2C%20l'approche%20via%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%C2%AB%20incendies%20%C2%BB%20trop%20souvent.%3CBR%20%2F%3E%20L'ajout%20d'un%20temps%20mort%20semble%20extr%C3%AAmement%20lent.%3CBR%20%2F%3E%3CBR%20%2F%3E%20La%20souris%20%22tire%22-t-elle%20%C3%A9galement%20lorsque%20le%20bouton%20est%20rel%C3%A2ch%C3%A9%20%3F%20Existe-t-il%20un%20r%C3%A9glage%20sp%C3%A9cial%20%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%3ED'autre%20part%20%3A%20existe-t-il%20une%20fonction%20comme%20IS%20CTRL()%20qui%20renvoie%20l'%C3%A9tat%20actuel%20des%20boutons%20de%20la%20souris%20%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%3EAutomatisation%20et%20scripts%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%3ERe%3A%20Bo%C3%AEte%20%C3%A0%20souris%20-%20action%20pour%20bouton%20vers%20le%20haut%20%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%3ECette%20vid%C3%A9o%20est%20en%20cours%20de%20traitement.%20Veuillez%20r%C3%A9essayer%20dans%20quelques%20minutes.%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(voir%20dans%20Mes%20vid%C3%A9os)%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%3EBo%C3%AEte%20%C3%A0%20souris%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%20Trois%20%C5%93ufs%20de%20P%C3%A2ques%20JSL%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%3ERe%3A%20Bo%C3%AEte%20%C3%A0%20souris%20-%20action%20pour%20bouton%20vers%20le%20haut%20%3F%3C%2FLINGO-SUB%3E%3CLINGO-BODY%20id%3D%22lingo-body-800130%22%20slang%3D%22en-US%22%20mode%3D%22UPDATE%22%3E%3CP%3EMerci.%20merveilleux%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%3Etr%C3%A8s%20bien%20document%C3%A9%20dans%20l'index%20des%20scripts%20-%20comment%20ai-je%20pu%20le%20manquer...%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%3ERe%3A%20Bo%C3%AEte%20%C3%A0%20souris%20-%20action%20pour%20bouton%20vers%20le%20haut%20%3F%3C%2FLINGO-SUB%3E%3CLINGO-BODY%20id%3D%22lingo-body-822405%22%20slang%3D%22en-US%22%20mode%3D%22UPDATE%22%3E%3CP%3EEt%20existe-t-il%20une%20action%20associ%C3%A9e%20au%20survol%20de%20la%20souris%20sur%20la%20mouseBox%20-%20comme%20avec%20Hoverlabels%20%3F%3C%2FP%3E%3CP%3E%20%3C%2FP%3E%3CP%3EJ'ai%20essay%C3%A9%20d'ajouter%20une%20commande%20JSL%20%C3%A0%20l'%20%3CFONT%20face%3D%22courier%20new%2Ccourier%22%3Einfo-bulle%3C%2FFONT%3E%20-%20mais%20malheureusement%20l'argument%20de%20%26lt%3B%26lt%3B%20%3CFONT%20face%3D%22courier%20new%2Ccourier%22%3EsetTooltip%3C%2FFONT%3E%20est%20pr%C3%A9-%C3%A9valu%C3%A9.%3CBR%20%2F%3E%20%C3%89dit%C3%A9%3A%3CBR%20%2F%3E%20Placer%20la%20commande%20dans%20%3CFONT%20face%3D%22courier%20new%2Ccourier%22%3EExpr()%3C%2FFONT%3E%20emp%C3%AAche%20JMP%20d'%C3%A9valuer%20la%20commande%20lors%20de%20la%20cr%C3%A9ation%20de%20la%20fen%C3%AAtre.%3C%2FP%3E%3CP%3EMalheureusement%2C%20cela%20n%E2%80%99est%20pas%20non%20plus%20%C3%A9valu%C3%A9%20ult%C3%A9rieurement.%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-%20cela%20ne%20semble%20donc%20pas%20%C3%AAtre%20le%20bon%20choix%20pour%20un%20MouseOver.%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%3ERe%3A%20Bo%C3%AEte%20%C3%A0%20souris%20-%20action%20pour%20bouton%20vers%20le%20haut%20%3F%3C%2FLINGO-SUB%3E%3CLINGO-BODY%20id%3D%22lingo-body-822727%22%20slang%3D%22en-US%22%20mode%3D%22CREATE%22%3E%3CP%3EJe%20pense%20que%20c'est%20juste%20le%20changement%20de%20curseur.%20Mais%20c'est%20une%20excellente%20id%C3%A9e.%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