Supprimer espace

chouchi.21 Messages postés 18 Statut Membre -  
Uly410 Messages postés 361 Statut Membre -
bonsoir
voila j'aimerai savoir quelle fonction permet de supprimer tous les espaces d'un texte .

merci

2 réponses

  1. Profil bloqué
     
    program DeleteAllSpaces;

    var S, Sub_S : String;

    begin

    S := 'a bb ccc dddd eeeee ffffff ggggggg';
    Sub_S := ' ';

    while Pos(Sub_S, S) > 0 do
    Delete(S, Pos(Sub_S, S), 1); { suppression des espaces }

    Write(S); { La chaine S sans les espaces }

    ReadLn;
    { TODO -oUser -cConsole Main : placez le code ici }
    end.
    0
  2. Uly410 Messages postés 361 Statut Membre 25
     
    Vous indiquez le chemin à suivre, mais vous n'écrivez pas la fonction.

    Cordialement Uly
    0