Imaginemos que tenemos un texto en el que el carácter '|' indica un cambio de linea, para cargarlo en un memo haríamos los siguiente:
Código Delphi
[-]
var
Texto: string;
begin
Texto:= 'Uno|Dos|Tres';
Memo1.Lines.Text:= StringReplace(Texto,'|',#13,[rfReplaceAll]);
end;
Se podrá dar el caso de que necesitemos insertar mas de un texto en el mismo memo, no tendría mayor dificultad:
Código Delphi
[-]
var
Texto: string;
begin
Texto:= 'Uno|Dos|Tres';
Memo1.Lines.Text:= StringReplace(Texto,'|',#13,[rfReplaceAll]);
Texto:= 'Cuatro|Cinco|Seis';
Memo1.Lines.Text:= Memo1.Lines.Text + StringReplace(Texto,'|',#13,[rfReplaceAll]);
end;
De todas formas recordarte que en windows el cambio de linea se indica con dos caracteres #13#10, en el caso del memo basta con indicar solo el #13 que delphi internamente se encarga de incluir en #10. Aunque la forma correcta de hacerlo seria la siguiente:
Código Delphi
[-]
Memo1.Lines.Text:= StringReplace(Texto,'|',#13#10,[rfReplaceAll]);
Espero que el ejemplo anterior te sirva de ayuda