А обычной записью в файл нельзя воспользоваться? к примеру: var f: TextFile; Text:string; begin text := Edit1.Text; AssignFile(f, text); Rewrite(f);