Selektierter Text in eine TStringList schreiben...

[design5]

Hallo,

ich stehe vor einem Problem. Ich würde gerne einen markierten Text aus einer MemoBox (via MBox.SelText) in eine TStringList schreiben.

Der markierte Text enthält Zeilenumbrüche.

Die Zeilenumbrüche sollen von Delphi erkannt werden und dafür sorgen, den Text vor bzw. nach dem Zeilenumbruch als Neueintrag in die TStringList aufzunehmen.

Ein absolutes Rätsel...

Oder kann mir vielleicht jmd. sagen, wie ich mit POS('Return', inMBox) das Return-Zeichen finde, damit ich mit COPY den String in Einzelteile zerlegen kann?

Viele Grüße

[Luckie]

Sollen die Zeilenumbrüche nicht mit in die Stringliste, so dass mehrer Zeilen im Memo nur eine Zeile in der Stringliste ergeben?

[design5]

Blos nicht.

Genau das ist im Moment das Problem.

Ich will alles Stück für Stück (von Zeilenumbruch zu Zeilenumbruch) in einer neuen Zeile in der StringList haben.

Weiter interessant ist vielleicht, die Information, dass ich das ganze an den Drucker weiterleite. Der wiederum erkennt den Zeilenumbruch nicht, wenn alles in einer Zeile in der StringList steht und druckt schön über den rechten Rand hinaus...

[Gollum]

Hallo,

schau Dir einmal StringReplace an. Einen Zeilenumbruch findest Du mit der Zeichenfolge #13#10 oder '$D$A'.

[design5]

Danke, das #13 habe ich gesucht...