System.SysUtils.WrapText

De RAD Studio API Documentation
Aller à : navigation, rechercher

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 */;

Propriétés

Type Visibilité  Source Unité  Parent
function public
System.SysUtils.pas
System.SysUtils.hpp
System.SysUtils System.SysUtils

Description

Insère un saut de ligne dans une chaîne quand sa longueur se rapproche d'une taille spécifiée.

WrapText n'insère pas de saut dans une chaîne entre apostrophes (apostrophes simples ou guillemets doubles).

Généralement, la routine WrapText recherche les caractères espace, tiret ou tabulation où couper la ligne, et insère une paire CR/LF sur Windows, ou un caractère LF sur MacOS, avant de compter les caractères MaxCol (première surcharge).

La seconde surcharge insèrera une nouvelle séquence de chaîne (spécifiée par le paramètre BreakStr) à la dernière occurrence de tout caractère de saut spécifié dans le paramètre ensemble BreakChars, avant de compter les caractères MaxCol.

Par exemple, après l'exécution du code suivant

 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);

le résultat sera :

The rain in Spain
falls mainly on the
plain.

Voir aussi