求助treeview和pagecontrol的问题 左边放了treeview,其中treeview分出了很多的子项目,右边放的是pagecontrol..我想通过点击treeview子项目来现实pagecontrol的改变..请尽量详细点..谢谢... 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Treeview1.select.text 是屬性在onchange事件中添加var str:string;begin str:=Treeview1.select.text; If str='aaa' then Pagecontrol.itemindex:=0;end; 在treeview的OnChange事件里写呀 PageControl1.ActivePageIndex := 0;或其它你想要的 PageControl1.ActivePageIndex := strtoint(TreeView1.Selected.Text)-1; PageControl1.ActivePageIndex用来控制那个页面显示。 TreeView1.Selected.Text 我是用text表示序号,你也可以用其他办法,关键看你需求,不知道合适不合适楼主用。 响应TreeView单击事件,然后根据absoluteindex或者text的值进行判断,决定PageControl1.ActivePageIndex的值 数据库记录在文本lable显示的问题 DELPHI问题 ActiveX里的Edit控件接受字符时与按钮快捷键冲突 将临时表#里得数据插入到另一个表没有数据就是关于临时表得操作 怎么样在数删除一个表,在线结! Ehlib中怎样把当前的DBGridEh导出为Excel(*.XLS),有那位大虾知道吗! WEB SERVICE有关 求救:一个关于操纵Word里表格的问题 为何我写的SERVICE不能用命令行进行控制? 关于TProgressBar控制。求助。 关于ClientDataSet的性能与重新编译vcl 求救
在onchange事件中添加
var
str:string;
begin
str:=Treeview1.select.text;
If str='aaa' then
Pagecontrol.itemindex:=0;
end;
PageControl1.ActivePageIndex := 0;
或其它你想要的
PageControl1.ActivePageIndex用来控制那个页面显示。
TreeView1.Selected.Text 我是用text表示序号,你也可以用其他办法,关键看你需求,
不知道合适不合适楼主用。