[DllImport("uxtheme", ExactSpelling=true)]
public extern static Int32 DrawThemeBackground(IntPtr hTheme, IntPtr hdc, int iPartId,
int iStateId, ref RECT pRect, ref RECT pClipRect);
[DllImport("uxtheme", ExactSpelling=true)]
public extern static Int32 DrawThemeBackground(IntPtr hTheme, IntPtr hdc, int iPartId,
int iStateId, ref RECT pRect, IntPtr pClipRect);
Declare Function DrawThemeBackground Lib "uxtheme.dll" (TODO) As TODO
<DllImport("UxTheme.dll", CallingConvention:=CallingConvention.Cdecl)> _
Function DrawThemeBackground(ByVal hTheme As IntPtr, ByVal hdc As IntPtr, _
ByVal iPartId As Integer, ByVal iStateId As Integer, ByRef pRect As RECT, _
ByRef pClipRect As RECT) As Integer
End Function
None.
Please add some!
'Draw a button in the Statusbar (check the website for the API calls)
Dim posX As Integer = Me.Width - 5 * 20
Dim g As Graphics = Graphics.FromHdc(New IntPtr(GetWindowDC(Me.Handle.ToInt32)))
'drawThemeBackground(openThemeData(Me.Handle, "Window"), g.GetHdc, 15, 1, New RECT(New Rectangle(posX, 5, 20, 20)), IntPtr.Zero)
drawThemeBackground(openThemeData(Me.Handle, "ExplorerBar"), g.GetHdc, 7, 1, New RECT(New Rectangle(posX, 6, 20, 20)), IntPtr.Zero)
TODO