ListView - Text auslesen

[Aviator]

Zitat von Gerri:

Zitat von Aviator:

Item muss als TListItem deklariert werden.

Das T beachten. Hast du dir mein Beispielprojekt angeschaut?

Ist es bei mir natürlich auch ein "TListItem" - trotzdem das selbe Problem - das ganze kommt aus deinem beispiel, ich probiere gerade ein wenig herum

Am besten postest du mal ein bisschen mehr vom SourceCode. Weil wenn es wirklich ein TListItem bei dir ist, dann sollte das eigentlich funktionieren.

[Gerri]

Gerne Doch :

Also Ich arbeite mit einem TListView Namens "ListView_DB" für diesen gibt es im "Type" bereich die folgende Dekleration:

Code:

ListView_DB: TListView;

Dazu muss ich sagen das der Listview nicht per Hand erstellt wurde, sondern einfach per Drag and Drop reingezogen und einer "BindingList" und "Live-Bindings" mit der Datenbank verknüpft ist.


Danach folgt weiter unten die procedure die ein Button auslöst -> nur aktuell zum testen gedacht.

Code:

    procedure TForm_Main_Main.btn_del_from_DBClick(Sender: TObject);
    var
       i : Integer;
       Item: TListItem;
    begin

                showmessage(ListView_DB.Items.AppearanceItem[1].Text);
                Item := ListView_DB.Items.Add;
                item.caption := Format('Main Item &d' , [1]);

    end;

Das ist nun auch der Code der so 1 zu 1 im Quellcode seht



Wenn wir über den Punkt des erstellens der Subitems weg sind, würde ich diese gerne per live-binding einbinden -> nur als Leitfaden wo ich hin möchte.


Wenn irgend etwas relevantes fehlt bitte bescheid geben