ListView

Kutsche · Hält's aus hier Beiträge: 11

Hallo,

ich habe ein Listview mit 2 Spalten. Wenn ich einen Eintrag in der ersten Spalte markiere , wird dieser in ein Label übernommen. Das funktioniert ganz gut.
Nun möchte ich aber den Eintrag in der ersten Spalte markieren und den Inhalt der zweiten Spalte in das Label übernehmen.

Danke für Eure Antworten.

Keldorn · Verfasst: Mi 26.03.03 11:16

Hallo

an die 2 spalte kommst du mit der eigenschaft subitems ran

markieren

Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:

procedure TForm1.ListView1Click(Sender: TObject);
begin
  with sender as Tlistview do
   if selected<>Nil then
    begin
      label1.caption := Selected.Caption;
      label2.caption := Selected.SubItems[0];
    end;
end;

Mfg Frank

_________________
Lükes Grundlage der Programmierung: Es wird nicht funktionieren.
(Murphy)

Kutsche · Hält's aus hier Beiträge: 11

Vielen Dank Keldorn, funktioniert super.
Schönen Tag noch.

Kutsche

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme