Zeilenumbruch nach maximal 30 Zeichen

[Metschu]

Hallo Zusammen,

Ich habe eine Textzeile mit bis zu 180 Zeichen. Nach Maximal 30 Zeichen soll ein Zeilenumbruch eingefügt werden. Dieser soll aber nicht einfach das Wort trennen, sondern entsprechend der Satz- oder Leerzeichen ggfs auch früher gesetzt werden.

Gibt es hierfür schon eine fertige Funktion oder muss ich mir was selbst basteln?

Danke schon mal.
Gruß
Torsten

[nahpets]

Unter Delphi 7 gibt es in der SysUtils dir Funktion WrapText:

Delphi-Quellcode:

function WrapText(const Line: string; MaxCol: Integer = 45): string;

Die sollte Deine Aufgabe erledigen können.

[Metschu]

Vielen Dank, genau danach hab ich gesucht. :thumb: