Украинская Баннерная Сеть
Hosting Ukraine

ProtoPlex: программы, форум, рейтинг, рефераты, рассылки!

Каталог авто сайтов



moskaliv.net

Работа с clsRegistri

Свойства класса
Методы и события класса
Типы данных реестра
Установки свойств по умолчанию
Уровень доступа к реестру
Коды окончания операций
Подключение класса к программе

Создать раздел
Создать ключ
Удалить раздел
Удалить ключ
Прочитать значение ключа
Записать значение ключа
Получить список разделов
Получить список ключей

Свойства класса clsRegistri

.MainSection Основная ветвь в реестре
.PathKeyПуть к подразделу
.SectionИмя раздела
.keynameИмя ключа
.TValueТип данных
.ValueДанные для записи или прочитанные в реестре
.WRTypeУровень доступа
.DeskrДескриптор открытого или созданного раздела
.ExOnleyTrue раздел остаётся в реестре, False раздел удаляется по окончании работы.
.KodeErrСодержит сообщение о проведённой операции
.indexКоличество разделов или ключей (больше реального на 2)
.LaurЯзык сообщений
.RezErrКод окончания операции
Оглавление

Методы и события класса clsRegistri

Методы
.Create SectionСоздать подраздел
.CreateKeyСоздать ключ
.DeleteSectionУдалить подраздел
.DeleteKeyУдалить ключ
.ReadValueKeyПрочитать значения ключа
.WriteValueKeyЗаписать значение ключа
.AllSectionПолучить список подразделов (разделённые тремя нулями)
.AllKeyПолучить список ключей (разделены тремя нулями)
События
.CompletedУспешное окончание операции
.ErroretОшибка окончания операции
.AllKeyВыдан список ключей или подразделов
Оглавление

Типы данных реестра

REG_BINARY=3 - Двоичные данные
REG_DWORD=4+ 32-разрядное целое число, сохранённое в формате Little-endian (аналог тип Integer)
REG_DWORD_BIG_ENDIAN=5+ 32-разрядное целое число, сохранённое в формате big-endian
REG_EXPAND_SZ=2- Строка с нулевым символом в конце, которая содержит нерасширенные переменные среды
REG_LINK = 6- Символьная связь в формате Unicode
REG_MULTI_SZ = 7+ Ряд строк, разделенных нулевым символом и заканчивающийся двумя нулевыми символами
REG_NONE = 0- Неопределенный тип данных
REG_RESOURCE_LIST = 8- Список ресурсов драйвера устройства
REG_SZ = 1+ Строка с завершающим нулевым символом

+Тип поддерживается классом
-Тип не поддерживается классом

Оглавление

Установки свойств по умолчанию

.TValue REG_SZтип строка с нулём на конце
.WRType KEY_ALL_ACCESSлюбой тип доступа
.RezErr 0код 0
.KodeErr ""сообщений нет
.MainSection HKEY_LOCAL_MACHINEветвь по умолчанию
.Laur Russianязык сообщений русский
.ExOnley LeaveSectionоставить раздел в реестре
Оглавление

Уровень доступа к реестру

KEY_ALL_ACCESS = 983103Разрешен любой тип доступа
KEY_CREATE_LINK = 32Разрешение для создания символьных ссылок
KEY_CREATE_SUB_KEY = 4Разрешение для создания подраздела
KEY_ENUMERATE_SUB_KEYS = 8Разрешение для перечисления подразделов
KEY_EXECUTE = 131097Аналогично KEY_READ
KEY_NOTIFY = 16Разрешение на уведомление изменений
KEY_QUERY_VALUE = 1Разрешен доступ к данным подраздела
KEY_READ = 131097Разрешен доступ к чтению
KEY_SET_VALUE = 2Разрешение на установку данных подраздела
KEY_WRITE = 131078Разрешен доступ к записи
Оглавление

Коды окончания операции

0Ошибка при создании раздела 9Ошибка при удалении ключа
1Раздел уже существует 10Ключ успешно удалён
2Раздел успешно создан 11Ошибка при очистке ключа
3Ошибка при удалении раздела 12Значение ключа успешно очищено
4Раздел успешно удалён 13Ошибка при чтении ключа
5Ошибка при открытии раздела 14Значение ключа успешно прочитано
6Раздел успешно открыт 15Ошибка при записи ключа
7Ошибка при создании ключа 16Значение ключа успешно записано
8Ключ успешно создан

Оглавление

Подключение класса к программе

Для подключения класса к программе в секции Option Explicit объявляем объект класса clsRegistri
Private WithEvents Rg As clsRegistri 'объявляем объект класса clsRegistri
При загрузке формы создаём экземпляр класса clsRegistri
Private Sub Form_Load()
Set Rg = New clsRegistri 'создаём объект класса clsRegistri
End Sub

При выгрузке формы уничтожаем экземпляр класса clsRegistri
Private Sub Form_Unload(Cancel As Integer)
Set Rg = Nothing 'уничтожаем объект класса clsRegistri
End Sub

Оглавление


Создать подраздел

