Гость
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / А как в VB6 имплементировать #ifndef WINVER #define WINVER 0x0400 итд. / 3 сообщений из 3, страница 1 из 1
15.06.2014, 18:13
    #38669753
Дмитрий77
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
А как в VB6 имплементировать #ifndef WINVER #define WINVER 0x0400 итд.
Делаю стандартный визард

Wizard / Property Sheets на VB реально сделать?
Код: vbnet
1.
2.
3.
4.
  Dim psh As PROPSHEETHEADER
  With psh
...
    .dwFlags = PSH_WIZARD97 Or PSH_HEADER Or PSH_WATERMARK



Нарвался пока на проблему что картинки множатся (тест проект на тек. стадии прилагается).

Проблема описана в этой статье:
Conquering Wizard97

Решение предлагается такое:
авторThis problem occurs because of the default settings of the project wizard we have used to create the application, the settings for the IE version in the stdafx.h file. Here is the change one should make to get the Wizard to behave as it is supposed to:

Collapse | Copy Code
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
#ifndef WINVER
#define WINVER 0x0400          // Default value is 0x0400
#endif

#ifndef _WIN32_WINNT
#define _WIN32_WINNT 0x0400    // Default value is 0x0400
#endif

#ifndef _WIN32_WINDOWS
#define _WIN32_WINDOWS 0x0410  // Default value is 0x0410
#endif

#ifndef _WIN32_IE
#define _WIN32_IE 0x0500       // Default value is 0x0400
#endif



Как подобное всунуть в код VB6?
...
Рейтинг: 0 / 0
15.06.2014, 18:19
    #38669760
Дмитрий77
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
А как в VB6 имплементировать #ifndef WINVER #define WINVER 0x0400 итд.
поясню проблему
...
Рейтинг: 0 / 0
15.06.2014, 21:20
    #38669860
Дмитрий77
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
А как в VB6 имплементировать #ifndef WINVER #define WINVER 0x0400 итд.
Все, доперло.
Вопрос снят.
Why are there two values for PSH_WIZARD97?

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
If you go cruising through the commctrl.h header file, you'll find that there are two different definitions for PSH_WIZARD97: 

#if (_WIN32_IE >= 0x0400)
...
#if (_WIN32_IE < 0x0500)
#define PSH_WIZARD97            0x00002000
#else
#define PSH_WIZARD97            0x01000000
#endif
...
Why are there two values for PSH_WIZARD97?



Я залепил "старую константу"(_WIN32_IE < 0x0500), замена на "новую" устранила мультикартинки:
Код: vbnet
1.
2.
'Public Const PSH_WIZARD97 = &H2000 'Creates a Wizard97-style property sheet, which supports bitmaps in the header of interior pages and on the left side of exterior pages.
Public Const PSH_WIZARD97 = &H1000000 'Creates a Wizard97-style property sheet, which supports bitmaps in the header of interior pages and on the left side of exterior pages.
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / А как в VB6 имплементировать #ifndef WINVER #define WINVER 0x0400 итд. / 3 сообщений из 3, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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