Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questiontry SL := TStringList.create; for i:= 0 to SL.count -1 do begin // ici tu lis toutes tes chaines complètes for j:= 1 to Length(SL.Strings[i]) do begin ////////// caract par caract ou une fonction avec délimiter end; end; finally SL.Free; end;