Item von TListView nach TListView kopieren?

Kalfany · Verfasst: Di 19.02.08 14:39

Hallo,

ich möchte aus einem mehrspaltigen ListView einen Eintrag in ein identisch aufgebautes ListView kopieren / verschieben

leider kopiert er mir immer nur die 2 Spalte?!

markieren

Delphi-Quelltext

1:	LstViewDest.Items.AddItem(ListViewSrc.Items.Item[0],1);

mit einspaltigen ListViews gehts.

Ich versteh auch das ich evtl. aufm Holzweg bin, nur was ich nicht kapier ist warum er bei Item[0] den Inhalt der 2 Spalte hat.

Narses · Verfasst: Di 19.02.08 15:08

Moin!

Probier das mal so:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:

procedure TForm1.ListView1DblClick(Sender: TObject);
begin
  if Assigned(ListView1.Selected) then
    ListView2.Items.Add.Assign(ListView1.Selected);
//  ListView2.Items.Add.Assign(ListView1.Items.Item[0]);
end;

cu
Narses

_________________
There are 10 types of people - those who understand binary and those who don´t.

Kalfany · Verfasst: Di 19.02.08 15:44

Hi,

danke so funktionierts!

Nur was ist wenn man es ohne die Selection machen möchte z.B. weil nicht selektiert ist oder weil z.B. weil man ein anderes als das selektierte verschieben möchte (muss ja auch irgendwie gehen)

Narses · Verfasst: Di 19.02.08 15:58

Moin!

Kalfany hat folgendes geschrieben:

danke so funktionierts!

Biite.

Kalfany hat folgendes geschrieben:

Nur was ist wenn man es ohne die Selection machen möchte z.B. weil nicht selektiert ist oder weil z.B. weil man ein anderes als das selektierte verschieben möchte (muss ja auch irgendwie gehen)

Dir ist die zweite, auskommentierte Zeile aufgefallen? :les:

cu
Narses

_________________
There are 10 types of people - those who understand binary and those who don´t.

Kalfany · Verfasst: Di 19.02.08 16:21

jetzt ja

Narses · Verfasst: Di 19.02.08 16:42

Moin!

Wenn dein Problem gelöst ist, markierst du den Thread dann noch entsprechend? Danke.

cu
Narses

_________________
There are 10 types of people - those who understand binary and those who don´t.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme