Работа с ini файлом

[Aleksandr]

Есть ini файл с содержимым
[name]
n1=Edit1
n2=host
[аааааааа]
n1=Edit1п
n2=hostпр
[ssssssssssssss]
n1=Edit1
n2=host
Как вставить секции [name], [аааааааа] и другие в мемо

[Toxa]

memo.lines.add('[name]')
а в чем собственно проблема?

[Aleksandr]

Мне нужно считать секции с ini файла

[Aleksandr]

Вот мой код

procedure TForm1.Button2Click(Sender: TObject);
var
   F: TIniFile;
   sec:tstringlist;
   i:integer;
begin

  F := TIniFile.Create(ExtractFilePath(ParamStr(0)) + 'base.pdb');


  try
      F.ReadSections(sec);
         for i:=0 to sec.Count-1 do begin
         memo1.lines.add(sec[i]);
      end;
    except


end;
end;

Что здесь не так?

[Аватар]

Что здесь не так?

А что не так? Имена секций выбрали.

Как вставить секции [name], [аааааааа] и другие в мемо

Секции с содержимым

memo1.lines.LoadFromFile(ExtractFilePath(ParamStr(0)) + 'base.pdb');

[Aleksandr]

Мне нужно вставить только наименования секций без содержимогою

[phomm]

А где Вы sec создаёте ? Его ведь надо существующий передавать, сам ини-класс Вам его не создаст. Вы ещё и глушите ошибку по эксепт-энд.
Насчёт имён секций - согласно справке, ReadSections method - Reads the names of all sections in an INI file into a string list.

[Аватар]

Можно и без sec если в Memo больше ничего нет

F.ReadSections(Memo1.Lines);

[Aleksandr]

Спасибо phomm действительно забыл строчку
sec:=tstringlist.Create;