System.SysUtils.WrapText
Delphi
function WrapText(const Line, BreakStr: string; const BreakChars: TSysCharSet;
MaxCol: Integer): string;
function WrapText(const Line: string; MaxCol: Integer): string;
C++
extern DELPHI_PACKAGE System::UnicodeString __fastcall WrapText(const System::UnicodeString Line, const System::UnicodeString BreakStr, const TSysCharSet &BreakChars, int MaxCol)/* overload */;
Eigenschaften
Typ | Sichtbarkeit | Quelle | Unit | Übergeordnet |
---|---|---|---|---|
function | public | System.SysUtils.pas System.SysUtils.hpp |
System.SysUtils | System.SysUtils |
Beschreibung
Fügt einen Zeilenumbruch in einen String ein, wenn dessen Länge sich einer bestimmten Größe nähert.
WrapText fügt keinen Zeilenumbruch in in Anführungszeichen gesetzte Strings (sowohl in einfache als auch in doppelte Anführungszeichen) ein.
Im Allgemeinen sucht die Routine WrapText nach Leerzeichen, Bindestrichen oder Tabulatorzeichen, bei denen ein Zeilenumbruch erfolgen kann, und fügt unter Windows ein Wagenrücklauf/Zeilenvorschub-Paar oder unter MacOS einen Zeilenvorschub ein, bevor die MaxCol
-Zeichen gezählt werden (erste Überladung).
Bei der zweiten Überladung wird eine neue String-Folge (angegeben im Parameter BreakStr
) bei dem letzten Vorkommen eines im Mengenparameter BreakChars
angegebenen Umbruchzeichens eingefügt, bevor die MaxCol
-Zeichen gezählt werden.
Beispielsweise liefert der folgende Code
WrapText('The rain in Spain falls mainly on the plain.', #13#10, ['.',' ',#9,'-'], 15);
TSysCharSet bChars;
bChars << '.' << ' ' << '/t' << '-';
WrapText("The rain in Spain falls mainly on the plain.", "/n", bChars, 15);
dieses Ergebnis:
The rain in Spain falls mainly on the plain.