Вниз
Скачать: CL | DM;

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]

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


← →
ЮЮ ©   (2006-02-03 13:21) [7]

Замени на 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]

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.024 c
2-1155671663
Vovan#1
2006-08-15 23:54
2006.09.03
Отобразить TList в TListView с обратной связью


15-1155364751
GeLLeR
2006-08-12 10:39
2006.09.03
Видеокарта


15-1154854443
Kerk
2006-08-06 12:54
2006.09.03
Проблема с аськой


15-1154654602
DimonS
2006-08-04 05:23
2006.09.03
Создание панели инструментов


3-1151441197
Vosik
2006-06-28 00:46
2006.09.03
Триггеры на системных таблицах в InterBase




   Наверх