načítání

Protože by načítání dat po jednotlivých položkách mohlo v případě delších "seznamů" poněkud zdržovat, dá se využít funkce ReadSectionValues, která najednou načte všechny položky dané sekce a výsledek uloží do nějakého seznamu řetězců (např. do ListBoxu, Memo atd..).
procedure TForm1.Button3Click(Sender: TObject);
var
INISoubor: TIniFile;
begin
INISoubor := TIniFile.Create('c:\pokus.ini');
INISoubor.ReadSectionValues('První sekce', ListBox1.Items);
INISoubor.Free;
end;