Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

inifile [D5]


race1 ©   (2002-07-06 16:53:00) 

Можете прояснить ситуацию с сабжем? когда пишем - указываем 3 параметра, а когда читаем - 2. Напрмер, я хочу так: WriteString("section1", "value", true\false) и узнать true или false, и для етого мне придётся писать свою процедуру, которая будет выдёргивать true\false? Ибо ReadSection нам даёт всё сразу, т.е. value=true\false


race1   (2002-07-09 15:46:00) [1]

тоесть я хотел сказать спасиба, работает :))


race1   (2002-07-09 15:44:00) [2]

Создал поток, в потоке процедура, в процедуре кусок

procedure proc;
var
S: String;
begin
s:=List[i];
end;

Внимание! Вопрос! Почему s равна первому символу List[i]? в List[i] много символов!


Dinara   (2002-07-08 11:46:00) [3]

Я просто переписала функцию ReadSectionValue и сразу получаю список значений.

procedure ReadValuesFromIniSection(const IniFile: TIniFile; const Section: string; Strings: TStrings);
var
KeyList: TStringList;
I: Integer;
begin
KeyList := TStringList.Create;
try
IniFile.ReadSection(Section, KeyList);
Strings.BeginUpdate;
try
Strings.Clear;
for I := 0 to KeyList.Count - 1 do
Strings.Add(IniFile.ReadString(Section, KeyList[I], ""))
finally
Strings.EndUpdate;
end;
finally
KeyList.Free;
end;
end;


Vitaly   (2002-07-08 11:02:00) [4]

Я, например, читаю так:
phno := 1;
while ini.ReadString("PhoneBook", "phone"+intToStr(phno), "") <> "" do
begin
setLength(phBook, phno);
phBook[phno-1] := ini.ReadString("PhoneBook", "phone"+intToStr(phno), "");
inc(phno);
end;


race1   (2002-07-08 10:41:00) [5]

Например, так:
file.ini{
[section]
param1=qwer
param2=qwer
param3=qwer
}
ето один вариант, потом пользовательможет сделать так
file.ini{
[section]
param1=qwer
param2=qwer
param3=qwer
param4=qwer
param5=qwer
param6=qwer
}
потом захочет и сделает так
file.ini{
param1=qwer
}
так вот - Eof в TIniFile нету, как её заменить? Читать все значения ReadSectionValue и потом значения самому выдёргивать?


Dinara   (2002-07-08 01:30:00) [6]

Как это число значений меняется?


race1   (2002-07-07 16:36:00) [7]

всё, работает, но теперь другая проблемма - как читать ЗначеНИя, число которых меняется?


Anatoly Podgoretsky   (2002-07-06 17:36:00) [8]

Вообще то ReadString также имеет три параметра, но это не важно, так как не требуется писать специальной процедуры для анализа
Value := ReadString(Section, Ident, Default);
Твой варианта value=true\false физически неосуществим


Наверх

Титульная страница Поиск, карта сайта Написать письмо