Parsear texto con TString

[avechuche]

Hola gente que tal, soy nuevo por aca y estoy necesitando un poco de ayuda. Resulta que abro un archivo de texto y lo leo linea por linea con un While. Esas lineas tienen dos partes divididas por la barra "|", osea Texto1|Texto2, yo tengo que parsear ese texo para que me quede
Texto1
Texto2
El problema es el siguiente, el parseo lo hago asi

Código Delphi [-]
arrayColumnas := TStringList.Create;
arrayColumnas.Text := S;
arrayColumnas.StrictDelimiter := True;
arrayColumnas.Delimiter := '|';
arrayColumnas.DelimitedText := arrayColumnas.Text;

Donde "S" es cada linea del '.txt'.

El problema viene que me toma el salto de linea del final de la linea.
arrayColumnas[0] = Texto1 + ¿Un salto de linea? no se que onda
arrayColumnas[1] = Texto2 + ¿Un salto de linea? no se que onda

Use un ShowMessage con comillas para ver que cosa rara habia y me sale lo siguiente. Si el texto es asi 5|Gonzalo me muestra
"5
"
"Gonzalo
"
Las comillas tendrian que ir al final y no en la linea siguiente
Hay alguna forma de que no me tome ese salto de linea?
Gracias!