Object aus TreeView auslesen

**Chemiker**

Hallo,

ich habe ein Problem beim Anklicken eines Knoten in einem TreeView möchte ich das Object was an TreeView.Data hängt wieder auslesen. Nun ist es egal welchen Konten ich anklicke, es wird immer im Data das letzte Object zurückgegeben. Woran kann es liegen, was machen ich falsch?

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TForm1.TreeView1Click(Sender: TObject);

var MSBez3: TMSV1;

    strTest: string;

    Index: integer;

begin

  MSBez3:= TMSV1.Create;

  MSBez3:= TMSV1(TreeView1.Selected.Data);  // <---- Es wird immer das letzte Object zurückgegeben?!

  If msBez3 <> NIL then

  begin

    ShowMessage(MSBez3.MaNr+MSBez3.MSNr+MSBez3.MaInhalt+TreeView1.Selected.Text);

  end;

end;

Die Adresse in Data ist immer die gleiche.
Mit
TreeView1.Selected.Text wird der richtige Text vom angeklickten Knoten zurückgegeben!

Bis bald Chemiker

Object aus TreeView auslesen

Object aus TreeView auslesen

Forumregeln