Hallo
auf die schnelle, würde ich dies mit einem memo und einem Timer machen
und die Höhe des Memos auf die gewünschte Anzahl sichtbaren
Zeilen setzen.
im Form.Create
memo1.Lines.LoadFromFile('Deine TextDatei.XYZ');
im Timer1.OnTimer
Delphi-Quellcode:
memo1.Lines.Add(memo1.Lines[1]);
memo1.Lines.Delete(0);
Gruss Roger