![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Ini.SectionExists [D5, D7]
GanibalLector © (2005-08-17 18:35:00)Имею файл некоторой программы,в котором примерно такое содержание :
[Загальні]
2 8 Новая касса
[Касири]
[Товари]
1 ОЛЛИ75% 0,5 3.09
2 ОЛЛИ75% 0,25 1.83
3 ОЛЛИ60% 0,5 2.79
1 1
2 1
1 2
2 2
1 3
2 3
Вроде как похоже на ini,но и не ini.В ini обычно присутствует =т.к.
Within each section, actual data values are stored in named keys. Keys take the form:
<keyname>=<value>
Ну да ладно... Написал пару строк:
var Ini:TIniFile;
begin
with OpenDialog1 do
begin
Filter:='EliteMarket|*.em';
if Execute and (FileName<>'') then
begin
Ini:=TIniFile.Create(FileName);
try
Ini.ReadSections(Memo1.Lines);
finally
Ini.Free;
end;
end;
end;
end;
В Memo появились имена секций: Загальні,Касири,Товари
Но!!! При попытке выйти на конкретную секцию получаю неудачу :(
...
if Ini.SectionExists('Товари') then
Windows.Beep(800,200);// Для примера
...
Если же самому создать секцию,то все прекрасно работает.
...
Ini.WriteString('Ganibal','Lector','very LOL');
Ini.UpdateFile;
if Ini.SectionExists('Ganibal') then
Windows.Beep(800,200);// Для примера
...
Что за чудеса и как с ними бороться???
P.S.Также заменял имена секций на английские.Результат тот-же :(
TUser (2005-08-17 19:06:00) [1]Я имею в виду - загрузить в TStringList и установить нужный разделитель. Потом с ним работать.
GanibalLector (2005-08-17 18:52:00) [2]2 TUser © (17.08.05 18:50) [4]
Это Вы о чем?
TUser (2005-08-17 18:50:00) [3]TStrings.NameValueSeparator
KilkennyCat (2005-08-17 18:46:00) [4]http://www.delphirus.net.ru/modules.php?name=Files&go=view_file&lid=12
GanibalLector (2005-08-17 18:41:00) [5]2 Styx (17.08.05 18:39) [1]
Хорошо,предложите как?
Styx (2005-08-17 18:39:00) [6]Зачем работать через TIniFile с не-ini файлом?