Core Function KeyHook - Revision history

UberFoX: 1 revision

2015-06-14T12:37:15Z

1 revision

← Older revision

Revision as of 12:37, 14 June 2015

UberFoX: 1 revision

2014-08-11T21:40:55Z

1 revision

← Older revision

Revision as of 21:40, 11 August 2014

UberFoX at 10:55, 19 October 2013

2013-10-19T10:55:16Z

← Older revision		Revision as of 10:55, 19 October 2013
Line 29:		Line 29:
	=== Return Value ===		=== Return Value ===

−	Success: Returns ~~a valid pointer to a mouse hook~~.	+	Success: Returns true.

	Failure: Returns @PTRZero.		Failure: Returns @PTRZero.
Line 49:		Line 49:
	Function removeIt()		Function removeIt()
	{		{
−	~~KeyHookKill($hookId);~~	+	KeyHook("MyHook");
−	~~println("Deleted Hook ID '$hookId'");~~	+	println("Deleted Hook Name 'MyHook'");
−	~~// OR~~	+
−	//KeyHook("MyHook");	+
−	//println("Deleted Hook Name 'MyHook'");	+
	}		}

UberFoX: /* Example */

2013-10-18T00:01:41Z

Example

← Older revision		Revision as of 00:01, 18 October 2013
Line 69:		Line 69:
	{		{
	my List( $VkCode, $ScanCode, $Flags, $Time, $DwExtraInfo ) = $Key;		my List( $VkCode, $ScanCode, $Flags, $Time, $DwExtraInfo ) = $Key;
−	my List( $~~Key~~, $Control, $Shift, $Alt, $CapsLock ) = $KeyExtra;	+	my List( $Char, $Control, $Shift, $Alt, $CapsLock ) = $KeyExtra;
−	println( "KeyDOWN Hook '$Name' Key '$~~Key~~' VKCode '$VkCode'" );	+	println( "KeyDOWN Hook '$Name' Key '$Char' VKCode '$VkCode'" );
	// If user presses Q remove the hook!		// If user presses Q remove the hook!
−	if($~~Key~~ == "q")	+	if($Char== "q")
	{		{
	// If true is ever returned the hook will be removed		// If true is ever returned the hook will be removed
Line 82:		Line 82:
	{		{
	my List( $VkCode, $ScanCode, $Flags, $Time, $DwExtraInfo ) = $Key;		my List( $VkCode, $ScanCode, $Flags, $Time, $DwExtraInfo ) = $Key;
−	my List( $~~Key~~, $Control, $Shift, $Alt, $CapsLock ) = $KeyExtra;	+	my List( $Char, $Control, $Shift, $Alt, $CapsLock ) = $KeyExtra;
−	println( "KeyUP Hook '$Name' Key '$~~Key~~' VKCode '$VkCode'" );	+	println( "KeyUP Hook '$Name' Key '$Char' VKCode '$VkCode'" );
	}		}
	}		}

UberFoX: /* Example */

2013-10-17T21:50:58Z

Example

← Older revision		Revision as of 21:50, 17 October 2013
Line 43:		Line 43:
	<syntaxhighlight lang="sputnik">		<syntaxhighlight lang="sputnik">
	// Set a new Keyhook called MyHook		// Set a new Keyhook called MyHook
−	$hookId = KeyHook("MyHook", 'myKeyHook($~~arg~~, $~~key~~);');	+	$hookId = KeyHook("MyHook", 'myKeyHook($Arg, $Key, $KeyExtra);');
−		+
	// Pressing P will cause the hook to be removed		// Pressing P will cause the hook to be removed
	HotKeySet("p", "removeIt();");		HotKeySet("p", "removeIt();");
Line 50:		Line 50:
	{		{
	KeyHookKill($hookId);		KeyHookKill($hookId);
		+	println("Deleted Hook ID '$hookId'");
	// OR		// OR
	//KeyHook("MyHook");		//KeyHook("MyHook");
		+	//println("Deleted Hook Name 'MyHook'");
	}		}

Line 59:		Line 61:
	}		}

