Код:
var
SL: TStringList;
SL := TStringList.Create;
SL.LoadFromFile('file_name.txt');
// здесь работаешь с текстом
SL.Free; если нужно загрузить текст в какой-нибудь компонент, например в TMemo, тогда напрямую (без TStringList):
Код:
Memo1.Lines.LoadFromFile('file_name.txt');