Работа с INI-файлом

[iskurt]

Уважаемые, подскажите, как узнать кол-во ключей в секции?

к примеру
[Секция_1]
key1
key2
....
keyn


Вот сколько эта n ?

[SERG1980]

rocedure TForm1.Button1Click(Sender: TObject);
var Ini:TIniFile;
    t:tstringlist;
    n:integer;
begin
  try
   t:=TStringList.Create;
   Ini:=tinifile.Create('d:\Ini.ini');
   Ini.WriteInteger('Секция_1','key1',34);
   Ini.WriteInteger('Секция_1','key2',32);
   Ini.ReadSection('Секция_1',t);
   n:=t.Count;
   t.SaveToFile('d:\1.txt');
   ShowMessage(inttostr(n));
  finally
   t.Free;
   Ini.Free
  end;
end;

[iskurt]

Спасибо, супер!!!

Подскажите еще вот какую штуку....
Как незная названия ключей, прочиттать все названия ключей, или незная их обращяться к ним?
Можно ли к ним обращяться как-нибудь по порядковым номерам?

[SERG1980]

Сообщение от iskurt

Подскажите еще вот какую штуку....
Как незная названия ключей, прочиттать все названия ключей, или незная их обращяться к ним?
Можно ли к ним обращяться как-нибудь по порядковым номерам?

Посмотрите предыдущий пост там добавлена строка сохранения стринглиста. Там как раз и сохраняются все ключи секция_1. А уж дальше обращайтесь к итой строке стринглиста (как в мемо) и считывайте значения