关于超想
本站导航
邮件列表
  首页 | 本站产品 | Delphi资料 | 免费资源 | 程序人生 | 软件工程 | 网站设计 | 推荐网站
你所在的位置 -> 主页 -> 超想软件 -> 编程资料 -> delphi -> 开发技巧 -> 构件使用 ->详细
相关内容  
 
 
在Delphi程序中应用IE浏览器控件
 
【新品推荐】

  详细内容
 

在程序中设置1stClass 的TDBtreeView控件的图标
作者: 千中元 评价: 上站日期: 2001-07-19
内容说明:
来源: http://www.baidao.net

1stClass中的TfcDBtreeView特别适用于表现M/D关系的两个表中数据之间的关系.
至于如何表现M/D关系表中数据的关系,请看其自带的例子(关键在diplayfield属性),
不详细叙述.
在已经做好上一步工作的前提下,放一个TimageList控件,然后加入三个图标,分别
表示第一层节点,第一层节点打开,第二层节点.设置fcDBTreeView1.stateImages:=
imageList1;然后在OnCalcNodeAttribute事件中加入如下代码:
if (Node.HasChildren) then
begin
if (Node.Expanded) then
Node.StateIndex:=1
else
node.StateIndex:=0
end
else 
begin 
if Node.Parent < >  nil then
if (Node.Parent as TFCDBTreeNode).Expanded then
Node.StateIndex:=2;
//判断展开再给图标,节省资源(这里感谢cj的修改)
end;
在fcDBTreeView1的OnUserExpand事件中加入:
fcDBtreeview1.Repaint;
保留版权.
你可以在程序中任意使用上面代码,
可以以不盈利的目的任意传播上文,但请注明作者和出处

 
你所在的位置 -> 主页 -> 超想软件 -> 编程资料 -> delphi -> 开发技巧 -> 构件使用 ->详细
  首页 | 本站产品 | Delphi资料 | 免费资源 | 程序人生 | 软件工程 | 网站设计 | 推荐网站
声明:本站内容除注明原创以外均从网上摘抄,如有侵权请指明。
  如果您对我们的网站有什么意见或者建议,请与我们联系
powered by 建站易上手- V2.0