TStringList.CommaText

Parameter

() : String;

Beschreibung

Die Eigenschaft CommaText führt die Strings eines TStringsList-Objekts auf und stellt diese im SDF-Format (System Data Format) da und bietet beim Schreiben oder Lesen die Möglichkeit, sämtliche Listeneinträge als einen String, welcher durch Kommas getrennt ist zu behandeln. Leerzeichen, Kommas oder Amführungszeichen als Teil des String sind werden ebenfalls abgebbildet.

Beispiel

procedure Test_CommaText;
var
  text : String;
  TestObj : TStringList;
begin
  TestObj := TStringList.Create;
  try
    TestObj.Add('Igel');
    TestObj.Add('Rabe');
    TestObj.Add('Schlange');
    text := TestObj.CommaText;
    if (pos(',',text) < 0) then
      raise ('Test_CommaText Fehler');
    else
    showmessage(TestObj.DelimitedText);
  finally
    TestObj.free;
  end;
end;