带有TStringList的OutOfMemoryError

Question

我尝试使用streamreader填充字符串列表.但是在填充它时我有一个OutOfMemoryError.我在网上搜索,但找到任何解决方案.我也尝试增加我的字符​​串列表的容量,但它没有任何改变.谢谢你的帮助.

这是我的代码:

list := TStringList.create;
//list.Capacity := 100000000; Doesn't work
Reader := TStreamReader.Create(filename, true);
try
  list.BeginUpdate;
  try
    list.Clear;
    while not Reader.EndOfStream do
    list.Add(Reader.ReadLine); // OutOfMemoryError
  finally
    list.EndUpdate;
  end;
finally
  Reader.Free;
end;

我忘了我的xml文件大小是250个月.