- 博客(3)
- 收藏
- 关注
RSS订阅原创 隐藏任务条托盘区中的时钟
隐藏任务条托盘区中的时钟// 隐藏时钟procedure TForm1.Button1Click(Sender: TObject);var hn : HWnd;begin hn := FindWindowEx(FindWindowEx(FindWindow(Shell_TrayWnd,nil),0, TrayNotifyWnd,nil),0
2001-07-29 23:12:00
729
原创 语法高亮
在 RichEdit 中实现代码着色下面的代码将以指定颜色对一些指定单词着色，就象delphi中的代码编辑器那样。 procedure CodeColors(Form : TForm;Style : String; RichE : TRichedit; InVisible : Boolean); const
2001-07-29 23:09:00
862
原创 TreeView的使用
TreeView 是一个显示树型结构的控件,每一个节点都是一个新类,使用具有代表性每个节点都有四个值:TEXT:显示文字 Image Index:显示图形序号Selected Index:State Index:(1)建立目录项(本例中使用的TREEVIEW名称为:TvwTips)增加根目录下的节点:(节点)varCatNode : TTreeNode; //先建立一个TREEVIEW使用的子对象
2001-07-29 23:06:00
1040
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人