проблемка с ini файлами

[blackstersl]

Привет всем. У меня проблема с ini файлами: все boolean записывает без проблем, НО не хочет их считывать:

Вот так записывает:

procedure TForm1.FormDestroy(Sender: TObject);
var
spath:string;
begin
getdir(0, spath);
inifile := tinifile.Create(spath + '\program.ini');
inifile.Writeinteger('Form' , 'Formtop' , form1.Top);
inifile.WriteBool('Form', 'Replay' , speedbutton11.Down);
inifile.WriteBool('Form' , 'diffrentPlay', speedbutton10.Down);
inifile.free;

А вот так должен считывать:

procedure TForm1.FormCreate(Sender: TObject);
begin
getdir(0,spath);
inifile := tinifile.Create(spath + 'program.ini');
form1.Top := inifile.ReadInteger('Form', 'Formtop' , form1.Top);
speedbutton11.Down := inifile.ReadBool('Form', 'Playlistshow', speedbutton11.Down);
speedbutton10.Down := inifile.ReadBool('Form', 'Playlistshow', speedbutton10.Down);
inifile.free;

в чём ошибка? Заранее спасибо.

[Манжосов Денис :)]

Speedbutton11.Down := inifile.ReadBool('Form', 'Playlistshow', true);
speedbutton10.Down := inifile.ReadBool('Form', 'Playlistshow', true);

Либо так:

var b1,b2: boolean;
speedbutton11.Down := inifile.ReadBool('Form', 'Playlistshow', b1);
speedbutton10.Down := inifile.ReadBool('Form', 'Playlistshow', b2);

Сам точно не знаю, но у меня работает

[blackstersl]

блин, я нашёл ошибку(я везде одно значение поставил)('Form', 'Playlistshow') я просто невнимательный. Всё равно спасибо -)