Programm das in eine Datei schreibt...

[alleinherrscher]

Um ne Textdatei zu schreiben:

Delphi-Quellcode:

var aFile:Textfile;

assignfile('C:\irgendeinPfad\irgendeineDatei.endung',aFile);
rewrite(aFile);
writeln('irgendeinStringDerInDeineTextDateiInEineZeileGeschriebenWerdenSoll');
//...
closefile(aFile);

Ums zu lesen ersetzt du rewrite durch reset(afile) und writeline durch readln(String,aFile)