Delphi中如何实现CoolBar界面的乐队切换功能？

本文共计206个文字，预计阅读时间需要1分钟。

在TreeView（紫色矩形）中切换项目时，如何有效更新CoolBar（红色矩形）中的按钮（波形）？

我想为列表视图中的每个项目使用一组按钮。感谢您的帮助和建议！

什么是在TreeView(紫色矩形)中的项目之间切换时更改CoolBar(红色矩形)中的按钮(波段)的有效方法.我想为列表视图中的每个项目使用一组按钮.

感谢您的帮助和建议！

我创建了我需要的CoolBands并将每个分配给TTreeNode的数据指针.然后在TreeView的OnChanging处理程序中,我“记住”当前选中的TreeNode,并在OnChange处理程序中切换CoolBands的可见性：

procedure TProbeerForm.TreeView1Changing(Sender: TObject; Node: TTreeNode; var AllowChange: Boolean); begin FOldNode := TreeView1.Selected; end; procedure TProbeerForm.TreeView1Change(Sender: TObject; Node: TTreeNode); begin TCoolBand(FOldNode.Data).Visible := False; TCoolBand(Node.Data).Visible := True; end;