Formatage d'un String

Bonjour
Mon application génère un fichier texte à partir d'une table.
les lignes de ce fichier sont de longueur fixe.
j'aimerai savoir s'il existe des fonctions ou commande du type (Lpad et Rpad) de SQL pour fixer la taile d'une chaine de caractère et éventuellement compléter à gauche ou à droite par des blancs (' ') ou des zeros( 0 ).
merci d'avance.

Citation:

---

Envoyé par yaclouis

j'aimerai savoir s'il existe des fonctions ou commande du type (Lpad et Rpad) de SQL pour fixer la taile d'une chaine de caractère et éventuellement compléter à gauche ou à droite par des blancs (' ') ou des zeros( 0 ).
merci d'avance.

---

issu de JCL - JclAnsiString.pas Project JEDI /auteur Marcel van Brakel

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21

function StrPadLeft(const S: AnsiString; Len: Integer; C: AnsiChar): AnsiString; var L: Integer; begin L := Length(S); if L < Len then Result := StringOfChar(C, Len - L) + S else Result := S; end;   function StrPadRight(const S: AnsiString; Len: Integer; C: AnsiChar): AnsiString; var L: Integer; begin L := Length(S); if L < Len then Result := S + StringOfChar(C, Len - L) else Result := S; end;

---

Cordialement

ça marche.
Merci de votre aide.
par ailleurs, je me demandais s'il existait des fonctions qui faisaient ça automatiquement.

La fonction Format permet beaucoup de chose !
La fonction Write des fichiers Texte aussi, permet un formatage mais par des espaces uniquement ...