treeview的OnGetSelectedIndex(Sender: TObject;Node: TTreeNode)事件有天大的bug ?

Question

我這麼測出的.procedure TfTrainBBS.TVBBSGetSelectedIndex(Sender: TObject;
  Node: TTreeNode);
begin
      Caption1.Caption := Node.Text ;
end;

Answer 1

//测试确实如此//不知道为什么//建议你使用TTreeView(Sender).Selected//就安全了
procedure TForm1.TreeView1GetSelectedIndex(Sender: TObject;
  Node: TTreeNode);
begin
  Caption := Node.Text + '|' + TTreeView(Sender).Selected.Text;
end;

Answer 2

//测试确实如此//不知道为什么//建议你使用TTreeView(Sender).Selected//就安全了
procedure TForm1.TreeView1GetSelectedIndex(Sender: TObject;
  Node: TTreeNode);
begin
  Caption := Node.Text + '|' + TTreeView(Sender).Selected.Text;
end;

Answer 3

對!  用 TTreeView(Sender).Selected.
 
  zswang(伴水)(* 嘻 *) .  高.......