Core Function GUIWndProc - Revision history

UberFoX: 1 revision

2015-06-14T12:37:08Z

1 revision

← Older revision

Revision as of 12:37, 14 June 2015

UberFoX: 1 revision

2014-08-11T21:40:51Z

1 revision

← Older revision

Revision as of 21:40, 11 August 2014

UberFoX: /* Examples */

2013-09-30T21:56:20Z

Examples

← Older revision		Revision as of 21:56, 30 September 2013
Line 50:		Line 50:
	GUILoad( $Window );		GUILoad( $Window );
	// Add a MsgFilter to Design Window		// Add a MsgFilter to Design Window
−	GUIWndProc($Window, "WndProc();");	+	GUIWndProc($Window, 'WndProc($HWND, $MSG, $WPARAM, $LPARAM);');

	// Keep the GUI running as long as long as the window is open		// Keep the GUI running as long as long as the window is open
Line 61:		Line 61:
	// $LPARAM		// $LPARAM
	// All them names should be familiar to you		// All them names should be familiar to you
−	Function WndProc()	+	Function WndProc($HWND, $MSG, $WPARAM, $LPARAM)
	{		{
	// Uncomment to show all messages		// Uncomment to show all messages

UberFoX: /* Return Value */

2012-04-30T06:22:37Z

Return Value

← Older revision		Revision as of 06:22, 30 April 2012
Line 20:		Line 20:

	Success: Returns 1.		Success: Returns 1.
		+
	Failure: Returns 0.		Failure: Returns 0.

UberFoX: /* Examples */

2012-03-28T11:00:38Z

Examples

← Older revision		Revision as of 11:00, 28 March 2012
Line 80:		Line 80:
	DLLStructSetData($Struct, "y", 0);		DLLStructSetData($Struct, "y", 0);
	}		}
−	return 0; // If you return HIGHER than 0 the ~~msgfilter~~ will be removed	+	return 0; // If you return HIGHER than 0 the WindProc callback will be removed
	}		}
	</syntaxhighlight>		</syntaxhighlight>

	[[Category:Core Function]]		[[Category:Core Function]]

UberFoX: /* Examples */

2012-03-28T10:53:04Z

Examples

← Older revision		Revision as of 10:53, 28 March 2012
Line 62:		Line 62:
	Function WndProc()		Function WndProc()
	{		{
		+	// Uncomment to show all messages
		+	//println("HWND: " . $HWND . " \| MSG: " . $MSG . " \| WParam: " . $WParam . " \| LParam: " . $LParam);
	// Get a message when user tries to move the Design window		// Get a message when user tries to move the Design window
	if ($MSG == 0x0046) # WM_WINDOWPOSCHANGING		if ($MSG == 0x0046) # WM_WINDOWPOSCHANGING
	{		{
−	~~// Uncomment to show all messages~~
−	~~//println("HWND: " . $HWND . " \| MSG: " . $MSG . " \| WParam: " . $WParam . " \| LParam: " . $LParam);~~
−
	// Uncomment to see how to read from the memory pointer		// Uncomment to see how to read from the memory pointer
	//println("X: " . PTRRead( $LParam, "i", 8 ));		//println("X: " . PTRRead( $LParam, "i", 8 ));

UberFoX: /* Examples */

2012-03-28T10:52:36Z

Examples

← Older revision		Revision as of 10:52, 28 March 2012
Line 28:		Line 28:
	<syntaxhighlight lang="sputnik">		<syntaxhighlight lang="sputnik">
	DLLStructCreateDef("WindowPos",		DLLStructCreateDef("WindowPos",
−	@"	+	@"
−	ptr hwnd;	+	ptr hwnd;
−	ptr hwndInsertAfter;	+	ptr hwndInsertAfter;
−	int x;	+	int x;
−	int y;	+	int y;
−	int cx;	+	int cx;
−	int cy;	+	int cy;
−	uint flags	+	uint flags
−	");	+	");

	// Create the MDI GUI		// Create the MDI GUI

UberFoX: Created page with "

 GUIWndProc( ,  )

=== Description === Use a function to receive all the WindProc messages windows sends to the GUI window (HWND, MSG, WPARAM, LPARAM)...."

2012-03-28T10:52:02Z

Created page with "<pre> GUIWndProc( <gui>, <command> ) </pre> === Description === Use a function to receive all the WindProc messages windows sends to the GUI window (HWND, MSG, WPARAM, LPARAM)...."

New page

<pre>
GUIWndProc( <gui>, <command> )
</pre>

=== Description ===

Use a function to receive all the WindProc messages windows sends to the GUI window (HWND, MSG, WPARAM, LPARAM).

=== Parameters ===

==== gui ====

The GUI to link the WindProc to.

==== command ====

Either a command to execute or a function to call etc.

=== Return Value ===

Success: Returns 1.
Failure: Returns 0.

=== Examples ===

This example uses the WindProc to capture the WM_WINDOWPOSCHANGING message and stop it from allowing the window to be moved

<syntaxhighlight lang="sputnik">
DLLStructCreateDef("WindowPos",
@"
ptr hwnd;
ptr hwndInsertAfter;
int x;
int y;
int cx;
int cy;
uint flags
");

// Create the MDI GUI
$GUI = GUICreate("MDIWindow", "GUI", 800, 600);
// Show the MDI GUI
GUILoad( $GUI );

// Create the Design Window
$Window = GUICreate("Window", "GUI", 640, 482, 0, 0);
GUIMDIParent($Window, $GUI);
// Show the Design Window
GUILoad( $Window );
// Add a MsgFilter to Design Window
GUIWndProc($Window, "WndProc();");

// Keep the GUI running as long as long as the window is open
While ( GUIStatus( $GUI ) ) DoEvents( );

// When you create a WndProc 4 variables are automatically created for you
// $HWND
// $MSG
// $WPARAM
// $LPARAM
// All them names should be familiar to you
Function WndProc()
{
// Get a message when user tries to move the Design window
if ($MSG == 0x0046) # WM_WINDOWPOSCHANGING
{
// Uncomment to show all messages
//println("HWND: " . $HWND . " | MSG: " . $MSG . " | WParam: " . $WParam . " | LParam: " . $LParam);

// Uncomment to see how to read from the memory pointer
//println("X: " . PTRRead( $LParam, "i", 8 ));
//println("Y: " . PTRRead( $LParam, "i", 12 ));

// Heres the best way to read the pointer by converting it into a Structure
$Struct = PTRToDLLStruct("WindowPos", $LParam);
println("X: " . DLLStructGetData($Struct, "x"));
println("Y: " . DLLStructGetData($Struct, "y"));

// Set the new coordinates for the Design window to 0, 0 this will prevent it from being moved
DLLStructSetData($Struct, "x", 0);
DLLStructSetData($Struct, "y", 0);
}
return 0; // If you return HIGHER than 0 the msgfilter will be removed
}
</syntaxhighlight>

[[Category:Core Function]]