TString - String (Listview und SubItems Ausgabe in String)

[arne99]

Problem:
Ich will die SubItems (Werte) als String in einen String packen.

Fehler: TStrings und string - Inkompatible Typen

Frage: Wie kann ich die SubItems als String verwenden?


Das ist der Code:

Delphi-Quellcode:

 for I := 0 to listview1.Items.Count - 1 do
  begin
  richedit1.Lines.AddStrings(
  '<configuration name="' + listview1.Items[i].Caption + '"' + #13#10 +
  'ds-name="' + listview1.Items[i].SubItems[0] + '"' + #13#10 +
  'service-url="' + listview1.Items[i].SubItems[1] + '"' + #13#10 +
  'lfs-cache-path="' + listview1.Items[i].SubItems[2] + '"' + #13#10 +
  'lfs-config-name="' + listview1.Items[i].SubItems[3] + '" />');
    end;