TStrings.Pack
| TStrings = class (TObject) | Interface de TStrings | Exemples de TStrings |
Supprime les chaînes vides de la TStrings
Syntaxe
procedure Pack()
Remarques
Pour supprimer les caractères de contrôles en début et fin de chaînes (les espaces notamment), utiliser TrimStrings
Exemples
var liste := TStrings.Create;
liste.Commatext := 'paul,pierre,,,,jacques';
liste.Pack;
InformationDlg(liste.CommaText); // Affiche 'paul,pierre,jacques' // Les chaînes vides entre pierre et jacques ont été supprimées
liste.Commatext := 'paul,pierre,,,,jacques';
liste.Pack;
InformationDlg(liste.CommaText); // Affiche 'paul,pierre,jacques' // Les chaînes vides entre pierre et jacques ont été supprimées