Немного поясню то, что говорил lmikle. Вот только он говорил про TMemo, а я поясню для TStrings (хотя разница небольшая, т.к. TMemo использует TStrings).
Если нужно получить весть текст, то используйте Strings.Text.
Если только одну строку, то Strings.Strings[i], где i - номер строки (не забываем, что первая строка идет под номером 0).
Пример с циклом, где к переменной Msg плюсуются строки из Strings:
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
Strings: TStrings;
i: Integer;
Msg: string;
begin
Strings:= TStringList.Create;
try
// указываем текст в Strings, например Strings.LoadFromFile('ss.txt');
// а далее идет код:
for i:= 0 to Strings.Count - 1 do
Msg:= Msg + #13#10 + Strings.Strings[i];
finally
Strings.Free;
end;
end;