delphi - 1行のDelphiメモ行

Question

TMemo フィールドには 3 行あります。

1. ライン1
2. 2行目
3. ライン3

3 行すべてを 1 つの文字列として取得することは可能ですか?

例：

ライン1、ライン2、ライン3

Answer 1

これには Lines.CommaText プロパティを使用できます。以下をせよ：

CommaString := Memo1.Lines.CommaText;

テキストで別の区切り文字を使用する場合は、DelimitedText プロパティを使用すると便利です。次のようなものを使用してそれを行うことができます。

Memo1.Lines.Delimiter := '-';
Memo1.Lines.StrictDelimiter := True;
DashString := Memo1.Lines.DelimitedText;

これは両方の方法で機能します。CommaText または DelimiterText に値を割り当てて、行を設定できます。これは実際には TStringList の .

Answer 2

たぶん、このようなものがあなたのニーズに合っています

d:=memo1.lines.count;
for i:=1 to d do
   memo1.lines[0]:=memo1.lines[0]+' '+memo1.lines[i];
for i:=1 to d do
   memo1.lines.Delete(1);