C# Signature:

[DllImport("uxtheme.dll", ExactSpelling=true, CharSet=CharSet.Unicode)]
public static extern int SetWindowTheme(IntPtr hWnd, String pszSubAppName, String pszSubIdList);

[DllImport("uxtheme.dll", ExactSpelling=true, CharSet=CharSet.Unicode)]
public static extern int SetWindowTheme(IntPtr hWnd, int pszSubAppName, String pszSubIdList);

[DllImport("uxtheme.dll", ExactSpelling=true, CharSet=CharSet.Unicode)]
public static extern int SetWindowTheme(IntPtr hWnd, String pszSubAppName, int pszSubIdList);

[DllImport("uxtheme.dll", ExactSpelling=true, CharSet=CharSet.Unicode)]
public static extern int SetWindowTheme(IntPtr hWnd, int pszSubAppName, int pszSubIdList);

VB .NET Signature:

Public Declare Unicode Function SetWindowTheme Lib "uxtheme.dll" (ByVal hWnd As HandleRef, ByVal pszSubAppName As String, ByVal pszSubIdList As String) As Integer

<DllImport("uxtheme.dll", ExactSpelling := True, CharSet := CharSet.Unicode)> _
Public Shared Function SetWindowTheme(hWnd As IntPtr, pszSubAppName As [String], pszSubIdList As [String]) As Integer
End Function

<DllImport("uxtheme.dll", ExactSpelling := True, CharSet := CharSet.Unicode)> _
Public Shared Function SetWindowTheme(hWnd As IntPtr, pszSubAppName As Integer, pszSubIdList As [String]) As Integer
End Function

<DllImport("uxtheme.dll", ExactSpelling := True, CharSet := CharSet.Unicode)> _
Public Shared Function SetWindowTheme(hWnd As IntPtr, pszSubAppName As [String], pszSubIdList As Integer) As Integer
End Function

<DllImport("uxtheme.dll", ExactSpelling := True, CharSet := CharSet.Unicode)> _
Public Shared Function SetWindowTheme(hWnd As IntPtr, pszSubAppName As Integer, pszSubIdList As Integer) As Integer
End Function

User-Defined Types:

None.

Notes:

None.

Tips & Tricks:

Imports System.Runtime.InteropServices

Public Class Form1

    Private Random As Random
    <DllImport("uxtheme.dll", CharSet:=CharSet.Unicode, ExactSpelling:=True)> _
    Private Shared Function SetWindowTheme(ByVal hWnd As IntPtr, ByVal appName As String, ByVal partList As String) As Integer
    End Function
    Public Sub New()
    InitializeComponent()
    Me.Font = System.Drawing.SystemFonts.IconTitleFont
    SetWindowTheme(ListView1.Handle, "explorer", Nothing)
    End Sub

End Class!!!!

Sample Code:

using System.Runtime.InteropServices;
...
public class MyForm : System.Windows.Forms.Form
...
[DllImport("uxtheme", ExactSpelling=true, CharSet=CharSet.Unicode)]
public extern static Int32 SetWindowTheme(IntPtr hWnd, String textSubAppName, String textSubIdList);
...
public MyForm()
{                    
SetWindowTheme(this.AnyControl.Handle,"","");
}

Alternative Managed API:

TODO

Please edit this page!

Do you have...

• helpful tips or sample code to share for using this API in managed code?
• corrections to the existing content?
• variations of the signature you want to share?
• additional languages you want to include?

Select "Edit This Page" on the right hand toolbar and edit it! Or add new pages containing supporting types needed for this API (structures, delegates, and more).