Гость
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / А интересно, тематический стиль к treeview в chm-htmlhelp применить можно? / 2 сообщений из 2, страница 1 из 1
12.08.2013, 17:59
    #38363643
Дмитрий77
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
А интересно, тематический стиль к treeview в chm-htmlhelp применить можно?
Ну дурь конечно, увлекся.
Но тем не менее.
Первый вариант - штатные средства. Но это вряд ли, очень все там "устаревшее".
По идее при использовании вызова через html-API, должен где-то возвращаться hwnd окна и искаться hwnd дочернего treeview.

А дальше тупо
Код: vbnet
1.
  SetWindowTheme hwndTree, StrPtr("explorer"), 0


и т.д.

Но, опять же, как быть с F1 или с открытием .chm штатными средствами (тупо нажали на chm мышкой).

Да и иконки с книжками и вопросиками несколько убогие по современным понятиям и на 32-битность не тянут.
Там вроде можно менять штатно, но на bmp-шки а не на .ico.

Ну, картинку повторяю, из нее все ясно, о чем речь (на вистах естественно глядеть надо).

Просто новые штатные help-системы в Vista - Win8 не так удобны как htmlhelp с деревом слева.
А вот подстилизовать бы не помешало.
...
Рейтинг: 0 / 0
13.08.2013, 06:18
    #38364043
Дмитрий77
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
А интересно, тематический стиль к treeview в chm-htmlhelp применить можно?
Дмитрий77По идее при использовании вызова через html-API, должен где-то возвращаться hwnd окна и искаться hwnd дочернего treeview.

А дальше тупо
Код: vbnet
1.
  SetWindowTheme hwndTree, StrPtr("explorer"), 0


и т.д.).
Подцепиться в нулевом приближении вроде удалось(тут доработка кода конечно нужна на предмет поиска правильного HH Child и hwndTv):

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
Private Sub Combo1_Click()
  Dim hwndHelp As Long
  Dim hwndHHChild As Long
  Dim hwndTab As Long
  Dim hwndTv As Long
  hwndHelp = HTMLHelp(0, App.Path & "\" & "proga.chm", HH_DISPLAY_TOPIC, ByVal Combo1.Text)
  hwndHHChild = FindWindowEx(hwndHelp, 0, "HH Child", vbNullChar)
  hwndHHChild = FindWindowEx(hwndHelp, hwndHHChild, "HH Child", vbNullChar)
  hwndTab = FindWindowEx(hwndHHChild, 0, "SysTabControl32", vbNullChar)
  hwndTv = FindWindowEx(hwndTab, 0, WC_TREEVIEW, vbNullChar)
  SetWindowTheme hwndTv, StrPtr("explorer"), 0
End Sub


Сработает при условии что вызов help выполняется из проги с внедренным манифестом.

Дмитрий77Но, опять же, как быть с F1 )
Вот этот момент как то надо (??)отсабклассить(??)
Пока идей нет.

Здесь наверно никак:
Дмитрий77или с открытием .chm штатными средствами (тупо нажали на chm мышкой).

Но результат как бы щупается:
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / А интересно, тематический стиль к treeview в chm-htmlhelp применить можно? / 2 сообщений из 2, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]