freepascal.ru

azsx писал(а):Стек пока я увеличивать не буду, так как не смог понять что это и почему мне не хватает стандартного (у меня рекурсий нет).

zub писал(а):Получить стек

угу. Если быть точнее: это может стать поводом...

Построчное чтение из файла, или "кусками" не подойдут варианты?

Получить стек - отладить программу. Если стек не поможет - сделать подробный лог и ловить момент когда программа начинает вести себя нештатно

Есть соответствующие инструменты для ловли утечек - ключик -gh

возможно просто слишком глубоко вложенная процедура/функция с большим количеством параметров на каждом уровне вложенности. Каждая подпрограмма создает собственный "кадр" в стеке (резервирует место под собственные параметры вызова). Правда, я не думаю, что это касается данного случая

Код: Выделить всё

  St:= TStringList.Create;
  try
    St.LoadFromFile(FName);
    Result:= St.Text
  finally
    St.Free
    end

что делать? Я могу как то супер освобождать TStringList?

нет, крайне долго. И для некоторых файлов почти невозможно.

по времени каждую секунду с отключением таймера на

Код: Выделить всё

  St:= TStringList.Create;
  try
    St.LoadFromFile(FName);
    Result:= St.Text
  except
    St.Free
end 
finally
    St.Free
    end

Код: Выделить всё

  Result := '';
  try
    St:= TStringList.Create;
    try
      St.LoadFromFile(FName);
     Result:= St.Text
    except
      //обработка исключения
   end;
  finally
    St.Free
end;


Код: Выделить всё

  St:= TStringList.Create;
  try
    St.LoadFromFile(FName);
    Result:= St.Text
  finally
    St.Free
    end

туда файл одним куском?

нет, крайне долго.

Загрузили 100 метровый файлик, получили исключение, а программа работает и грузить новую порцию. И так несколько раз подряд...
Напрашивается странный вопрос: как среагирует система на подобное???

azsx писал(а):Разве TStringList после выхода с процедуры остался в оперативной памяти?

pupsik писал(а): zub

туда файл одним куском?

=

нет, крайне долго.

Добавлено спустя 3 минуты 7 секунд:
по поводу StringList - простое предположение... Возможно ошибка иная....

в реальности файлы занимают мегабайты

Разве TStringList после выхода с процедуры остался в оперативной памяти?

Почему просто не выделить в Result нужный размер и не прочитать туда файл одним куском?