Сборник лабораторных работ по дисциплине "Прикладное программное обеспечение". Самохвалов К.М. - 46 стр.

UptoLike

Составители:

Рубрика:

46

Прочитать значение переменной типа 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;