powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Применение стиля XP к элементам управления
20 сообщений из 20, страница 1 из 1
Применение стиля XP к элементам управления
    #33276038
Фотография DisputantF
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Как можно изменить стиль отображения Microsoft Windows Common Controls 6.0 (SP6) (MSCOMCTL.OCX).

Действие
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
<?xml version="1.0" encoding="UTF-8" standalone="yes" ?>
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
    <assemblyIdentity 
        version="1.0.0.0" 
        processorArchitecture="X86" 
        name="CompanyName.ProductName.YourAppName" 
        type="win32" />
    <description>Your application description here</description>
    <dependency>
        <dependentAssembly>
            <assemblyIdentity 
                type="win32" 
                name="Microsoft.Windows.Common-Controls" 
                version="6.0.0.0" 
                processorArchitecture="X86" 
                publicKeyToken="6595b64144ccf1df" 
                language="*" />
        </dependentAssembly>
    </dependency>
</assembly>
распространяется только на Microsoft Windows Common Controls 5.0 (СOMCTL32.OCX).
Большое спасибо.
...
Рейтинг: 0 / 0
Применение стиля XP к элементам управления
    #33276140
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
manifest +
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
Private Type tagInitCommonControlsEx
   lngSize As Long
   lngICC As Long
End Type

Private Declare Function InitCommonControlsEx Lib "comctl32.dll" _
   (iccex As tagInitCommonControlsEx) As Boolean

Private Const ICC_USEREX_CLASSES = &H200

Private Function InitCommonControlsVB() As Boolean
   On Error Resume Next
   Dim iccex As tagInitCommonControlsEx
   With iccex
       .lngSize = LenB(iccex)
       .lngICC = ICC_USEREX_CLASSES
   End With
   InitCommonControlsEx iccex
   InitCommonControlsVB = (Err.Number =  0 )
End Function
...
Рейтинг: 0 / 0
Применение стиля XP к элементам управления
    #33276315
Фотография DisputantF
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Antonariymanifest + . . .
Не работает.
...
Рейтинг: 0 / 0
Применение стиля XP к элементам управления
    #33276406
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А у меня работает.
...
Рейтинг: 0 / 0
Применение стиля XP к элементам управления
    #33276440
Melkiades
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
У меня тоже нет.
Можешь выложить примерчик?
...
Рейтинг: 0 / 0
Применение стиля XP к элементам управления
    #33276783
Фотография DisputantF
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
AntonariyА у меня работает.
Будьте так любезны:
- версия операционной системы (какие SP установлены, сборка и т.д.)
- аналогично о Visual Studio (Visual Basic)
- свойства следующих файлов MSCOMCTL.OCX, СOMCTL32.OCX, СOMCTL32.DLL (точный размер, и версии)
Ну а работающий пример было бы воще замечательно.
...
Рейтинг: 0 / 0
Применение стиля XP к элементам управления
    #33276961
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Гмм... Включил в настройках экрана поддержку стилей... А ведь действительно не работает...
Туплю-с...
...
Рейтинг: 0 / 0
Применение стиля XP к элементам управления
    #33277376
Дурак
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Это не то?

http://www.sql.ru/forum/actualthread.aspx?tid=97967&hl=xp

==========
P.S. Научите же меня вставлять гиперссылки на sql.ru.
...
Рейтинг: 0 / 0
Применение стиля XP к элементам управления
    #33277963
Фотография DisputantF
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ДуракЭто не то?

http://www.sql.ru/forum/actualthread.aspx?tid=97967&hl=xp

Не то.
...
Рейтинг: 0 / 0
Применение стиля XP к элементам управления
    #33278882
Letter_D
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
То-то!
Там все это есть + контролы.
...
Рейтинг: 0 / 0
Применение стиля XP к элементам управления
    #33283608
Фотография DisputantF
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Да не то.
Использование сторонних компонентов не подходит.
Вопрос - Как можно изменить (а не заменить другим элементом управления) стиль отображения Microsoft Windows Common Controls 6.0 (SP6) (MSCOMCTL.OCX).
...
Рейтинг: 0 / 0
Применение стиля XP к элементам управления
    #33284445