Для создания подраздела в реестре присвойте свойству .MainSection основную ветвь реестра, в которой собираетесь создавать подраздел. Свойству .PathKey присвойте путь к создаваемому подразделу, а свойству .Section имя создаваемого подраздела. При необходимости установите уровень доступа в свойстве .WRType. После этого вызовите метод .CreateSection. Проконтролировать операциию можно с помощью свойств .KodeErr или .RezErr при обработке событий .Completed или Erroret.

rg.MainSection=(основная ветвь реестра)
rg.PathKey=(путь к подразделу)
rg.Section=(имя секции)
rg.CreateSection

Оглавление

Создать ключ

Для того чтобы создать ключ в разделе реестра присвойте свойству .MainSection основную ветвь реестра, свойству .PathKey путь к подразделу. Свойству .keyname имя ключа, свойству .TValue тип данных ключа. При необходимости установите уровень доступа в свойстве .WRType. После этого вызовите метод .CreateKey. Проконтролировать операциию можно с помощью свойств .KodeErr или .RezErr при обработке событий .Completed или Erroret.

rg.MainSection=(основная ветвь реестра)
rg.PathKey=(путь к подразделу)
rg.keyname=(имя ключа)
rg.TValue=(тип данных ключа)
rg.CreateKey

Оглавление

Удалить подраздел

Для удаления подраздела присвойте свойству .MainSection основную ветвь реестра, свойству .PathKey путь к удаляемому подразделу, а свойству .Section имя удаляемого раздела. При необходимости установите уровень доступа в свойстве .WRType. После этого вызовите метод .DeleteSection. Проконтролировать операциию можно с помощью свойств .KodeErr или .RezErr при обработке событий .Completed или Erroret.

rg.MainSection=(основная ветвь реестра)
rg.PathKey=(путь к подразделу)
rg.Section=(имя секции)
rg.DeleteSection

Оглавление

Удалить ключ

Для того чтобы удалить ключ в разделе реестра присвойте свойству .MainSection основную ветвь реестра, свойству .PathKey путь к подразделу, а свойству .keyname имя ключа. Свойству .TValue присвойте тип данных ключа. При необходимости установите уровень доступа в свойстве .WRType. После этого вызовите метод .DeleteKey. Проконтролировать операциию можно с помощью свойств .KodeErr или .RezErr при обработке событий .Completed или Erroret.

rg.MainSection=(основная ветвь реестра)
rg.PathKey=(путь к подразделу)
rg.keyname=(имя ключа)
rg.TValue=(тип данных ключа)
rg.DeleteKey

Оглавление

Почитать значение ключа

Для того чтобы прочитать значение ключа присвойте свойству .MainSection основной раздел реестра, свойству .PathKey путь к подразделу, свойству .keyname имя ключа. Свойству TValue тип данных ключа. При необходимости установите уровень доступа в свойстве WRType. После этого вызовите метод .ReadValueKey. Проконтролировать операциию можно с помощью свойств .KodeErr или .RezErr при обработке событий .Completed или Erroret.
Внимание несоответствие свойства .TValue типу данных ключа в реестре может вызвать ошибку.

rg.MainSection=(основная ветвь реестра)
rg.PathKey=(путь к подразделу)
rg.keyname=(имя ключа)
rg.TValue=(тип данных ключа)
rg.ReadValueKey
(Значение ключа)=rg.Value

Оглавление

Записать значение ключа

Для того чтобы записать значение ключа присвойте свойству .MainSection основной раздел реестра, свойству .PathKey путь к подразделу, свойству .keyname имя ключа. Свойству TValue тип данных ключа. При необходимости установите уровень доступа в свойстве WRType. После этого вызовите метод .WriteValueKey. Проконтролировать операциию можно с помощью свойств .KodeErr или .RezErr при обработке событий .Completed или Erroret.

rg.MainSection=(основная ветвь реестра)
rg.PathKey=(путь к подразделу)
rg.keyname=(имя ключа)
rg.TValue=(тип данных ключа)
rg.Value=(значение ключа)
rg.WriteValueKey

Оглавление

Получить список подразделов

Для того чтобы получить список подразделов раздела реестра присвойте свойству .MainSection основную ветвь реестра. Свойству .PathKey путь к подразделу. При необходимости установите уровень доступа свойством .WRType. После этого вызовите метод .AllSection. Проконтролировать операциию можно с помощью свойств .KodeErr или .RezErr при обработке событий .Completed или Erroret.
Внимание список состоит из подстрок разделённых тремя нулями.

rg.MainSection=(основная ветвь реестра)
rg.PathKey=(путь к подразделу)
rg.AllSection

Оглавление

Получить список ключей

Для того чтобы получить список подразделов раздела реестра присвойте свойству .MainSection основную ветвь реестра. Свойству .PathKey путь к подразделу. При необходимости установите уровень доступа свойством .WRType. После этого вызовите метод .AllKey. Проконтролировать операциию можно с помощью свойств .KodeErr или .RezErr при обработке событий .Completed или Erroret.
Внимание список состоит из подстрок разделённых тремя нулями.

rg.MainSection=(основная ветвь реестра)
rg.PathKey=(путь к подразделу)
rg.AllKey

Оглавление
Если у Вас есть предложения то Вам сюда.
Все находящиеся здесь является бесплатным. Если Вы желаете поддержать автора то Вам сюда