View source for Win messages

{{PageHeader|Windows API messages}}


__TOC__


<!------------------------------>
{{TipHeader|How to detect mouse leaving a window}}

When the mouse cursor is leaving a window a message is send to the window indicating this.<br>
But to enable this feature, you will have to call the Windows API function TrackMouseEvent first to register the window.


This is the declaration for [http://msdn.microsoft.com/library/default.asp?url=/library/en-us/winui/winui/windowsuserinterface/userinput/mouseinput/mouseinputreference/mouseinputfunctions/trackmouseevent.asp <b>TrackMouseEvent</b>]

<pre>
Library name: USER32.DLL
   Function: TrackMouseEvent
      Export Ordinal: 0
      Returns
         Boolean: BOOL
      Parameters
         structPointer
            Number: DWORD
            Number: DWORD
            Window Handle: HWND
            Number: DWORD
</pre>


The following list of possible constant declarations for the function [http://msdn.microsoft.com/library/default.asp?url=/library/en-us/winui/winui/windowsuserinterface/userinput/mouseinput/mouseinputreference/mouseinputfunctions/trackmouseevent.asp <b>TrackMouseEvent</b>]<br>


(The NC constants are for the non-client area's like caption or borders)

<pre>
! Below the flags for TrackMouseEvent

Number: TME_HOVER         = 0x0001
Number: TME_LEAVE         = 0x0002
Number: TME_NONCLIENT     = 0x0010

! Below the message constants being send on notification

Number: WM_NCMOUSEHOVER   = 0x02A0
Number: WM_MOUSEHOVER     = 0x02A1
Number: WM_NCMOUSELEAVE   = 0x02A2
Number: WM_MOUSELEAVE     = 0x02A3

! Below the mousemove message as used in the sample

Number: WM_MOUSEMOVE     = 0x0200
</pre>

To register a window to receive messages when leaving or hovering the window

<pre>
! Below register window to receive LEAVE notification
Call TrackMouseEvent( 16, TME_LEAVE, hWndForm, 1 )

! Below register window to receive HOVER notification
Call TrackMouseEvent( 16, TME_HOVER, hWndForm, 400 )
</pre>

The next sample shows an implementation of this feature.<br>
When the user moves the mouse within the window, the message [http://msdn.microsoft.com/library/default.asp?url=/library/en-us/winui/winui/windowsuserinterface/userinput/mouseinput/mouseinputreference/mouseinputmessages/wm_mousemove.asp WM_MOUSEMOVE] is received.


There the window will be registered to be notified when the mouse is leaving.<br>
A boolean (wbTracking) is used to hold if the window is already registered.<br>


The window will be registered until it receives a notification.

<pre>
Form Window: frmSample
   Window Variables
      Boolean: wbTracking
   Message Actions
      On WM_MOUSELEAVE
         ! The mouse is leaving the window, do custom actions here
         Set wbTracking = FALSE
      On WM_MOUSEMOVE
         If NOT wbTracking
            If TrackMouseEvent( 16, TME_LEAVE, hWndForm, 1 )
               Set wbTracking = TRUE
</pre>

Here you can download a sample:<br>
{{Download
|URL=http://samples.tdcommunity.net/index.php?dir=&file=WIKI_MouseLeaveWindow.zip
|TEXT=WIKI_MouseLeaveWindow.zip
}}


<!--------------------------------------------------------------------------------------------------------------------------------------------------------------------------->
{{TipHeader|How to detect (double) clicks on a window}}

Several windows messages are send to the window when clicking.<br>


;[http://msdn.microsoft.com/library/en-us/winui/winui/windowsuserinterface/userinput/mouseinput/mouseinputreference/mouseinputmessages/wm_lbuttondown.asp?frame=true WM_LBUTTONDOWN]
:Received when the user presses the left mousebutton
;[http://msdn.microsoft.com/library/en-us/winui/winui/windowsuserinterface/userinput/mouseinput/mouseinputreference/mouseinputmessages/wm_lbuttonup.asp?frame=true WM_LBUTTONUP]
:Received when the user releases the left mousebutton
;[http://msdn.microsoft.com/library/en-us/winui/winui/windowsuserinterface/userinput/mouseinput/mouseinputreference/mouseinputmessages/wm_lbuttondblclk.asp?frame=true WM_LBUTTONDBLCLK]
:Received when the user doubleclicks the left mousebutton
;[http://msdn.microsoft.com/library/en-us/winui/winui/windowsuserinterface/userinput/mouseinput/mouseinputreference/mouseinputmessages/wm_rbuttondown.asp?frame=true WM_RBUTTONDOWN]
:Received when the user presses the right mousebutton
;[http://msdn.microsoft.com/library/en-us/winui/winui/windowsuserinterface/userinput/mouseinput/mouseinputreference/mouseinputmessages/wm_rbuttonup.asp?frame=true WM_RBUTTONUP]
:Received when the user releases the right mousebutton
;[http://msdn.microsoft.com/library/en-us/winui/winui/windowsuserinterface/userinput/mouseinput/mouseinputreference/mouseinputmessages/wm_rbuttondblclk.asp?frame=true WM_RBUTTONDBLCLK]
:Received when the user doubleclicks the right mousebutton


Below the constant declarations for the messages:

<pre>
! Left button
Number: WM_LBUTTONDOWN    = 0x0201
Number: WM_LBUTTONUP      = 0x0202
Number: WM_LBUTTONDBLCLK  = 0x0203
! Right button
Number: WM_RBUTTONDOWN    = 0x0204
Number: WM_RBUTTONUP      = 0x0205
Number: WM_RBUTTONDBLCLK  = 0x0206
</pre>

 -> TODO MIDDLE AND X BUTTONS (INCL NC CLICKS)


<!--------------------------------------------------------------------------------------------------------------------------------------------------------------------------->
{{TipHeader|How to drag a window without a caption}}

When a window does not have a caption or you want to be able to drag a window
while clicking anywhere on the window, this is the easiest way.<br>


First you will have to declare the next constants.<br>

<pre>
Number: WM_NCLBUTTONDOWN	= 0x00A1
Number: WM_LBUTTONDOWN		= 0x0201
Number: HTCAPTION		= 2
</pre>

When clicking on a window (anywhere in the client area) send a message
to the window indicating the mouse is within the caption area.<br>

<pre>
Form Window: frmSample
   Message Actions
      On WM_LBUTTONDOWN
         ! The user clicks somewhere in the client area of the window.
         ! Send a message to trick windows the user has clicked on the caption.
         ! While moving the mouse, the window will be dragged
         Call SalSendMsg( hWndForm, WM_NCLBUTTONDOWN, HTCAPTION, NUMBER_Null )
</pre>


Here you can download a sample:<br>
{{Download
|URL=http://samples.tdcommunity.net/index.php?dir=&file=WIKI_DragWindowClientArea.zip
|TEXT=WIKI_DragWindowClientArea.zip
}}


<!--------------------------------------------------------------------------------------------------------------------------------------------------------------------------->
{{TipHeader|How to detect/suppress system commands from a window (minimise, maximize, close etc)}}

A window receives the [http://msdn.microsoft.com/library/default.asp?url=/library/en-us/winui/winui/windowsuserinterface/userinput/keyboardaccelerators/keyboardacceleratorreference/keyboardacceleratormessages/wm_syscommand.asp <b>WM_SYSCOMMAND</b>] message when the user presses any of the syscommand options of a window.<br>


First you will have to declare the constant for this message

<pre>
   Number: WM_SYSCOMMAND   = 0x0112
</pre>

The wParam of this message contains the action taken.<br>
Next is a list of all possible action values.<br>

<pre>
Number: SC_SIZE           = 0xF000
Number: SC_MOVE           = 0xF010
Number: SC_MINIMIZE       = 0xF020
Number: SC_MAXIMIZE       = 0xF030
Number: SC_NEXTWINDOW     = 0xF040
Number: SC_PREVWINDOW     = 0xF050
Number: SC_CLOSE          = 0xF060
Number: SC_VSCROLL        = 0xF070
Number: SC_HSCROLL        = 0xF080
Number: SC_MOUSEMENU      = 0xF090
Number: SC_KEYMENU        = 0xF100
Number: SC_ARRANGE        = 0xF110
Number: SC_RESTORE        = 0xF120
Number: SC_TASKLIST       = 0xF130
Number: SC_SCREENSAVE     = 0xF140
Number: SC_HOTKEY         = 0xF150
Number: SC_DEFAULT        = 0xF160
Number: SC_MONITORPOWER   = 0xF170
Number: SC_CONTEXTHELP    = 0xF180
Number: SC_SEPARATOR      = 0xF00F
</pre>


Here is a short description of the values:
<ul>
<li>SC_CLOSE - Closes the window.</li>
<li>SC_CONTEXTHELP - Changes the cursor to a question mark with a pointer. If the user then clicks a control in the dialog box, the control receives a WM_HELP message.</li>
<li>SC_DEFAULT - Selects the default item; the user double-clicked the window menu.</li>
<li>SC_HOTKEY - Activates the window associated with the application-specified hot key. The lParam parameter identifies the window to activate.</li>
<li>SC_HSCROLL - Scrolls horizontally.</li>
<li>SC_KEYMENU - Retrieves the window menu as a result of a keystroke. For more information, see the Remarks section.</li>
<li>SC_MAXIMIZE - Maximizes the window.</li>
<li>SC_MINIMIZE - Minimizes the window.</li>
<li>SC_MONITORPOWER - Sets the state of the display. This command supports devices that have power-saving features, such as a battery-powered personal computer. 
The lParam parameter can have the following values:

1 - the display is going to low power

2 - the display is being shut off
</li>
<li>SC_MOUSEMENU - Retrieves the window menu as a result of a mouse click.</li>
<li>SC_MOVE - Moves the window.</li>
<li>SC_NEXTWINDOW - Moves to the next window.</li>
<li>SC_PREVWINDOW - Moves to the previous window.</li>
<li>SC_RESTORE - Restores the window to its normal position and size.</li>
<li>SC_SCREENSAVE - Executes the screen saver application specified in the [boot] section of the System.ini file.</li>
<li>SC_SIZE - Sizes the window.</li>
<li>SC_TASKLIST - Activates the Start menu.</li>
<li>SC_VSCROLL - Scrolls vertically.</li>
</ul>


Catch the message and determine which action was taken

<pre>
Form Window: frmMain
   Message actions
      On WM_SYSCOMMAND
         Select Case (wParam)
            Case SC_MINIMIZE
               // do something here
               Break
            Case SC_MAXIMIZE
               // do something else here
               Break
            .
            .
            .
</pre>


These constants can be found in the Windows API archive:<br>
{{Download
|URL=http://samples.tdcommunity.net/index.php?dir=WinApi32/
|TEXT=Windows API Archive
}}


<!--------------------------------------------------------------------------------------------------------------------------------------------------------------------------->
{{TipHeader|How to detect that CTRL + SPACE was pressed within an graphical Object}}

The [http://msdn2.microsoft.com/en-us/library/ms646276.aspx <b>WM_CHAR</b>] message is posted to the window with the keyboard focus when a WM_KEYDOWN message is translated by the TranslateMessage function.<br>
The WM_CHAR message contains the character code of the key that was pressed.<br>
For Unicode there is also a WM_UNICHAR Message.<br>


First you will have to declare the constant for this message:

<pre>
   Number: WM_CHAR   = 0x0102
</pre>

The wParam specifies the character code of the key.<br>
The lParam specifies the repeat count, scan code, extended-key flag, context code, previous key-state flag, and transition-state flag, as shown in the following table.<br>

<pre>
0-15
    Specifies the repeat count for the current message. 
    The value is the number of times the keystroke is auto repeated as a result of the user holding down the key. 
    If the keystroke is held long enough, multiple messages are sent. However, the repeat count is not cumulative.
16-23
    Specifies the scan code. The value depends on the OEM.
24
    Specifies whether the key is an extended key, such as the right-hand ALT and CTRL keys that appear on an 
    enhanced 101- or 102-key keyboard. The value is 1 if it is an extended key; otherwise, it is 0.
25-28
    Reserved; do not use.
29
    Specifies the context code. The value is 1 if the ALT key is held down while the key is pressed; otherwise, the value is 0.
30
    Specifies the previous key state. The value is 1 if the key is down before the message is sent, or it is 0 if the key is up.
31
    Specifies the transition state. The value is 1 if the key is being released, or it is 0 if the key is being pressed.
</pre>

Catch the message and determine with [http://msdn2.microsoft.com/en-us/library/ms646301.aspx <b>GetKeyState</b>] which Keys has been pressed:<br>

<pre>
On WM_CHAR
   If GetKeyState( VK_CONTROL ) < 0 AND GetKeyState( VK_SPACE ) < 0
      Return FALSE
</pre>

To have the GetKeyState Function available you need to declare it in USER32.DLL like the following:

<pre>
Global Declarations
   External Functions
      Library Name: USER32.DLL
         Function: GetKeyState
            Export Ordinal: 0
            Return: Number: SHORT
            Parameters: Number: INT
</pre>


The Constants VK_CONTROLL and VK_SPACE are the following:

<pre>
   Number: VK_CONTROLL   = 0x0011
   Number: VK_SPACE      = 0x0020
</pre>


The Reason to have a Return FALSE in the On WM_CHAR message is, that otherwise a SPACE-Character would be printed. But in this way nothing will happen.<br>

TODO Translate in correct English and proof if the Links are copied in the right way...<br>


<!--------------------------------------------------------------------------------------------------------------------------------------------------------------------------->
{{TipHeader|How to detect SysColors have changed}}

When the user changes the Windows theme or changes any colors for the several GUI elements, Windows will send<br>
message [http://msdn.microsoft.com/en-us/library/ms532603(VS.85).aspx <b>WM_SYSCOLORCHANGE</b>] to all top level windows currently present in the system.<br>


When your application is depending or anticipating on special colors, you might want to be informed the System colors have changed.
For instance when you do custom painting or display icons/bitmaps in predefined colors and you want to repaint them in the correct wanted color.<br>


First declare this constant:
<pre>
   Number: WM_SYSCOLORCHANGE  = 0x0015
</pre>

Now, trap this message on top level windows. Also send the message to all children to inform them.<br>

<pre>
Form Window: frmMain
   Message actions
      On WM_SYSCOLORCHANGE
         Call SalSendMsgToChildren( hWndForm, WM_SYSCOLORCHANGE, wParam, lParam )
</pre>

Depending on your needs, update used icons/bitmaps or repaint the custom drawings.<br>


To get the colors set by the user, you can use the WinAPI function [http://msdn.microsoft.com/en-us/library/ms724371(VS.85).aspx <b>GetSysColor</b>].<br>


This is the declaration

<pre>
Library name: USER32.dll
   Function: GetSysColor
      Returns
         Number: DWORD
      Parameters
         Number: INT
</pre>

Use the default WinAPI SysColor index values for the input parameter.<br>
You can find the complete list of color index values on [http://msdn.microsoft.com/en-us/library/ms724371(VS.85).aspx <b>GetSysColor</b>].<br>
Or you can find them in SalExtension library and in the sample supplied here.<br>


The next sample shows :<br>
*Detect changes in SysColors
*Show all current SysColors (as picture background colors, RGB values or color values)
*Set SysColors from the sample (using SetSysColors WinAPI). (Beware, it is a system wide setting, not only within the application)



Here you can download the sample:<br>
{{Download
|URL=http://samples.tdcommunity.net/index.php?dir=&file=WIKI_SysColorChange.zip
|TEXT=WIKI_SysColorChange.zip
}}


<!--------------------------------------------------------------------------------------------------------------------------------------------------------------------------->
{{TipHeader|How to prevent window resize at top/bottom/left/right/corner locations}}

When the user moves the mouse over the border of a top level window, the cursor is set to a resize icon and the window can be resized.<br>
The locations are left, right, top, bottom and the four corners of the window.<br>


In some situations it could be needed to prevent the user to resize. This can be achieved by the following trick.<br>


When the mouse moves over non-client areas like the border, the message [http://msdn.microsoft.com/en-us/library/ms645618(VS.85).aspx <b>WM_NCHITTEST</b>] is send to the window.<br>
By calling the WinAPI function [http://msdn.microsoft.com/en-us/library/ms633572(VS.85).aspx <b>DefWindowProc</b>] you can determine which non-client area is hit tested.<br>
When returning HTNOWHERE value in the <b>WM_NCHITTEST</b> message on the several non-client area ID's, the resize is prevented.<br>
There will be no resize icon shown and the window can not be resized on the particular border location.<br>


Here the implementation:<br>
First declare these constants
<pre>
Number: WM_NCHITTEST   = 0x84
!
Number: HTNOWHERE      = 0
Number: HTLEFT         = 10
Number: HTRIGHT        = 11
Number: HTTOP          = 12
Number: HTTOPLEFT      = 13
Number: HTTOPRIGHT     = 14
Number: HTBOTTOM       = 15
Number: HTBOTTOMLEFT   = 16
Number: HTBOTTOMRIGHT  = 17
</pre>
Also declare <b>DefWindowProc</b><br>
<pre>
Library name: USER32.dll
   Function: DefWindowProcA
      Export Ordinal: 0
      Returns
         Number: DWORD
      Parameters
         Window Handle: HWND
         Number: UINT
         Number: WPARAM
         Number: LPARAM
</pre>
For TD5.1 and higher, declare DefWindowProcW.<br>
<br>
Now, trap WM_NCHITTEST on top level windows.<br>

<pre>
Form Window: frmMain
   Message actions
      On WM_NCHITTEST
         Set nRet = DefWindowProcA( hWndForm, WM_NCHITTEST, wParam, lParam )
         ! Use the next line in TD5.x
         Set nRet = DefWindowProcW( hWndFrame, WM_NCHITTEST, wParam, lParam )
         Select Case nRet
            Case HTLEFT
            Case HTRIGHT
            Case HTBOTTOM
            Case HTTOP
            Case HTBOTTOMLEFT
            Case HTBOTTOMRIGHT
            Case HTTOPLEFT
            Case HTTOPRIGHT
                Return HTNOWHERE
</pre>
In the code above, all 8 locations are prevented from resize.<br>
To prevent only certain locations, change the code so only for that particular HT area the HTNOWHERE value is returned.<br>


Here you can download a sample:<br>
{{Download
|URL=http://samples.tdcommunity.net/index.php?dir=&file=WIKI_PreventWindowResize.zip
|TEXT=WIKI_PreventWindowResize.zip
}}<br>
Here the sample for TD version 5.1 and higher (UNICODE):<br>
{{Download
|URL=http://samples.tdcommunity.net/index.php?dir=&file=WIKI_PreventWindowResize_TD5x.zip
|TEXT=WIKI_PreventWindowResize_TD5x.zip
}}


These samples contain more HT constants (eg HTCAPTION) to handle other NC areas if needed.


[[Category:Messages]]
[[Category:Windows API]]