Подскажите по Ini файл

[Михаил Юрьевич]

Как прочитать из ini файла? Записал так:
Ini.WriteInteger('Clock','has',Form 1.SpinEdit1.Value);
и читал вот так,переменной присваивал:
rrr:=ini.ReadInteger('Clock','has', Form1.SpinEdit1.Value);
Но у меня почему то считывается значение не с Ini файла
а то что ввел в SpinEdit1,то есть ввожу в SpinEdit1 число
10,записываю его в Ini файл,в Ini файле число прописывается,
закрываю программу,потом опять открываю и во время открытия
программы считываю и присваиваю переменной rrr число из Ini файла,а присваивается
то что в момент открытия в поле SpinEdit1,то есть ноль

[Sibedir]

Все верно. Ошибка где-то в другом месте. Запустите программу по F7 следите за содержимым ini-файла. Возможно в момент запуска программа случайно перезаписывает его содержимое.
Кстати, ini.Free до завершения программы выполняется?

[Михаил Юрьевич]

Мне кажется что вот в этой строке: ini.ReadInteger('Clock','has',Form1 .SpinEdit1 .Value)
вместо SpinEdit1 .Value нужно что то другое написать

[Sibedir]

Блин, SpinEdit1.Value - это же Integer, ini файл работает со строками. Используй IntToStr и StrToInt.

Не люблю я эти не стандартные компоненты.

ОТ АВТОРА: Не усмотрел, что топикстартер использует ini.ReadInteger. А я ему стал про ini.ReadString парить. Сори

[Sibedir]

function TIniFile.ReadString(const Section, Ident, Default: string): string;

Section - имя секции
Ident - имя переменой
Default - то, что вернет функция, если в секции Section не найдет переменной Ident.

[Михаил Юрьевич]

Сообщение от Sibedir

function TIniFile.ReadString(const Section, Ident, Default: string): string;

Section - имя секции
Ident - имя переменой
Default - то, что вернет функция, если в секции Section не найдет переменной Ident.

Я это правило знаю,вот только записать как правильно не знаю

[Artificial]

IniFile:=TIniFile.Create(ExtractFilePath(Application.ExeName) + 'one.ini'); // создаем файл 
FileName:= IniFile.ReadString('User Options','File','rings.mp3');
// Берем сообщение типа String из Ini Файла, если же в файле к данному пункту не существует записи, то дефолтно берется запись "rings.mp3"

IniFile:

[User Options]
File=two.mp3

[Sibedir]

Михаил Юрьевич, а как на счет поста #4

[Михаил Юрьевич]

Сообщение от Artificial

IniFile:=TIniFile.Create(ExtractFilePath(Application.ExeName) + 'one.ini'); // создаем файл 
FileName:= IniFile.ReadString('User Options','File','rings.mp3');
// Берем сообщение типа String из Ini Файла, если же в файле к данному пункту не существует записи, то дефолтно берется запись "rings.mp3"

IniFile:

Я уже вместо SpinEdit1 .Value ставил так
rrr:=ini.ReadInteger('Clock','has', 0); при этом в Ini файле было число 10,а при
чтении из этого параметра выдало тоже 0

[Sibedir]

Давай весь код. Где то там ошибка.