Реестр: запись\чтение

Предводителев Сергей

Работа с системным реестром в Delphi достаточно простая. Использование реестра имеет некоторые преимущества перед INI-файлами. Они заключаются в том, что реестр – более стабильный, и у него нет ограничения на размер.

В Delphi для работы с реестром служит модуль Registry. Он предоставляет программисту методы для открытия, закрытия, сохранения, перемещения, копирования и удаления ключей и разделов реестра.

Итак, разберем использование Registry на небольшом примере: при закрытии программы будем сохранять положение и размеры формы в реестре, а при запуске соответственно считывать их. Для начала допишем Registry в раздел uses.

Uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, Registry;

Теперь создадим обработчик события на закрытие формы:

Procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);

Var

Reg:TRegistry; //1

Begin

Reg:=TRegistry. Create; //2

Reg. RootKey:=HKEY_CURRENT_USER; //3

Reg. OpenKey(‘software\reg_test’,true); //4

Reg. WriteInteger(‘top’,form1.Top); //5

Reg. WriteInteger(‘left’,form1.Left); //6

Reg. WriteInteger(‘width’,form1.Width); //7

Reg. WriteInteger(‘height’,form1.Height); //8

Reg. CloseKey; //9

Reg. free; //10

End;

Разберем что же у нас тут делается:

1) Объявляем переменную reg типа TRegistry – именно этот тип и служит для работы с реестром.

2) Инициализируем переменную для работы.

3) Свойство RootKey определяет корневой раздел.

4) Метод OpenKey служит для открытия раздела. Первый параметр – это собственно рздел для открытия, а второй параметр определяет создавать ли этот раздел если его не существует.

5 – 8 ) Здесь мы сохраняем нужные параметры формы в определенные ключи реестра. Для этого служат следующие методы:

WriteBinaryData(const Name: String; var Buffer; BufSize: Integer);

WriteBool(const Name: String; Value: Boolean);

WriteCurrency(const Name: String; Value: Currency);

WriteDate(const Name: String; Value: TDateTime);

WriteDateTime(const Name: String; Value: TDateTime);

WriteExpandString(const Name, Value: String);

WriteFloat(const Name: String; Value: Double);

WriteInteger(const Name: String; Value: Integer);

WriteString(const Name, Value: String);

WriteTime(const Name: String; Value: TDateTime);

Думаю понятно из названия для сохранения какого типа данных служит каждый из вышеперечисленных методов. Ну а в общем первый параметр – название ключа, а второй собственно данные. Для записи в ключ по умолчанию просто оставьте первый параметр пустым, например: WriteInteger(”,56);

9) Метод CloseKey используется для закрытия ключа, открытого функцией OpenKey (см. п.4).

10) Выгружаем переменную reg из памяти.

Все теперь при закрытии приложения оно будет сохранять данные о размере и положении формы в реестре. Можете проверить: запустите программу, а затем выйдите из нее и посмотрите в реестре (с помощью программы regedit) раздел HKEY_CURRENT_USER\Software\reg_test там и будут наши данные.

Теперь нам надо считывать данные из реестра и соответственно изменять размеры и положение формы. Напишем обработчик события на создание формы:

Procedure TForm1.FormCreate(Sender: TObject);

Var

Reg:TRegistry;

Begin

Reg:=TRegistry. Create;

Reg. RootKey:=HKEY_CURRENT_USER;

Reg. OpenKey(‘software\reg_test’,true);

Form1.Top:=reg. ReadInteger(‘top’);

Form1.Left:=reg. ReadInteger(‘left’);

Form1.Width:=reg. ReadInteger(‘width’);

Form1.Height:=reg. ReadInteger(‘height’);

Reg. CloseKey;

Reg. Free;

End;

Не изученный метод здесь только ReadInteger. Ну как вы наверное догадались, этот метод служит для считывания значения ключа из реестра. Кроме ReadInteger существуют еще следующие методы:

ReadBinaryData(const Name: String; var Buffer; BufSize: Integer): Integer;

ReadBool(const Name: String): Boolean;

ReadCurrency(const Name: String): Currency;

ReadDate(const Name: String): TDateTime;

ReadFloat(const Name: String): Double;

ReadInteger(const Name: String): Integer;

ReadString(const Name: String): String;

ReadTime(const Name: String): TDateTime;

Ну вот собственно и все, мы сделали программу, которая при выключении сохраняет данные о размере и положении формы в реестре, а при запуске их оттуда считывает; можете проверить.

Внимание! Запрещается перепечатка данной статьи или ее части без согласования с автором. Если вы хотите разместить эту статью на своем сайте или издать в печатном виде, свяжитесь с автором.


Реестр: запись\чтение