Den Namen der Datei gibst Du bei
AssignFile als 2. Parameter an. Du musst also 2 mal AssignFile aufrufen, einmal für die Quell- und einmal für die Zieldatei. Dann wird die Quelldatei zum Lesen, die Zieldatei zum Schreiben geöffnet (Reset bzw. Rewrite). Nun noch Zeile aus Quelle lesen (ReadLn) und in Ziel schreiben (WriteLn). Zum Schluss beide wieder schließen (CloseFile). Dazu noch ein wenig Fehlerbehandlung und fertig.