RichEdit.Lines in Array/Variable

[StanY]

Delphi-Quellcode:

var
  i: Integer;
begin
  for i := 0 to Length(SFile[Num].Source)-1 do begin
    redSource.Lines.Strings[i] := SFile[Num].Source[i];
    ShowMessage(SFile[Num].Source[i]);
  end;
end;

Danke schonmal... (:

Aber, hier noch eine Frage:
Er fügt bei diesem Teil lediglich eine Zeile Zeile zu redSource (RichEdit) hinzu.

Mit ShowMEssage zeigt er aber alle Zeilen an... Warum? ^^

Also, z.b.

ShowMessage gibt hintereinander aus:
'bla erste zeile'
'bla zweite zeile'

aber in dem RichEdit-Ding steht halt nur
'bla erste zeile'

Warum? ^^