VirtualStringTree 的用法详解:作者:张志宝go淘宝 例子:创建了一个树名为VirtualStringTree1,第一列显示数据库字段ID的值,标题为编号:第二列显示字段Name的值,标题为名字.一.[TVirtualStringTree常用属性]    BorderStyle   :设置边框选项  bsSingle设置单边框   为TVirtualStringTree添加列及列标题:       Header--Columns : 设置列  点击“…”,在弹出界面点击add n…
Frame在写代码时和一般组件有什么不同呢?比如(1)中的客户信息的frame,如果想重写客户编辑按钮的click事件,会发生什么呢: procedure TBusOnSiteManager.FrameCustomerButtonEditCustomerClick(Sender: TObject);begin  inherited;  FrameCustomer.ButtonEditCustomerClick(Sender); end; 可见,IDE会自动加上调用Frame中按钮click的方法…
在Delphi自带的Indy控件中其实是提供了MD2,MD4,MD5对象的,我们可以直接使用它们来完成MD5的签名算法.而不需要再去找其它的DLL或是Pas了. 在Uses单元中引用 IdHashMessageDigest,IdGlobal, IdHash 单元,再写如下代码即可以达到MD5的实现. 示例代码 procedure TForm1.Button1Click(Sender: TObject); var MyMD5: TIdHashMessageDigest5; Digest: T4x4…
[学习万一老师博客摘要] TTreeView 与两个重要的类相关:TTreeNodes.TTreeNode . TTreeNodes即是TTreeView 的Items属性,TTreeNodes是TTreeNode的合集,TTreeNode代表的是TTreeView的节点,不按主从关系,节点依次存储在Items中. TTreeView的Select方法用来指定TTreeView选择的节点,可以选择多个节点. TTreeNodes使用add添加同级节点,使用addChild添加下级节点.node.…
procedure TMainFrm.Timer1Timer(Sender: TObject); var   systemtime:Tsystemtime;   dt:TDateTime; begin   L_DateTime.Caption:=FormatDateTime('YYYY-MM-DD HH:SS',Now); //显示当前时间 MainFrm.Caption:=IntToStr(Timer1.Tag);   timer1.tag:=timer1.tag+1;   if Timer1…
Frame是组件面板上的第一个组件,但不是每个人都知道怎么用它,因为它不像Button和Label一样简单明了.实际上,Frame按钮只是打开一个Frame的列表,如果你没有创建任何的Frame,自然什么也不会看到. 那么Frame到底是什么呢?简单来说: 1. Frame是组件容器,类似Panel 2. Frame在使用上类似Components组件,但并没有构造器和解析器,依赖于父容器完成Destroy的工作 3. Frame可以继承和嵌套 4. Frame内部的控件都是公开的,可以在IDE…
在有多个Form窗体时可以体现出来.用close是只关闭本窗体,而用Application.terminate是关闭整个程序,包括所有窗体.(1)当Close是一个主窗体时,程序会退出.Close会发生FormClose事件,FormCloseQuery事件.close,只是针对窗体.主窗体close以后程序就Application.Terminate了.子窗体close以后.没释放,还可以Show出来.也是说主窗口的Close方法其实也是调用Application的Terminate来终止程序…
函数功能:当Str不满Len长度时,在Str前自动填充PadStr以补足长度,例子如下: Str:原字符串 Len:补多长 PadStr:用什么补齐,比如‘0’ function PadString(Str: string; Len: Integer; PadStr: Char): string; begin Result:= StringOfChar(PadStr, Len - Length(Str)) + Str; end;…
咱们已经了解了如何将代码恢复至某一版本,但是通过Local History恢复代码有的时候并不方便,例如咱们将项目中的代码进行了多处修改,这时通过Local History恢复代码就显得很麻烦,因为它更倾向于恢复某一个文件的修改. 因此,如果咱们的项目是通过Subversion也就是SVN检出的,那么咱们就多了一种恢复代码的方法,即通过Subversion进行Revert操作. 操作步骤: 标注1:项目名称 标注2:Subversion 标注3:Revert 如上图所示,先鼠标右键点击项目名称,…
一. 引言:    TreeView控件适合于表示具有多层次关系的数据.它以简洁的界面,表现形式清晰.形象,操作简单而深受用户喜爱.而且用它可以实现ListView.ListBox所无法实现的很多功能,因而受到广大程序员的青睐.    树形结构在Windows环境中被普遍应用,但在数据库开发中面对层次多.结构复杂的数据,如何快速构造树形目录并实现导航呢?    二. 实现关键技术:    在Delphi提供的控件中包含了TreeView控件,但树的具体形成还需要用户编写代码.即它的列表项要在程序…