| Вопрос: Решение XP-style (2) | Добавлено: 22.11.03 12:54 |
Автор вопроса:  DeXTeR
|
|
Каждый, кто работает в XP и создаёт программы на VB, хочет чтобы они выглядели в XP как "родные" наверное не раз задумывался: "А как сделать чтобы программа во время создания проекта выглядела так же?" Вот и я задумался. Решение пришло быстро. Нужно чтобы сам VB выглядел в XP "по-нормальному". Для придания "нормального" вида я использовал программу StyleIT XP (www.flvip.com). Итак, приступим: ===============VB 6.0=============== Открываем VB6.exe и применяем стилизацию. После этого он выглядит просто прекрасно (не полностью, конечно, но всё-таки). Теперь во время создания проектов все поддерживаемые контролы выглядят так как надо. После компиляции проект выглядит в старом стиле. Для придания XP-вида откомпилированному проекту используйте ранее описанную программу. В коде проекта нужно использовать функцию InitCommonControls (она отвечает за прорисовку контролов на форме): Private Declare Function InitCommonControls Lib "Comctl32.dll" () As Long Private Sub Form_Initialize() Если вы не используете эту функцию, то программа будет вылетать даже не запустившись (во как замутил). ===============VB .NET============== Повторяем операцию стилизации, только название исполняемого файла другое - devenv.exe. Для придания XP-вида, контролам необходимо установить свойство FlatStyle=System. Использовать функцию InitCommonControls нет необходимости. ================З. Ы.=============== StyleIt XP может стилизировать и другие программы. И ещё, если вы захотите вернуть VB прежний вид, то можете восстановить резервную копию (StyleIt создаёт 1 копию с именем xxx backup.exe, где xxx - имя исполняемого файла.) __________________________________________ Вопросы и примечания - krushitel@yandex.ru |
| Ответы | Всего ответов: 0 |
Страница: