Question

Delphi中，如何实现选择树当中的对象弹出相应文本框

文本希望是一段出现，需要什么样的文本控件。
高手们，拜托了！
就是单击TreeView控件中的一个选项，然后弹出一个文本框。
trichedit或者tmemo控件怎么实现单击TreeView控件中的一个不同选项，出现相应的文字。
如：if TreeView1.Selected.Text='哎' then
begin
.....
end
然后出现一个文本框，Selected另外一个的时候，文本也发生改变，begin中的代码应该怎样搞定？

Answer 1

你需要先定义或生成一个窗体,上面放个trichedit或者tmemo控件
然后在树的onclick事件中让该窗体在合适位置显示,并使该窗体控件中显示需要显示的文本.

Answer 2

还是没太明白，你要的是这个效果吗？
procedure TForm1.TreeView1Change(Sender: TObject; Node: TTreeNode);
begin
Memo1.Lines.Add(Node.Text);
end;