Bonjour ,

Je veux forcer une chaine de caractère de coller tous les enregistrements dans une ligne jusqu'à la fin du dernière colonne
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
    List := TStringList.Create; 
       try     ZQuery1.First;
        while not ZQuery1.Eof do
           begin
            S := '';
          for I := 0 to ZQuery1.FieldCount - 1 do
          begin
              if S > '' then
                   S := S + '^';
               S := S + ZQuery1.Fields[I].AsString; 
             end;
            List.Add(S);
            ZQuery1.Next;
            end;
            finally
            List.SaveToFile('C:\fichierFinal.csv');
            List.Free;
            end;
puisque j’ai sur certains enregistrements un retour à la ligne et ça me donne des fausse informations