Listview Inhalt in Combobox kopieren

[Seppel]

Hi,
Ich mache mal einen neuen Thread für mein aktuellstes Problem auf.
Ich will den Inhalt eines Listviews in eine Combobox kopieren.

Aber nur, den Inhalt der in der Spalte Vorname und Name ist.
Die beiden sollen dann jeweils zusammen in der Combobox stehen.
Also z.B.
ID|Vorname|Name |Adresse|...
1 |Max |Mustermann|Muster |...
2 |Test |Bla |Test |...
So und nun soll in der Combobox stehen, MaxMustermann und TestBla.

Delphi-Quellcode:

combobox1.AddItem();(* damit füge ich das dann hinein, nur was muss ich in die Klammer eingeben, damit er mir VOrname und Name zusammen schreibt. Listview.Items[0]?? so irgendwie?? also aufjedenfal brauche ich auch eine Schleife *)
Glaube so:
for i := 0 to Listview1.Items.Count - 1 do//? Das geht ja dann oder soll alle Einträge durch gehen und dann alle VOrname und Name in die Combobox zusammen reinschreiben.

Höffe ihr könnt mir helfen.
Danke.

[DeddyH]

Sry, hatte das im anderen Thread falsch verstanden und außerdem Caption vergessen. Versuch es stattdessen mal so:

Delphi-Quellcode:

for i := 0 to ListView1.Items.Count - 1 do
  ComboBox1.Items.Add(Format('%s %s',[ListView1.Items[i].Caption,ListView1.Items[i].SubItems[0]]));

[edit] Achso, das sind beides SubItems, dann so:

Delphi-Quellcode:

for i := 0 to ListView1.Items.Count - 1 do
  ComboBox1.Items.Add(Format('%s %s',[ListView1.Items[i].SubItems[0],ListView1.Items[i].SubItems[1]]));

[/edit]

[Seppel]

Zitat:

Zitat von DeddyH

Sry, hatte das im anderen Thread falsch verstanden und außerdem Caption vergessen. Versuch es stattdessen mal so:

Delphi-Quellcode:

for i := 0 to ListView1.Items.Count - 1 do
  ComboBox1.Items.Add(Format('%s %s',[ListView1.Items[i].Caption,ListView1.Items[i].SubItems[0]]));

[edit] Achso, das sind beides SubItems, dann so:

Delphi-Quellcode:

for i := 0 to ListView1.Items.Count - 1 do
  ComboBox1.Items.Add(Format('%s %s',[ListView1.Items[i].SubItems[0],ListView1.Items[i].SubItems[1]]));

[/edit]

Das hab ich schon selbst gemacht mit dem anderem Item^^
edit: Danke!

[Seppel]

Jetzt habe ich nur das Prob mim löschen.

Delphi-Quellcode:

DeleteDirRecursive('C:\Dokumente und Einstellungen\Sebastian\Desktop\Programmieren\Mysqlconnect\Pics\Test\', combobox1.items);

Er löscht den gesamten Ordner. In der Combobox steht alles drinne, z.B. TestTest und der wird gelöscht obwohl er darin steht.
Was ist jetzt falsch?
edit1:
Ich habs, er macht ein Leerzeichen dazwische und zwar zwischen Test Test.
Wie kriege ich das weg?
edit2: Habs jetzt auch.
Danke.