Wenn man irgendwo etwas zuweisen will, dann kann man das so machen.
Delphi-Quellcode:
while Memo1.Lines.Count - 1 < i do
Memo1.Lines.Add('');
Memo1.Lines[i] := S;
Durch Ableiten des TMemo kann man sich das z.B. auch als
Memo1.LinesEx[i] := S;
oder (seit D2006) via ClassHelper als
Memo1.Lines.StringsEx[i] := S;
implementieren.