ANSI编码保存TXT

使用Delphi 2007，保存Memo的内容为TXT，如何以ANSI编码格式保存？SaveToFile保存的默认是UTF-8格式，谢谢

SaveToFile()应该有重载方法，传指定编码。