TIniFile

[matus]

Здравствуйте! Мне надо заранее физически создать файл инициализации и внести туда определенные параметра для программы. Как это сделать, а самое главное, где он должен размещаться так, чтобы программа его находила? (В книге написано, что файл обычно располагается в C:\Windows, но мне хотелось бы это обойти и просто размещать файл в определенной директории). Спасибо за внимание

[BOBAH13]

Непонятно кто Вам мешает его расположить хоть возле программы хоть на C:\ хоть на зю:\парам-пам-пам\опа\... *.ini простой текстовый файл с таким расширением... формат записи [Имя секции] потом идут Парметр=Значение... и так до бесконечности. Еще вопросы ?

[pu4koff]

параметры изначально можно не задавать. в чтении прописываешь параметры по умолчанию и если ключа не будет, то в файл запишется этот ключ со значением по умолчанию. во как)

[mutabor]

Расшифрую то что сказал pu4koff

Файла может и не быть в директории с программой (обычно там ему и место) по разным причинам: или это первый запуск или пользователь его удалил. Но это не страшно, функции чтения параметров из INI файлов имеют параметр по умолчанию, если файл не найден, функция передаст его. А при закрытии программы файл будет создан.

[Stilet]

Жирно подитожу: В хелпе делфы, по крайней мере в D6, описан аккуратненький пример работы с ИНИ файлами, а точнее с TIniFile.
Он все показывает и все обьясняет.

[andrey4623]

Объект INIFILES - работа с INI файлами.

Почему иногда лучше использовать INI-файлы, а не реестр?
1. INI-файлы можно просмотреть и отредактировать в обычном блокноте.
2. Если INI-файл хранить в папке с программой, то при переносе папки на другой компьютер настройки сохраняются. (Я еще не написал ни одной программы, которая бы не поместилась на одну дискету
3. Новичку в реестре можно запросто запутаться или (боже упаси), чего-нибудь не то изменить.
Поэтому для хранения параметров настройки программы удобно использовать стандартные INI файлы Windows. Работа с INI файлами ведется при помощи объекта TIniFiles модуля IniFiles. Краткое описание методов объекта TIniFiles дано ниже.

Constructor Create('d:\test.INI');
Создать экземпляр объекта и связать его с файлом. Если такого файла нет, то он создается, но только тогда, когда произведете в него запись информации.

WriteBool(const Section, Ident: string; Value: Boolean);
Присвоить элементу с именем Ident раздела Section значение типа boolean

WriteInteger(const Section, Ident: string; Value: Longint);
Присвоить элементу с именем Ident раздела Section значение типа Longint

WriteString(const Section, Ident, Value: string);
Присвоить элементу с именем Ident раздела Section значение типа String

ReadSection (const Section: string; Strings: TStrings);
Прочитать имена всех корректно описанных переменных раздела Section (некорректно описанные опускаются)

ReadSectionValues(const Section: string; Strings: TStrings);
Прочитать имена и значения всех корректно описанных переменных раздела Section. Формат :
имя_переменной = значение

EraseSection(const Section: string);
Удалить раздел Section со всем содержимым

ReadBool(const Section, Ident: string; Default: Boolean): Boolean;
Прочитать значение переменной типа Boolean раздела Section с именем Ident, и если его нет, то вместо него подставить значение Default.

ReadInteger(const Section, Ident: string; Default: Longint): Longint;
Прочитать значение переменной типа Longint раздела Section с именем Ident, и если его нет, то вместо него подставить значение Default.

ReadString(const Section, Ident, Default: string): string;
Прочитать значение переменной типа String раздела Section с именем Ident, и если его нет, то вместо него подставить значение Default.

Free;
Закрыть и освободить ресурс. Необходимо вызвать при завершении работы с INI файлом

Property Values[const Name: string]: string;
Доступ к существующему параметру по имени Name

Пример:

Procedure TForm1.FormClose(Sender: TObject);

var

IniFile:TIniFile;

begin

IniFile := TIniFile.Create('d:\test.INI'); { Создали экземпляр объекта }

IniFile.WriteBool('Options', 'Sound', True); { Секция Options: Sound:=true }

IniFile.WriteInteger('Options', 'Level', 3); { Секция Options: Level:=3 }

IniFile.WriteString('Options' , 'Secret password', Pass);

{ Секция Options: в Secret password записать значение переменной Pass }

IniFile.ReadSection('Options ', memo1.lines); { Читаем имена переменных}

IniFile.ReadSectionValues('Options ', memo2.lines); { Читаем имена и значения }

IniFile.Free; { Закрыли файл, уничтожили объект и освободили память }

end;

Материал взят с www.delphi.int.ru

[matus]

Ого))) Сколько внимания))) Спасибо!