[sariman]

Пробежался по коду, нашел пару ошибок, держите:

Код:

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].Append(t_ini.readstring('listbox1', '1', ''));
      t_ini.WriteInteger('listbox1', 'count', listbox1.count);
      t_ini.WriteString('listbox1', 'l' + inttostr(i), listbox1.Items[i]);
   end;

Два одинаковых цикла порадовали..))