在unit中如何引用TreeView？

我在Uuit单元中要写一个方法（要求必须写在Unit中）：
procedure AddToTree(var TreeView: TTreeView);然后提示：没有定义TTreeView,
我应该怎么办？

解决方案 »

  1.   

    你先把一个TTreeview放到窗体上，按一下F9,然后再删除这个TTreeview控件就可以了。
      

  2.   

    在use里加入ComCtrls单元就行了！
      

  3.   

    引用ComCtrls单元就可以了
      

  4.   

    再问一下：如果在服务端运用这个方法：
    procedure TFunc.Outstrtotree(TreeName: OleVariant);
    begin
      AddToTree(TreeName);
    end;
    不知道TreeName应该定义成什么类型，现在总是提示：TYPES OF actual and formal var parameters must be indentical
      

  5.   

    AddToTree(TTreeNode(TreeName));
    不知行不行！
      

  6.   

    Outstrtotree 你这个函数实现什么功能呢？