VB.NET VisualStyleRenderer ThemeBackground отсутствует

Я пытаюсь перенести свой код VB6 на.NET, но есть кое-что, чего я просто не нахожу:

В VB6 я сказал (псевдокод)

OpenThemeData "ExplorerBar"

а потом...

DrawThemeBackground Lib "UxTheme.dll" (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

Теперь с.NET я просто не нахожу этот фон.

    Dim renderer As VisualStyleRenderer
    renderer = New VisualStyleRenderer(VisualStyleElement.ExplorerBar.NormalGroupBackground.Normal)

Я думаю, что я попробовал все доступное под "ExplorerBar", но ни один не дал мне такой же результат, как в VB6.

Огромное спасибо за помощь!

Источник

1 ответ

Решение

Понял:

renderer = New VisualStyleRenderer("ExplorerBar", 0, 0)
Источник
Другие вопросы по тегам