Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Selektierter Text in eine TStringList schreiben... (https://www.delphipraxis.net/3038-selektierter-text-eine-tstringlist-schreiben.html)

design5 19. Feb 2003 13:24


Selektierter Text in eine TStringList schreiben...
 
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 19. Feb 2003 13:50

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

design5 19. Feb 2003 14:15

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 19. Feb 2003 14:26

Hallo,

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

design5 19. Feb 2003 14:53

Danke, das #13 habe ich gesucht...


Alle Zeitangaben in WEZ +2. Es ist jetzt 18:18 Uhr.

Powered by vBulletin® Copyright ©2000 - 2021, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2021 by Daniel R. Wolf