−	Function myKeyHook($~~arg~~, $~~key~~)	+	Function myKeyHook($Arg, $Key, $KeyExtra)
	{		{
−	my List( $Name, $nCode, $wParam, $lParam ) = $~~arg~~;	+	my List( $Name, $nCode, $wParam, $lParam ) = $Arg;
	if($nCode >= 0)		if($nCode >= 0)
	{		{
	if($wParam == 0x0100) // WM_KEYDOWN		if($wParam == 0x0100) // WM_KEYDOWN
	{		{
−	my List( $~~vkCode~~, $~~scanCode~~, $~~flags~~, $~~time~~, $~~dwExtraInfo~~ ) = $~~key~~;	+	my List( $VkCode, $ScanCode, $Flags, $Time, $DwExtraInfo ) = $Key;
−	my ~~$Char = Chr~~($~~vkCode~~);	+	my List( $Key, $Control, $Shift, $Alt, $CapsLock ) = $KeyExtra;
−	println( "KeyDOWN Hook '$Name' ~~VKCode~~ '$~~vkCode~~' ~~Char~~ '$~~Char~~'" );	+	println( "KeyDOWN Hook '$Name' Key '$Key' VKCode '$VkCode'" );
	// If user presses Q remove the hook!		// If user presses Q remove the hook!
−	if($~~Char~~ == "Q")	+	if($Key == "q")
	{		{
	// If true is ever returned the hook will be removed		// If true is ever returned the hook will be removed
	println("Deleted Hook Name '$Name'");		println("Deleted Hook Name '$Name'");
	return true;		return true;
−	}
−	~~// Alternative method to delete~~
−	~~// If user presses E remove the hook!~~
−	~~else if($Char == "E")~~
−	{
−	~~// Setting the hotkey with only 1 param causes it to delete the old one~~
−	~~println("Deleted Hook Name '$Name'");~~
−	~~KeyHook("MyHook");~~
	}		}
	}		}
	else if($wParam == 0x0101) // WM_KEYUP		else if($wParam == 0x0101) // WM_KEYUP
	{		{
−	my List( $~~vkCode~~, $~~scanCode~~, $~~flags~~, $~~time~~, $~~dwExtraInfo~~ ) = $~~key~~;	+	my List( $VkCode, $ScanCode, $Flags, $Time, $DwExtraInfo ) = $Key;
−	my ~~$Char = Chr~~($~~vkCode~~);	+	my List( $Key, $Control, $Shift, $Alt, $CapsLock ) = $KeyExtra;
−	println( "KeyUP Hook '$Name' ~~VKCode~~ '$~~vkCode~~' ~~Char~~ '$~~Char~~'" );	+	println( "KeyUP Hook '$Name' Key '$Key' VKCode '$VkCode'" );
	}		}
	}		}

UberFoX: /* Example */

2013-10-17T21:19:18Z

Example

← Older revision		Revision as of 21:19, 17 October 2013
Line 43:		Line 43:
	<syntaxhighlight lang="sputnik">		<syntaxhighlight lang="sputnik">
	// Set a new Keyhook called MyHook		// Set a new Keyhook called MyHook
−	KeyHook("MyHook", 'myKeyHook($arg, $key);');	+	$hookId = KeyHook("MyHook", 'myKeyHook($arg, $key);');

	// Pressing P will cause the hook to be removed		// Pressing P will cause the hook to be removed
Line 49:		Line 49:
	Function removeIt()		Function removeIt()
	{		{
−	KeyHookKill($a);	+	KeyHookKill($hookId);
	// OR		// OR
	//KeyHook("MyHook");		//KeyHook("MyHook");

UberFoX at 02:32, 9 October 2013

2013-10-09T02:32:42Z

← Older revision		Revision as of 02:32, 9 October 2013
Line 1:		Line 1:
	<pre>		<pre>
−	KeyHook( <name>, <command> )	+	KeyHook( <name>, <command>, <param var> )
	</pre>		</pre>

Line 22:		Line 22:

	This is similar to Eval().		This is similar to Eval().
		+
		+	==== param var ====
		+
		+	Optional; A variable to pass inside the keyhook this variable will become $Param this is most useful for attaching a class to the keyhook so you can access its variables, functions natively.

	=== Return Value ===		=== Return Value ===

UberFoX: /* Example */

2013-10-09T02:22:26Z

Example

← Older revision		Revision as of 02:22, 9 October 2013
Line 46:		Line 46:
	{		{
	KeyHookKill($a);		KeyHookKill($a);
		+	// OR
		+	//KeyHook("MyHook");
	}		}

UberFoX: /* Example */

2013-10-09T02:03:03Z

Example

← Older revision		Revision as of 02:03, 9 October 2013
Line 39:		Line 39:
	<syntaxhighlight lang="sputnik">		<syntaxhighlight lang="sputnik">
	// Set a new Keyhook called MyHook		// Set a new Keyhook called MyHook
−	KeyHook("MyHook", "myKeyHook();");	+	KeyHook("MyHook", 'myKeyHook($arg, $key);');

	// Pressing P will cause the hook to be removed		// Pressing P will cause the hook to be removed
Line 53:		Line 53:
	}		}

−	Function myKeyHook()	+	Function myKeyHook($arg, $key)
	{		{
	my List( $Name, $nCode, $wParam, $lParam ) = $arg;		my List( $Name, $nCode, $wParam, $lParam ) = $arg;

UberFoX: /* Return Value */

2013-08-26T01:00:24Z

Return Value

← Older revision		Revision as of 01:00, 26 August 2013
Line 27:		Line 27:
	Success: Returns a valid pointer to a mouse hook.		Success: Returns a valid pointer to a mouse hook.

−	Failure: Returns 0.	+	Failure: Returns @PTRZero.

	=== Remarks ===		=== Remarks ===