Conversione TStringList di stringa con delimeter

Question

Ho una lista di stringhe memorizzate nella TStringList, voglio convertirlo in stringa separati da virgole e io uso il seguente codice

channelList: TStringList; 
aCurrentChannel := Stringreplace(channelList.Text,Char(13)+Char(10),',',[rfReplaceAll]); 

ma l'ultimo carattere è venuta come, come 1,2, c'è comunque da evitare?

Answer 1

È necessario utilizzare la proprietà DelimitedText della classe TStringList. Dalla guida in linea

Use DelimitedText to get or set all the strings in the TStrings object in a single string, separated by the character specified by the Delimiter property.

Answer 2

utilizzare la proprietà DelimitedText:

channelList.Delimiter := ','; 
channelList.QuoteChar := ''; // or 
channelList.QuoteChar := #0; // for higher delphi versions 
aCurrentChannel := channelList.DelimitedText; 

Answer 3

Mentre siete in elenchi di stringhe vi suggerisco di lanciare uno sguardo a http://wiki.delphi-jedi.org/wiki/JCL_Help:IJclStringList

// var channelList: iJclStringList; 
var s: string; 

s := JclStringList.Add(['aaa','bbb','ccc ']) 
     .Split('ddd: eee', ':', False).Trim.Join(',');