Сохранение в папку

[Stilet]

Лучше так:

p:=ExtractFilePath(Application.ExeName)+ 'Log';
ForceDirectories(p);
smemo1.Lines.SaveToFile(p+'/LogFiles.txt');