Listview CommaText mit Leerzeichen

[ebber]

Hallo

ich habe vor einiger Zeit mal diesen Code gefunden um in ein Listview etwas einzutragen.

Delphi-Quellcode:

procedure TForm3.ListViewAddItm(ListView: TListView; const ersteSpalte,
          Rest_CommaText: String; Checked: Boolean = true);
var
  ListItem: TListItem;

begin
  with ListView do
    begin
      ListItem := Items.Add;
      ListItem.Caption := ersteSpalte;
      ListItem.SubItems.CommaText := Rest_CommaText;
      If Checkboxes then
        Items.Item[Items.Count - 1].Checked := Checked;
    end;
end;

Wenn jetzt aber ein Leerzeichen in einem der Comma Texts ist dann geht es automatisch eine Spalte weiter. Kann man das irgenwie verhindern ?

MfG