Правда для XP управления, с 1 по API – VB 6.0 – База кода

Скачать

Название (оригинал): True XP Controls, with 1 API

Описание:
Англ (оригинал)Objective:
To create and use a manifest file for displaying common controls WinXP style
on a machine running WinXP with the XP theme enabled.
Function:
This code will only provide WinXP controls on a machine running
WinXP. The XP theme must be enabled (Not the classic theme) for
this code to work properly. Also, this only works when the program
is compiled as an executable, and will not work in the IDE environment.
Once the InitXP sub is called, all forms and controls (the main controls
and any controls in the “Microsoft Windows Common Controls 5.0 (SP2)” ocx)
on all forms will be display in winXP style, so you only have to call the
sub once. Also, MsgBox’s and InputBox’s will have the xP theme. What’s cool
about this code is if the xP theme is enabled, but a different color scheme is
used (other than the default blue), the manifest automatically acounts for that.
The truely great thing about this is that no new activex controls are introduced,
and therefor you do not need to account for different OS. If you want XP controls
on machines other than XP, there are hundreds of controls on the net. This code
reduces deployment costs, is small, and is self-contained.
I have not tested the code on any machine other than winxp, but this should
not generate any errors. If it does, a simple call to “GetVersionEx” could
show which OS is running, and in the Sub InitXP, add the code:
If WinXP = True Then
all current code
End If
Known Problems:
Command Buttons, Option Buttons, and Frames do not display properly when
placed inside of another Frame. Currently working on this problem.
One last note:
The exe will not display XP controls the first time it
is run, and I have not found a way around that yet . . . Maybe creating
a program that first creates the manifest, then shell’s the main program
before ending . . . Or maybe the install program could solve it somehow
Credit:
I got the idea from this code from another source, I believe on planet
source code, but the code did not work, and was not well organized/commented.
I have no idea who the genious was that came up with this code, but all the
credit in the world goes to that person.
Рус (машинный)Цель:
Создать и использовать файл манифеста для отображения общих элементов управления WinXP стиль
на машине под управлением WinXP с темой XP с включенной поддержкой.
Функции:
Этот код будет только обеспечить контроль WinXP на компьютере под управлением
Средства WinXP. Тема ХР должен быть включен (не классическая тема) для
этот код, чтобы работать должным образом. Также, это работает только когда программа
компилируется в исполняемый файл, и не будет работать в среде IDE.
Как только суб InitXP называется, всех форм и элементов управления (Главного управления
и все элементы управления в \”Майкрософт общих элементов управления Windows 5.0 (SP2) для\” осх)
на все бланки будут отображаться в WinXP стиль, так что вам нужно только позвонить
однажды суб. Также, с помощью msgbox и сайт inputbox будет тема XP. Что круто
о этот код если тема XP включена, но разного цвета схема
используется (кроме синий по умолчанию), манифест автоматически счета для этого.
Поистине великая вещь об этом является то, что введены новые элементы управления ActiveX,
и для этого вам не нужно учетной записи для разных ОС. Если вы хотите ХР контролирует
на машинах, отличных от XP, есть сотни контроль в сети. Этот код
снижает затраты на развертывание, небольшая, и является самодостаточным.
Я не проверял код на любой машине, кроме WinXP, но это должно
не генерирует никаких ошибок. Если это произойдет, простой призыв к \”GetVersionEx\” может
показать, какие ОС и в реестре InitXP, добавьте код:
Если Он = True, То
все текущий код
Конец Если
Известные Проблемы:
Командные кнопки, переключатели и фреймы не отображаются должным образом, когда
размещен внутри другого фрейма. В настоящее время работают над этой проблемой.
Одно последнее Примечание:
Exe-файл не будет отображаться ХР контролирует первый раз
запускается, и я не нашел способ обойти это . . . Возможно создание
программа, которая сначала создает манифест, затем оболочки основной программы
перед завершением . . . Или, может быть, программа установки может это как-то решить
Кредит:
Я получил идею из кода из другого источника, я считаю, что на планете
исходный код, но код не работал, и был не очень хорошо организован/прокомментировал.
Я понятия не имею, кто этот гений, что придумал этот код, но все
кредит в мире идет к тому человеку.

база кода