[Alegun]

А что значит вот это:

Код:

...
s:=('');
...

как то странно.

Да, и всё же поменяй

Код:

...
s:=s+StrLst[i];
s:=s+#13#10;
...

на

Код:

s:=s+StrLst[i]+#13#10;

так будет проще.