Ok, Danke soweit.
Also habe nun eine einfachere Variante gefunden.
Delphi-Quellcode:
begin
assignfile(textis,'textis.txt')
rewrite(textis);
...
Falls die oberen Dialogausschnitte als nicht brauchbar escheinen, können sehr gerne die Moderatoren die letzteren Abschnitte löschen.
Danke für eure Hilfe.