Código Delphi [-]Pos(#13#10, AdjustLineBreaks(RichEdit1.Text))
Pos(#13#10, AdjustLineBreaks(RichEdit1.Text))