2013年5月のメモより
TEncoding.GetEncoding
ENC: TEncoding;
ENC := TEncoding.GetEncoding(20932); // EUC_JP
SL.SaveToFile('test.txt', ENC);
ENC.Free;
明示的に破棄しないとメモリリークが発生する。
watercolor-cityさんのページで見たと思うが、今は残念ながらリンク切れ。
http://www.watercolor-city.net/ct_delphi/delphi_tiburon/doc_unicode/tencoding_textio.htm