Как найти в тесте символ новой строки?

[Anfall]

Доброго времени суток всем.

У нас есть текст в txt.
У текста есть разделение на абзацы путем новой строки.

Этот текст попадает в программу в string.

Как найти эти символы новой строки в string?

Заранее благодарен.

[filvika]

#13 - код символа новой строки
Напр.,

var s: string;
i: integer;
...
for i := 1 to length(s) do
if s[i] = #13 then ...

[Anfall]

filvika,
Спасибо.