Listview Zugriff auf Subitems

[Larsi]

Hi,
ich suche eine Möglichkeit wie ich zb das sechste Subitem bei einem Listview ansprechen kann und als Text ausgebe. Ein Code dafpr wäre nicht schlecht!

Edit: Die Listview steht auf Report Ansicht!

[DeddyH]

Versuch es mal mit

Delphi-Quellcode:

ListView.Items[Index].SubItems[5]

[Matze]

Hallo,

aus dem Kopf erhälst du den String so:

Delphi-Quellcode:

ListView.Items[Zeilennummer-1].SubItems[Spaltennummer-1]{.Text/.Caption}

Ob und wenn welches der beiden Eigenschaften in den geschweiften Klammern nötig ist, weiß ich nicht mehr. Teste es einfach.

Grüße

Edit: Schon wieder Deddy ... ;)

[DeddyH]

@Matze: Die sind immer nötig, da es sich bei beiden um Listen handelt.

[edit] :oops: Die geschweiften Klammern waren ja gemeint, ich hatte in der Hektik die eckigen verstanden [/edit]

[toms]

Zitat:

Zitat von Matze

Hallo,

aus dem Kopf erhälst du den String so:

Delphi-Quellcode:

ListView.Items[Zeilennummer-1].SubItems[Spaltennummer-1]{.Text/.Caption}

Ob und wenn welches der beiden Eigenschaften in den geschweiften Klammern nötig ist, weiß ich nicht mehr. Teste es einfach.

{.Text/.Caption} ist nicht nötig.

[Larsi]

Danke habe es auch schon so versucht aber ich habe für das 6. item aus versehen auch das 6. SubItem genommen, statt das fünfte.

[Matze]

Zitat:

Zitat von DeddyH

Versuch es mal mit

Delphi-Quellcode:

ListView.Items[Index].SubItems[5]

Zitat:

Zitat von DeddyH

@Matze: Die sind immer nötig, da es sich bei beiden um Listen handelt.

Du bist ja witzig. ;) Edit: Hab grad erst dein Edit gelesen. :mrgreen: => geklärt

Zitat:

Zitat von toms

{.Text/.Caption} ist nicht nötig.

Gut, so hatte ich es auch in Erinnerung. :)

Grüße

[Larsi]

Darf ich auch wenn ich gegen Regeln möglicherweise verstoßte noch eine ganz kleine Frage zu einer Listview und den Items stellen?
Ich hoffe schon also:
Wie kann ich denn einen makierten Listview Eintrag inklusive Untereinträge bei einer anderen Listview hinzufügen?

[toms]

Folgende Schritte sind notwendig:

1) Markiertes Item von LV1 ermitteln
2) Neues Item bei LV2 einfügen
3) Anz. Subitems vom Item der LV1 ermitteln
4) Subitems bei LV2 einfügen

[Larsi]

Und wie geht das? :)

[DeddyH]

[edit] Quelltext wegen toms Einwänden entfernt, dafür Struktogramm angehangen ;) [/edit]

[toms]

Zitat:

Zitat von Larsi

Und wie geht das? :)

Bei welchem Punkt ist etwas unklar?
Bemüh doch mal bitte die Suche (Google, DP etc)

Wenn du nichts finden solltest - wovon ich aber nicht ausgehe - dann teile uns mit, welche Suchwörter du verwendest hast.

Edit: Zu spät, die Lösung wurde schon veröffentlicht *Larsi muss halt nichts studieren"

[DeddyH]

Sry, kommt so schnell nicht wieder vor

[Der.Kaktus]

Zitat:

Zitat von DeddyH

Sry, kommt so schnell nicht wieder vor

:-D gut so! ;-)

[DeddyH]

Hab' s ja schon geändert ;)

[marabu]

Hi,

ehrlich gesagt, der Code hat mir auch nicht sehr gefallen - zu viele Statements. Hätte Borland nicht geschludert, könnte man einfach ListView1.CopySelection(ListView2) schreiben und fertig wäre die Laube.

Delphi-Quellcode:

procedure CopySelection(source, destination: TListView);
var
  i: Integer;
begin
  for i := 0 to source.Items.Count - 1 do
    if source.Items[I].Selected then
      destination.Items.Add.Assign(source.Items[i]);
end;

Und eines noch: Den Kampf gegen Copy&Paste-Mentalität kann man nicht gewinnen. Wer bereit gestellten Code übernimmt ohne ihn zu verstehen, der schadet sich als (angehender) Profi selbst. Für Amateure gelten eh ganz andere Regeln.

Freundliche Grüße