その後、さらに調べると、ここのサイトをみつけ、
http://219.117.234.12/nikki10.html

そこの記述にしたがって、IdHeaderList.pas の
Result := Trim(Result) + ' ' + Trim(LFoldedLine);
を
Result := Trim(Result) +#10+ Trim(LFoldedLine);
に書き換えました。

それでも直りません。助けてください。