[sve-pro]

Нужно с Ини файла загрузить в ЛистБокс. У меня не получается.
Вот код процедуры

Код:

 try
  with t_ini do begin
  maskEdit1.text:=t_ini.readstring('MaskEdit1','text','');
  scrollbar1.Position:=t_ini.ReadInteger('Scrollbar1','position',-1);

listbox1.count:=t_ini.readInteger('listbox1','count',1);
   for i:=0 to listbox1.items.count -1 do  begin   
   listbox1.Items[i]:=t_ini.readstring('listbox1','1','');
Ошибка в выделенном. А вот где грузится в Ини с Листбокса
t_ini.WriteInteger('listbox1','count',listbox1.count);
    for i:=0 to listbox1.items.count -1 do  begin
    t_ini.WriteString('listbox1','l'+inttostr(i),listbox1.Items[i]);

Админ: Пользуемся тегами для оформления кода!