SetWindowLong (user32)
Last changed: randomdude12-104.245.251.252

.
Summary

C# Signature:

[DllImport("user32.dll")]
static extern int SetWindowLong(IntPtr hWnd, int nIndex, IntPtr dwNewLong);

VB.NET Signature:

<DllImport("user32.dll")> _
Private Shared Function SetWindowLong( _
     ByVal hWnd As IntPtr, _
     ByVal nIndex As Integer, _
     ByVal dwNewLong As IntPtr) As Integer
End Function

User-Defined Types:

None.

Notes:

None.

Tips & Tricks:

Certain window data is cached, so changes you make using SetWindowLong will not take effect until you call the SetWindowPos function. Specifically, if you change any of the frame styles, you must call SetWindowPos with the SWP_FRAMECHANGED flag for the cache to be updated properly.

Sample Code:

The following sample uses the GetWindowLong and SetWindowLong to remove the 3D border in the MDI client area.

    Private Declare Auto Function SetWindowLong Lib "User32.Dll" (ByVal hWnd As IntPtr, ByVal nIndex As Integer, ByVal dwNewLong As Integer) As Integer
    Private Declare Auto Function GetWindowLong Lib "User32.Dll" (ByVal hWnd As System.IntPtr, ByVal nIndex As Integer) As Integer
    Private Const GWL_EXSTYLE = (-20)
    Private Const WS_EX_CLIENTEDGE = &H200

    Private Sub RemoveMdiBorder()

    For Each c As Control In Me.Controls
        If TypeOf c Is MdiClient Then
        Dim windowLong As Long = GetWindowLong(c.Handle, GWL_EXSTYLE)
        windowLong = windowLong And (Not WS_EX_CLIENTEDGE)
        SetWindowLong(c.Handle, GWL_EXSTYLE, windowLong)
        c.Width = c.Width + 1
        Exit For
        End If
    Next

    End Sub

Alternative Managed API:

Do you know one? Please contribute it!

The above signature is incorrect. The dwNewLong parameter must be an IntPtr,

not an int, because the native function takes a DWORD (unsigned int), not an

integer.

- This is not quite true: passing int and int32 into SetWindowLong does still work.

Documentation
Documentation