treeview的某个节点默认为展开

先  
  tv_1.autoexpand:=true;  
  然后  
  currnode.selected:=true;  
  如：  
  var  
        itemcount:integer;  
        currnode:ttreenode;  
  begin  
        itemcount:=tv_1.items.count;  
        currnode:=tv_1.items[0];  
        for   j:=1   to   itemcount   do  
        begin  
            if   currnode.text=你要展开节点.text   then  
            begin  
                  currnode.selected:=true;  
                  break;  
            end;  
            currnode:=currnode.getnext;  
        end;  
  end;