Чтение данных из секций ini выборочно из ListBox

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

Привет=)
Суть такова..
на форме есть
Один ListBox (SectionsList)
Одна кнопка
Один Edit (CodedKeyDataEdit)

Ini имеет структуру:
[секция1]
Age=тут значение типа Integer

Имена секций разные..

в общем вынес весь мозг с ListBoxэом..
Проблема в то что при клике на элемент в списке,
хочу получать в Edit данные из ключа Age..

как получить выделеный элемен списка, а потом его имя вставить в

ini.readInteger(Тут имя секции элемента выбранного в списке,'Age',-1)

Вот что я пробовал..:

procedure TMainForm.SectionsListClick(Sender: TObject);
var
  ini:TiniFile;
  i:Integer;
begin
  ini:=TIniFile.Create(OpenDlg.FileName);
  if SectionsList.Selected[SectionsList.itemindex] then
codedKeyDataEdit.Text:=IntToStr(ini.ReadInteger(SectionsList.Items.Names[i],'Age',0));
ini.free;
end;

не могу понять.. то ли неправельно узнаю выделен ли элемент, либо не получаю имя секции..

судя по aV не получаю имя секции.. каким образом получить?

[russian-stalker]

codedKeyDataEdit.Text:=IntToStr(ini.ReadInteger(SectionsList.Items.Strings[SectionsList.itemindex],'Age',0));

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

Спасибо=) Проблема исчезла..