Thema: Delphi TreeView

Einzelnen Beitrag anzeigen

Benutzerbild von Specialwork
Specialwork

Registriert seit: 10. Jan 2003
Ort: Schwall
71 Beiträge
 
Delphi 8 Professional
 
#3

Wie kann ich auf das Auswählen eines TTreeNodes reagieren !?

  Alt 14. Mär 2003, 10:32
Hallo Silent,

Verwende dazu das Ereignis TTreeView.OnChange
Delphi-Quellcode:
procedure TForm1.TreeView1Change(Sender: TObject; Node: TTreeNode);
var NewItem: TListItem;
begin
  ListView1.Items.BeginUpdate;
  ListView1.Items.Clear;

  NewItem:=ListView1.Items.Add;
  NewItem.ImageIndex:=Node.ImageIndex;
  NewItem.Caption:=inttostr(Node.Index);
  NewItem.SubItems.Add(Node.Text);

  ListView1.Items.EndUpdate;
end;
Im Anhang findest Du eine Bieispielanwendung

Gruß, Tom
Angehängte Dateien
Dateityp: zip auf_select_ereignis_reagieren.zip (2,4 KB, 33x aufgerufen)
Thomas van Veen
Es gibt keine Probleme, nur Lösungen, auf die man nicht gleich kommt !
  Mit Zitat antworten Zitat