@ModKeys ( expression )

An elegant way to use the Get ( …ModifierKeys ) functions.

Average rating: 4.0 (1 vote) Log in to vote

Alex Zueiv - Show more from this author
Tashkent
https://github.com/zueiv

Sample input:

@ModKeys ( "Caps Lock + Shift" )

Sample output:

Function definition: (Copy & paste into FileMaker's Edit Custom Function window)

/**
* @ModKeys ( expression )
*
* Verbal wrapper for Get ( …ModifierKeys ) functions.
* Returns True (1) if the specified keys are pressed.
* Caps Lock is ignored if it is not specified in the parameter.
*
* Usage examples:
*
*	@ModKeys ( "Shift" )
*	@ModKeys ( "Shift + Ctrl + Alt" )
*	@ModKeys ( "Shift + Control + Option + Command" )
*	@ModKeys ( "Caps Lock + Shift" )
*	@ModKeys ( 0 ) // none or caps lock
*
* Updated 2023-08-29 by Alex Zueiv
* https://www.briandunning.com/cf/2173
**/


Let ( [

modKeys = Get ( TriggerModifierKeys ) ;
modKeys = If ( modKeys ; modKeys ; Get ( ActiveModifierKeys ) )

] ;

Evaluate (

	"let ( [
		shift = 1 ;
		caps lock = 2 ; capslock = 2 ; caps = 2 ;
		ctrl = 4 ; control = 4 ;
		alt = 8 ; option = 8 ;
		command = 16 ; cmnd = 16 ;

		mk = "& modKeys &" ;
		mk = "& If ( PatternCount ( expression ; "caps" ) ; "mk" ; "mod(mk;2)+div(mk;4)*4" ) &"
	] ;
		mk = "& expression &"
	)"

) )

Wrapper for Get ( …ModifierKeys ) functions that allows you to specify keys in verbal form, for example: "Alt + Ctrl"

Comments

Note: these functions are not guaranteed or supported by BrianDunning.com. Please contact the individual developer with any questions or problems.

@ModKeys ( expression )

Comments

Support this website.

Support this website.