Textdatei lesen und Inhalt in neuer abspeichern

[MutterGans]

Hallo,

ich würde gerne aus einer bereits bestehenden Textdatei auf meinem PC, per Delphi, eine bestimmte Anzahl an Zeilen auslesen und diesen Inhalt in eine neue Textdatei speichern. Ich hab mir schon ein paar Gedanken gemacht aber nie wirklich einen ansatz gefunden der mich zu Ansätzen bringt. Vielleicht kann man die Anzahl der Zeilen mit einer for-Schleife festlegen?!?