Core Function PTRToDLLStruct - 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: /* Example */

2014-08-02T19:35:14Z

Example

← Older revision		Revision as of 19:35, 2 August 2014
Line 40:		Line 40:
	uint flags		uint flags
	");		");
−		+
	// Create the MDI GUI		// Create the MDI GUI
	$GUI = GUICreate("MDIWindow", "GUI", 800, 600);		$GUI = GUICreate("MDIWindow", "GUI", 800, 600);
	// Show the MDI GUI		// Show the MDI GUI
	GUILoad( $GUI );		GUILoad( $GUI );
−		+
	// Create the Design Window		// Create the Design Window
	$Window = GUICreate("Window", "GUI", 640, 482, 0, 0);		$Window = GUICreate("Window", "GUI", 640, 482, 0, 0);
Line 52:		Line 52:
	GUILoad( $Window );		GUILoad( $Window );
	// Add a MsgFilter to Design Window		// Add a MsgFilter to Design Window
−	GUIWndProc($Window, "DesignWndProc();");	+	GUIWndProc($Window, 'DesignWndProc($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
	While ( GUIStatus( $GUI ) ) DoEvents( );		While ( GUIStatus( $GUI ) ) DoEvents( );
−		+
−	Function DesignWndProc()	+	Function DesignWndProc($HWND, $MSG, $WPARAM, $LPARAM)
	{		{
	if ($MSG == 0x0046) # WM_WINDOWPOSCHANGING		if ($MSG == 0x0046) # WM_WINDOWPOSCHANGING

UberFoX: /* Return Value */

2013-08-22T21:03:54Z

Return Value

← Older revision		Revision as of 21:03, 22 August 2013
Line 21:		Line 21:
	Success - Returns the DLLStruct.		Success - Returns the DLLStruct.

−	Failure - Returns 0 and most likely throws exception.	+	Failure - Returns false and most likely throws exception.

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

UberFoX: /* Example */

2012-03-28T11:44:04Z

Example

← Older revision		Revision as of 11:44, 28 March 2012
Line 31:		Line 31:
	<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: /* Remarks */

2012-03-28T11:43:47Z

Remarks

← Older revision		Revision as of 11:43, 28 March 2012
Line 25:		Line 25:
	=== Remarks ===		=== Remarks ===

−	~~None.~~	+	DLLStructToPTR function does not exist by name but it does exist in function instead use DLLStructGetPtr to get the pointer of a DLLStruct (The reverse of this PTRToDLLStruct)

	=== Example ===		=== Example ===

UberFoX: Created page with "

 PTRToDLLStruct( ,  )

=== Description === Reads a DLLStruct from a memory pointer === Parameters === ==== def string ==== A string representing..."

2012-03-28T11:42:44Z

Created page with "<pre> PTRToDLLStruct( <def string>, <ptr> ) </pre> === Description === Reads a DLLStruct from a memory pointer === Parameters === ==== def string ==== A string representing..."

New page

<pre>
PTRToDLLStruct( <def string>, <ptr> )
</pre>

=== Description ===

Reads a DLLStruct from a memory pointer

=== Parameters ===

==== def string ====

A string representing the structure to create (See DLLStructCreate).

==== ptr ====

A pointer to allocated memory to use as the Structs data.

=== Return Value ===

Success - Returns the DLLStruct.

Failure - Returns 0 and most likely throws exception.

=== Remarks ===

None.

=== Example ===

<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, "DesignWndProc();");

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

Function DesignWndProc()
{
if ($MSG == 0x0046) # WM_WINDOWPOSCHANGING
{
$Struct = PTRToDLLStruct("WindowPos", $LParam);
DLLStructSetData($Struct, "x", 0);
DLLStructSetData($Struct, "y", 0);
}
return 0;
}
</syntaxhighlight>

[[Category:Core Function]]