7.4.7. Установка и настройка приложения: работа с файлами *.Ini

Файлы .INI – это текстовые файлы, предназначенные для хранения информации о настройках различных приложений. Информация в файле логически группируется в разделы, каждый из которых начинается оператором заголовка, заключенным в квадратные скобки, например, [Desktop]. В строках, следующих за заголовком, содержится информация, относящаяся к данному разделу, в форме:

<ключ>=<значение>

Пример:

[Question1]

Data1=line1

Data2=line2

Data3=line3

Answers1=answer1

Answers2=answer2

Answers3=answer3

RightAnswer=2

В Delphi работу с файлами .ini проще всего осуществлять с помощью создания в приложении объекта типа TIniFile. Этот объект описан в модуле inifile, который надо подключать к приложению оператором USES.

Создается объект типа TIniFile методом Create, куда передается имя файла .ini, с которым он связывается. Файл должен существовать до обращения к методу Create.

IniFile:=TiniFile.Create(ExpandFileName(ParamStr(1)));

ExpandFileName(ParamStr(1)) - возвращает полное имя файла , указанное в настройках для работы с приложением.

Для записи значений ключей существуют методы WriteString, WriteInteger, WriteFloat, и т. д.

ProcedureWriteString(const Section,Ident,Value:string);

Section – раздел файла, Ident – ключ этого раздела, Value – значение этого ключа. Если соответствующий раздел или ключ не существует, то он автоматически создается.

Существуют аналогичные методы для чтения: ReadString, ReadInteger, ReadFloat и т. д.

Function ReadString( const Section, Ident, Default:string):string;

Методы возвращают значение ключа Ident раздела Section. Параметр Default определяет значение, возвращаемое в случае, если в файле не указано значение соответствующего ключа.

Закончить работу с файлом - применить метод Free.

begin

IniFile.Free;

end;

Передать программе имя файла теста можно настройкой свойств ярлычка, изображающего программу на рабочем столе или в одной из папок. Например, если ярлычок программы тестирования называется Проверка знаний, то для настройки программы тестирования, которая находится в файле test.exe, для работы с файлом теста english.tx, в поле файл диалогового окна Свойства: Проверка знаний после имени файла программы надо дописать имя файла теста english.txt, заключив его в двойные скобки.

Упражнения

Это не просто тренировка, а интересное расширение и углубление ваших знаний. Попытайтесь выполнить все упражнения.

1. Сделайте так, чтобы кнопки Yes и No были бы доступными только после ввода имени и нажатия клавиши Enter. Подсказка. В Object Inspector свойству Enabled кнопок Yes и No придать значение False, а в процедуру Edit1KeyPressed включить такой код: Button1.Enabled:=true; Вutton2.Enabled:=true; 2. Выполнить сброс значений компонентов Edit1, Label2, Label3 для обеспечения возможности повторить диалог. Подсказка. Разместить на форме еще одну кнопку BitBtn, преобразовать ее в Retry. Ввести программно пустые строки в свойства указанных компонентов по нажатию кнопки Retry: Label2.Caption:=''; Label3.Caption:=''; Edit1.Text:=''; 3. Процедуру обработки события onKeyPress измените так, чтобы пользователь, введя свое имя, нажимал бы не Enter, а клавишу Space. Подсказка. Код клавиши Space - #32. 4. Сделайте так, чтобы при повторении диалога строка ввода была бы снова активной. Подсказка. Ввести: ActiveControl:=Edit1. 5. Дополните процедуру обработки события onKeyPress таким образом, чтобы пользователь, введя свое имя, мог бы нажимать либо клавишу Enter, либо Escape. Подсказка. Код клавиши Escape - #27.