Letter_D
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Да все то!
Там и manifest обсуждался и InitCommonControlsVB и ссылки на работающие примеры дадены...
А контролы уже вдогонку пошли.
Внимательнее надоть!
Угу.
:)

Короче, все работает.
... Я думаю, никто не собирается это в не XP провернуть??
...
Рейтинг: 0 / 0
Применение стиля XP к элементам управления
    #33285640
Фотография DisputantF
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Letter_D
Да все то!
Там и manifest обсуждался и InitCommonControlsVB и ссылки на работающие примеры дадены...
А контролы уже вдогонку пошли.
Внимательнее надоть!
Угу.
:)

Короче, все работает.
... Я думаю, никто не собирается это в не XP провернуть??

Если у Вас все работает, будьте так любезны, соберите примитивный (самое главное показать внешний вид элементов управления) пример с Toolbar, StatusBar, TreeView, ProgressBar (достаточно их просто положить на пустую форму) и выложите.
Заранее большое спасибо.
...
Рейтинг: 0 / 0
Применение стиля XP к элементам управления
    #33287945
Letter_D
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А зачем???
Неужели никто не видел стиль ХР?
...
Рейтинг: 0 / 0
Применение стиля XP к элементам управления
    #33290076
Letter_D
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
На самом деле, если пройти по ссылке от (Дурака), то попадаем на топик, в котором тоже есть ссылки.
Пройдя по тем ссылкам, обнаружим еще две, а них уже такую, как "проводник ХР стилей".
В нем интересно то, что присуцвует элемент TreeView от MSCOMCTL.OCX.
И отображается после запуска как ХР. На что я и повелся.
Теперь-то и меня берут сомнения - дело в том, что на остальных элементах, добавленных вчера мной вручную, я эффекта не обнаружил.
Возможно там еще что-то присобачивается программно-дополнительно, копаться было некогда, а текст немаленький.
Но эффект с TreeView налицо.

Ссылка на файл с примером:
http://vbaccelerator.com/home/VB/Code/Libraries/XP_Visual_Styles/Drawing_with_XP_Visual_Styles/VB6_Theme_Explorer.zip
...
Рейтинг: 0 / 0
Применение стиля XP к элементам управления
    #33291207
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
И вовсе не налицо. Слева treeview 6, справа treeview 5. Как говорится, почувствуйте разницу.
Однако это полезный пример. Он демонстрирует, как из ресурсов текущей темы xp выдрать элементы графики. На его основе можно написать свою библиотеку контролов, которые будут рисоваться, используя текущую тему. Писать придется долго и муторно )))) Но не особо сложно.
...
Рейтинг: 0 / 0
Применение стиля XP к элементам управления
    #33305977
Letter_D
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Кроме того там есть еще хороший пример - файл .manifest прошивается в файл ресурса, подключается, все это дело компилится, и более его (файл .manifest) не надо таскать вслед за программой.
Это эстетично.
...
Рейтинг: 0 / 0
Применение стиля XP к элементам управления
    #33467158
Pantalone
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Да, не работает для 6 библиотеки. Досадно. Кстати, может кто знает как избавиться от мигания Frame когда прога под XP с манифестом? Мигает ощутимо.
...
Рейтинг: 0 / 0
Период между сообщениями больше года.
Применение стиля XP к элементам управления
    #35642841
Фотография Александра-Александра
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Здравствуйте...

Возможно ли также, с помощью Манифест-файла изменить стиль контролов на форме MS Access?

Спасибо...
...
Рейтинг: 0 / 0
Применение стиля XP к элементам управления
    #35642872
Фотография BION
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Александра-АлександраЗдравствуйте...

Возможно ли также, с помощью Манифест-файла изменить стиль контролов на форме MS Access?

Спасибо...

На сколько я знаю, нет. Аццесс использует другие библиотеки контролов.
...
Рейтинг: 0 / 0
20 сообщений из 20, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Применение стиля XP к элементам управления
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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