帮帮忙!火急! 设置相应页 PageControl1.ActivePage :=页就行了 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 我试过,但是这样不需要点击第三层的ITEM, 只要点击任一个就会变,我需要点击第三曾的时才切换到相应的页! if not (treeview.Selected.HasChildren) then //没有子节点 我是通过设置item的imageIndex属性来辨别的。你这种情况可以通过item的level属性来激活相应的页。在onclick事件中写如下语句:PageControl1.ActivePage:=Treeview1.Selected.level; 按照紫紫的作法可以解决在最底层切换,但还是不能解决将最底层的ITEM切换到与之对应的页上! if not (treeview.Selected.HasChildren) then begin case treeview.Selected..AbsoluteIndex//唯一索引值 1:PageControl1.ActivePage:=1; 2:PageControl1.ActivePage:=2; ..... end; end; delphi中数据插入问题(初学编程) 这样的语法为什么通不过??? 急问,高手请进!!!!! 怎样得到要删除记录的ID 如何在fr3.15里实现空表格打印 请问如何向一个TBGrid控件中添加数据 Sql 怎样从另外一个程序中获取信息? 请各位高手推荐一个好用的Grid控件 怎么把BDE的数据库程序转变成ADO的程序?请帮帮我!(一定给分!) 这个查询的SQL语句怎样写? 哪位仁兄做过G.723格式转成WAV文件的函数? 或者帮忙来看看这个函数错在哪里?
你这种情况可以通过item的level属性来激活相应的页。
在onclick事件中写如下语句:
PageControl1.ActivePage:=Treeview1.Selected.level;
begin
case treeview.Selected..AbsoluteIndex//唯一索引值
1:PageControl1.ActivePage:=1;
2:PageControl1.ActivePage:=2;
.....
end;
end;