ComboBox и ini файлы

[celovec]

Есть файл languege.ini

[lang.en]
lang.hint=English
***
[lang.ru]
lang.hint=Русский
***

В нем хранится N-ое количество языков. Подскажите пожалуйста как автоматически подргузить все языки и показать их в ComboBox

Сейчас в ComboBox я добавляю это таким способом но он не умеет автоматически искать все доступные языки в файле. Есть какой-то простой способ сделать это?

var ln: TIniFile;
begin
ComboBox1.Items[0]:=ln.readString('lang.ru', 'lang.hint', 'error');
ComboBox1.Items[1]:=ln.readString('lang.en', 'lang.hint', 'error');

[Пепел Феникса]

TIniFile.ReadSections

Reads the names of all sections in an INI file into a string list.

procedure ReadSections(Strings: TStrings); override;

Description

Call ReadSections to retrieve the names of all sections in an INI file into a string list object.

Strings specifies the string object to hold the retrieved names. Strings can point to a TStrings object, or to a component property, such as Items for a TListBox component.

1234567890

[celovec]

Может есть какое-то более простой решение.
Может проще в начале файла сделать:

[language]
lang.en=English
lang.ru=Русский
далее старое содержание
***

[lang.en]
lang.hint=English
***
[lang.ru]
lang.hint=Русский
***

и как-то проверять содержимое [language], но как это сделать?

[Человек_Борща]

ComboBox.Items это Tstrings. Я бы заменил в Combobox.Items.Text все #10#13 на |, а затем записал полученный результат в файл ввиде 1 строки.
Item1|Item2|Item3|Item4

Чтение - обратное действие.

и как-то проверять содержимое [language], но как это сделать?

Не надо вам этот геморой.

Пускай секции имеют имена языков.
[English]
[Русский]
[蜐0౔ؠ]

А вы тупо делайте ReadSections