wie schreibe ich ein textfile in ein unterverzeichnis

[Willi1960]

Ich habe den Fehler gefunden.
Merkwürdigerweise funktioniert es nicht unter Delphi 1. Compiliere ich den Code unter Delphi 4 funktioniert es. Ich danke euch