имхо, лучше используй RichEdit вместо Memo
Код:
SaveDialog1.DefaultExt:='txt'; // дефолтное расширение
SaveDialog1.Filter:='Текстовый файл|*.txt'; // отображать только txt
if SaveDialog1.Execute then
begin
RichEdit1.Lines.SaveToFile(SaveDialog1.FileName); // или memo вместо RichEdit
end;
Не успел...