В смысле найти? название или че?
а открытие на дописывание
assignfile('c:\file.txt',f);
append(f); (или apend, непомню)
writeln(f,'Дописали');
closefile(f);