Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.03.06;
Скачать: CL | DM;

Вниз

Почему выдает ошибку...? Где не правильно...?   Найти похожие ветки 

 
iusup ©   (2003-02-24 23:30) [0]

Почему выдает ошибку...? Где не правильно...?
procedure TMainForm.FormCreate(Sender: TObject);

var
ini: TIniFile;
dbgrid1:Integer;
begin
ini := TIniFile.Create("d:\tst.ini");
try
if ini.SectionExists(Config) then
begin
if ini.ValueExists(Config, "DBGrid1") then
MainForm.DBGrid1.Color := ini.ReadBool(Config, "DBGrid1",clBtnHighlight); // ошибка

end;
finally
ini.Free;
end;
end;


 
MAN-IN-RED ©   (2003-02-24 23:48) [1]


> ReadBool

тут...


 
MAN-In-RED ©   (2003-02-24 23:49) [2]

Цвет не может быть True or False;


 
MAN-In-RED ©   (2003-02-24 23:57) [3]

И насколько я знаю, эти проверки лишние:

> if ini.SectionExists(Config) then
> begin
> if ini.ValueExists(Config, "DBGrid1") then



 
Palladin ©   (2003-02-25 01:28) [4]

моему возмущению нет границ



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

Текущий архив: 2003.03.06;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.022 c
14-17288
Palladin
2003-02-19 22:23
2003.03.06
Необычная просьба...


1-17113
Dunkan
2003-02-22 11:23
2003.03.06
как узнать время в мили секундах?


1-17176
Сутковой Вадим
2003-02-21 19:04
2003.03.06
Градиентный ...


1-17196
Unk
2003-02-24 12:22
2003.03.06
Caption


1-17118
ADOLF
2003-02-22 13:53
2003.03.06
Специальные символы