Очень интересный вопрос был задан в заголовке этой статьи. Действительно, для чего же они нужны? Ответ не требует больших размышлений, кто в той или иной степени владеет техникой программирования в Delphi: для сохранения каких-либо настроек Вашей программы на жёсткий диск с последующим их изменениям. Приведу примеры использования этой не хитрой системы.

1. Сохранение размеров формы, название заголовка, местоположение окна на экране монитора, и другие настройки, связанные с формой (Очень часто у пользователя складывается образ "идеального окна", которое должно быть всегда одинаково расположенным и одинаковых размеров. Чтобы ему постоянно не приходилось настраивать это, можно постоянно автоматически делать все изменения в ini-файл).

2. Настройки программы (Будь то параллельное звучание музыки, или добавление программы в автозагрузку. Все единожды изменённые настройки сохраняются и при следующем запуске приложения считываются с ini-файла).

3. Мультиязычность (Да, на ini такое можно осуществить. В таком файле просто в значении какого-либо параметра будет перевод определённого слова. Если Вы делаете свой программный продукт и для зарубежных пользователей, то можно это осуществить путём ini-файла).

4. Регистрация программы (В программе Вы зашифровываете какое-либо значение, а затем свериваетесь со значением, хранящемся в файле, причём оно тоже зашифровывается. Это, конечно, не лучший способ защиты от несанкционированного использования вашего продукта, но всё служит одни из вариантов).

И т.д., ведь в ini-файл можно поместить любую информацию целого, символьного или булевского типа. Давайте теперь перейдём к реальной задаче, на примере который мы научимся пользоваться этой очень полезной штукой. Пусть автоматически сохраняться настройки:

• Заголовок формы: Form1.Caption;
• Местоположение: Form1.Left и Form1.Top;
• Размеры формы: Form1.Width и Form1.Height.

Сохраните проект в какой-нибудь папке. Создайте в этой папке ещё один каталог и назовите его data. После этого скопируйте (или создайте) в него пустой файл vars.ini, в котором как раз и будут храниться все наши настройки. Следующий шаг коснётся уже самой программы. Добавьте в uses (модули) модуль для работы с ini-файлами: inifiles. Без него у нас ничего не выйдет.

Ну а теперь давайте подумаем: когда наши настройки будут сохраняться? Нужно сделать так, чтобы это не было заметно для пользователя - не стоит его загромождать лишними операциями. Верно! Сохранять все настройки следует после закрытии программы, когда человек ничего изменить больше не сможет. Открываем событие формы OnClose и записываем следующий код:

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
var Vars: Tinifile;
begin
Vars:=TiniFile.Create(extractfilepath(paramstr(0))+"data/vars.ini");
Vars.WriteString("Form","Caption",Form1.Caption);
Vars.WriteInteger("Form","Left",Form1.Left);
Vars.WriteInteger("Form","Top",Form1.Top);
Vars.WriteInteger("Form","Width",Form1.Width);
Vars.WriteInteger("Form","Height",Form1.Height);
Vars.Free;
end;

Попробую теперь объяснить этот код.

var Vars: Tinifile;
Мы объявили переменную Vars типа Tinifile, т.е. чтобы нам работать с ними, необходимо объявить переменную. И теперь для чтения и записи данных, всё происходит через обращение этой переменной.

Vars:=TiniFile.Create(extractfilepath(paramstr(0))+"data/vars.ini");
Если этого файла нет в каталоге, то он автоматически создастся, а если есть, то откроется.

Vars.WriteString("Form","Caption",Form1.Caption);
Записываем заголовок формы, причём, обратите внимание - командой WriteString(Дословно - записать текст).

Vars.WriteInteger("Form","Left",Form1.Left);
Записываем положение формы слева от экрана. Это величина целая - WriteInteger(Дословно - записать целое число).

...

Vars.Free;
Очищаем память.

Думаю здесь должно быть всё понятно. С этим разобрались. Теперь давайте попробуем сделать так, что после загрузки, приложение считывало сохранённые параметры и изменяло форму. Это реализовывает следующий код (Событие OnCreate):

procedure TForm1.FormCreate(Sender: TObject);
var Vars: Tinifile;
begin
Vars:=TiniFile.Create(extractfilepath(paramstr(0))+"data/vars.ini");
Form1.Caption:=Vars.ReadString("Form","Caption","Название формы по-умолчанию");
Form1.Left:=Vars.ReadInteger("Form","Left",255);
Form1.Top:=Vars.ReadInteger("Form","Top",209);
Form1.Width:=Vars.ReadInteger("Form","Width",696);
Form1.Height:=Vars.ReadInteger("Form","Height",480);
Vars.Free;
end;

Здесь аналогично, как и для записи в файл, только чтение - ничего нового практически нет. Следует только упомянуть третий параметр ReadInteger (ReadString). Это параметр по-умолчанию, т.е. если файл будет удалён (или не сможет быть прочитан), то форма в данном случае примет размеры и положение, какие были определены здесь. Попробуйте удалить файл vars.ini из папки data и увидете, что всё именно так.

И на последок хочу сказать, что работать с ini-файлами очень удобно. Открою небольшой секрет - почти все мои программы основаны именно на них. И ещё: один мой знакомый говорит, что реестр намного лучше в этих целях служит и что он предпочитает работать именно с реестром. Не знаю - кому как. Пока каждый не попробует, он не прочувствует всего преимущества каждого из вариантов. Преимущества реестра - простота и удобство. Ini-файлов - возможность переноса настроек на другие компьютеры, а так же простота в использовании. Экспериментируйте!
Источник: web-brodilka.ru