delphi - TStringlist を区切り文字付きの文字列に変換する

Question

TStringList に保存されている文字列のリストがあり、それをコンマで区切られた文字列に変換したいので、次のコードを使用します

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

しかし、最後の文字は 1,2 のようになっていますが、それを回避する方法はありますか?

Answer 1

クラスのDelimitedTextプロパティを使用する必要があります。TStringListオンラインヘルプから

DelimitedText を使用して、TStrings オブジェクト内のすべての文字列を、Delimiter プロパティで指定された文字で区切られた 1 つの文字列として取得または設定します。

Answer 2

プロパティを使用しDelimitedTextます。

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

Answer 3

文字列リストに興味がある場合は、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(',');