CheckBox и ini файлы

← →
moor38 (2006-02-03 12:53) [0]

Вопрос:
Сохраняю так

var
Ini:TIniFile;
begin
Ini:=TIniFile.Create(papka+"\DR.INI");
Ini.WriteBool("Prazd","Ezhegod",CheckBox1.Checked);
Ini.WriteBool("Prazd","Plav",CheckBox2.Checked);
Ini.UpdateFile;
Ini.Free;
end;

Читаю так:
var
Ini:TIniFile;
begin
Ini:=TIniFile.Create(papka+"\DR.INI");
Form1.CheckBox1.Checked:=Ini.ReadBool("Prazd","Ezhegod",true);
Form1.CheckBox2.Checked:=Ini.ReadBool("Prazd","Plav",true);
Ini.WriteBool("Prazd","Ezhegod",CheckBox1.Checked);
Ini.Free;

а в итоге при считывании ini файла все данные изменяется на true? Почему и как исправить это?

← →
jack128 © (2006-02-03 12:56) [1]

ты сам файл посмотри. Там данные то есть??
ЗЫ
Ini:=TIniFile.Create(papka+"\DR.INI"); try Ini.WriteBool("Prazd","Ezhegod",CheckBox1.Checked); Ini.WriteBool("Prazd","Plav",CheckBox2.Checked); Ini.UpdateFile; finally Ini.Free; end;

← →
moor38 (2006-02-03 12:58) [2]

В том-то и дело, есть и при считывании их изменяются

← →
ЮЮ © (2006-02-03 13:01) [3]

может CheckBox-ы на разных формах?

> Form1.CheckBox1.Checked:=Ini.ReadBool("Prazd","Ezhegod",
> true);
> Form1.CheckBox2.Checked:=Ini.ReadBool("Prazd","Plav",true);
>
> Ini.WriteBool("Prazd","Ezhegod",CheckBox1.Checked);

← →
ЮЮ © (2006-02-03 13:05) [4]

> В том-то и дело, есть и при считывании их изменяются

они изменятся, ели их и нет.
убедись, что что-то есть:

TCustomIniFile.ValueExists, хотя бы

← →
moor38 (2006-02-03 13:05) [5]

Нет на первой форме, на одной и той же

← →
moor38 (2006-02-03 13:13) [6]

блин, все записывает в ини-файлы, а при считывании изменяет их назад

Замени на Read(White)Integer - в Bool всё-таки какая-то неодназначность:

Ini.WriteInteger("Prazd","Ezhegod",Integer(CheckBox1.Checked));
CheckBox1.Checked:=Ini.ReadInteger("Prazd","Ezhegod", 0) = 1;

← →
moor38 (2006-02-03 13:43) [8]

таже петрушка получается

CheckBox и ini файлы Найти похожие ветки