Erstatte linjeskift

Tags:    delphi

Hvorfor kan jeg ikke få dette til at virke??

<pre>
for i:= 0 to Memo1.Lines.Count-1 do
tasks := tasks + Memo1.Lines;
tasks := StringReplace(tasks, #13#10, '<br>', [rfReplaceAll, rfIgnoreCase]);
ShowMessage(tasks);
</pre>

Jeg vil gerne have erstattet linjeskift med <br>, men den vil bare ik :(

Nogle der ved hvad fejlen er ??



4 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 1 karma
Sorter efter stemmer Sorter efter dato
Hvorfor kan jeg ikke få dette til at virke??

<pre>
for i:= 0 to Memo1.Lines.Count-1 do
tasks := tasks + Memo1.Lines;
tasks := StringReplace(tasks, #13#10, '', [rfReplaceAll, rfIgnoreCase]);
ShowMessage(tasks);
</pre>

Jeg vil gerne have erstattet linjeskift med , men den vil bare ik :(

Nogle der ved hvad fejlen er ??


Du skal selv smide dine linjeendings på ;)... Alternativt bør .Text property'en på en TMemo kunne klare det! Med text er det bare sådan her:
Fold kodeboks ind/udKode 


MH.

The-Freak

Livet er for kort til at kede sig.



Du har ikke valgt hvilken linje du vil indsætte i tasks. Derfor du bruger en For blandt andet vil jeg tro :).



Du har ikke valgt hvilken linje du vil indsætte i tasks. Derfor du bruger en For blandt andet vil jeg tro :).


- Den lister jo hele memo'et igennem og gemmer det i strengen 'tasks'. Derefter skulle den vel replace alle #13#10 med <br> .. eller er det mig der er galt på den ?



Du har ikke valgt hvilken linje du vil indsætte i tasks. Derfor du bruger en For blandt andet vil jeg tro :).


- Den lister jo hele memo'et igennem og gemmer det i strengen 'tasks'. Derefter skulle den vel replace alle #13#10 med .. eller er det mig der er galt på den ?


tjah.. det hjalp vel en lille smule :) Jeg siger tak.



t