Schau dir mal assignfile, Rewrite, Writeln und Closefile an.
Oder TStringList.
zu Assignfile&Co
Code:
var
deinfile: textfile;
begin
assignfile(deinfile,'c:\test.txt');
rewrite(deinfile);
writeLn(deinfile,'das ist die erste zeile');
writeLn(deinfile,'und das ist die zweite zeile');
closefile(deinfile);