做了一个浏览指定文件格式的 TreeView
摘要:unit DirTreeView;interfaceuses SysUtils, Classes, Controls, Forms, ComCtrls;type TDirTreeView = class(TTreeView) private FRootPath: string; FExt: string; FFileName: string; protected procedure Collapse(Node: TTreeNode); override; procedure Expand(Node: TTreeNode); override; procedure Change(Node: TT
阅读全文
posted @
2011-07-07 14:39
万一
阅读(4407)
推荐(2) 编辑
如何让 TreeView 的列表项携带数据、并读出或删除这个数据 - 回复 "Splendour" 的问题
摘要:问题来源: http://www.cnblogs.com/del/archive/2009/12/18/1627110.html#1799657准备工作:1、在空白窗体上添加 TreeView1 和 Button12、激活窗体的 OnCreate 事件, 激活 TreeView 的 OnDblClick 事件全部代码如下:
阅读全文
posted @
2010-04-12 20:59
万一
阅读(5248)
推荐(0) 编辑
学习 TTreeView [16] - 给 TTreeView 添加复选框 (回复 "丁永其" 的问题)
摘要:问题来源: http://www.cnblogs.com/del/archive/2008/05/15/1114450.html#1199402 本例效果图: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, C...
阅读全文
posted @
2008-05-15 17:12
万一
阅读(8103)
推荐(0) 编辑
学习 TTreeView [15] - 连接数据库 (作为给 "丁永其" 和 "DELPHI万岁" 两位朋友的回复)
摘要:本例效果图: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Grids, DBGrids, DB, DBClient, StdCtrls, ComCtrls, ExtCtrls; type TForm1...
阅读全文
posted @
2008-03-20 11:30
万一
阅读(9987)
推荐(0) 编辑
学习 TTreeView [14] - StateIndex(状态图标)、OverlayIndex(叠加图标)
摘要:先给 ImageList1 添加图标如下: 关于 OverlayIndex 的提示: 在给一个节点指定 OverlayIndex 以前, 需要先用 ImageList1.Overlay 指定可用的 OverlayIndex 号. 测试效果图: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, C...
阅读全文
posted @
2008-03-16 00:42
万一
阅读(7716)
推荐(0) 编辑
学习 TTreeView [13] - 在 TTreeView 中显示目录结构(的函数)
摘要:测试效果图: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls, ExtCtrls; type TForm1 = class(TForm) TreeView1...
阅读全文
posted @
2008-03-15 00:27
万一
阅读(6762)
推荐(0) 编辑
学习 TTreeView [12] - FullExpand、FullCollapse、GetNodeAt
摘要:本例效果图: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls; type TForm1 = class(TForm) TreeView1: TTreeVie...
阅读全文
posted @
2008-03-14 14:41
万一
阅读(5277)
推荐(0) 编辑
学习 TTreeView [11] - Images、ImageIndex、SelectedIndex、StateImages、StateIndex
摘要:本例效果图: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ImgList, ComCtrls; type TForm1 = class(TForm) TreeView1: TTreeView...
阅读全文
posted @
2008-03-14 01:43
万一
阅读(7931)
推荐(0) 编辑
学习 TTreeView [10] - AutoExpand、HotTrack、ReadOnly、ShowButtons、ShowLines、ShowRoot、Indent
摘要:本例效果图: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComCtrls, StdCtrls; type TForm1 = class(TForm) TreeView1: TTreeVie...
阅读全文
posted @
2008-03-13 23:24
万一
阅读(4806)
推荐(0) 编辑
学习 TTreeView [9] - OnDragDrop、OnDragOver
摘要:本例效果图: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComCtrls, StdCtrls; type TForm1 = class(TForm) TreeView1: TTreeVie...
阅读全文
posted @
2008-03-13 17:16
万一
阅读(4554)
推荐(0) 编辑
学习 TTreeView [8] - AlphaSort、CustomSort、SortType
摘要:本例效果图: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComCtrls, StdCtrls; type TForm1 = class(TForm) TreeView1: TTreeVie...
阅读全文
posted @
2008-03-13 11:42
万一
阅读(4676)
推荐(0) 编辑
学习 TTreeView [7] - Insert、Delete
摘要:本例效果图: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComCtrls, StdCtrls, Grids, ExtCtrls; type TForm1 = class(TForm) Tr...
阅读全文
posted @
2008-03-12 19:49
万一
阅读(4939)
推荐(0) 编辑
学习 TTreeView [6] - SaveToFile、LoadFromStream、SaveToStream、LoadFromFile
摘要:本例效果图: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComCtrls, StdCtrls, Grids, ExtCtrls; type TForm1 = class(TForm) Tr...
阅读全文
posted @
2008-03-12 15:31
万一
阅读(6036)
推荐(0) 编辑
学习 TTreeView [5] - TTreeNode.Level 属性
摘要:本例效果图: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComCtrls, StdCtrls, Grids, ExtCtrls; type TForm1 = class(TForm) Tr...
阅读全文
posted @
2008-03-12 13:17
万一
阅读(8910)
推荐(0) 编辑
学习 TTreeView [4] - TTreeNode 类的常用属性与 TTreeView 类的 OnChange 事件
摘要:本例效果图: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComCtrls, StdCtrls, Grids; type TForm1 = class(TForm) TreeView1: T...
阅读全文
posted @
2008-03-12 01:59
万一
阅读(5880)
推荐(0) 编辑
学习 TTreeView [3] - Add、AddChild、AddFirst、AddChildFirst、Parent
摘要:本例效果图: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComCtrls, StdCtrls; type TForm1 = class(TForm) TreeView1: TTreeVie...
阅读全文
posted @
2008-03-11 15:14
万一
阅读(8253)
推荐(0) 编辑
学习 TTreeView [2] - Items.Item[i]、Items[i]、.Text、SetFocus(设置焦点)、Select(选择)
摘要:本例效果图: 源码: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComCtrls, StdCtrls; type TForm1 = class(TForm) TreeView1: TT...
阅读全文
posted @
2008-03-11 02:44
万一
阅读(8380)
推荐(0) 编辑
学习 TTreeView [1] - TTreeNodes、TTreeNode 与 Items、Items.Count、Items.Clear
摘要:填写 TTreeView 的内容一般是这样开始的(下图), 不过我觉得最好习惯用动态建立. 打个比方: 譬如 TreeView 是一个军营的"营部"! 这里会有营长、连长、排长、班长、战士等等. 我们把它们分成三种对象: 营部、营长(总当家)、营长的下属. 在这里的对应关系是: TTreeView - 营部 TTreeNodes - 营长 TTreeNode - 营长的下属 上面...
阅读全文
posted @
2008-03-10 14:56
万一
阅读(10210)
推荐(0) 编辑