Co zrobić, aby każdą linię RichEdita zapisać w osobnej zmiennej

Może nie do osobnej zmiennej, ale do tablicy:

var
Lines : array of String;

procedure TForm1.Button1Click(Sender: TObject);
var
I : Integer;
begin
SetLength(Lines, RichEdit1.Lines.Count);
for I := Low(Lines) to High(Lines) do
Lines[i] := RichEdit1.Lines.Strings[i];
end;

Wykorzystana tu została tablica dynamiczna, która przybiera rozmiar, który jest ilością linii w RichEdit.