
DELPHI
kygl2003
这个作者很懒,什么都没留下…
展开
-
DELPHI下API简述
1 DELPHI下API简述 DELPHI下API简述 http://zero.cnbct.org/show.asp?id=144 auxGetDevCaps API 获取附属设备容量 auxGetNumDevs API 返回附属设备数量 auxGetVolume API 获取当前卷设置 auxOutMessage API 向输出设备发送消息 auxSetV转载 2012-04-16 10:16:18 · 929 阅读 · 0 评论 -
cxGrid技巧汇总
cxGrid技巧汇总========================================================================== 在主从TableView中根据主TableView得到对应的从TableView var ADetailDC: TcxGridDataController; AView: TcxCustomGridTa转载 2012-11-05 14:10:44 · 674 阅读 · 0 评论 -
Delphi7中cxGrid控件自动编号
在cxGrid的GridView属性设置事件onGridCustomDrawIndicatorCell,事件关键代码如下:procedure TfrmHidden_Trouble.GridCustomDrawIndicatorCell( Sender: TcxGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxCustomGri转载 2012-11-05 14:33:27 · 1501 阅读 · 0 评论 -
Delphi控件cxGrid 如何动态创建列?
var i: Integer; Column: TcxGridDBColumn; cxView: TcxGridDBTableView; begin cxView := Self.Levels[0].GridView as TcxGridDBTableView; if cxView.DataController.DataSource <> nil转载 2012-11-05 14:24:00 · 2165 阅读 · 1 评论 -
delphi中cxGrid使用技巧
1. 去掉cxGrid中台头的Box解决:在tableview1的ptionsview的groupbybox=false;2.统计功能解决:(1) tableviewtableview1的optionsviewfooter=ture然后在cxGRid1的customize..中的summary 的footer.add需要合计的列kind= skSum在Footer的第一列显转载 2012-11-05 14:11:25 · 2851 阅读 · 0 评论 -
Delphi2010 API延迟加载
delayed是Delphi2010中一种新的声明方式,使用它将可以在不适当的环境下绕过不存在的API函数,并且对该API的调用进行“跳过”的处理来看以下例子:function GetTouchInputInfo(hTouchInput: THandle; cInputs: UINT;pInputs: PTouchInput; cbSize: Integer): BOOL; std转载 2012-07-03 11:14:51 · 672 阅读 · 0 评论 -
Delphi反射传入var形式的参数
在反射调用方法时,常常会遇到var或out形式的参数,但是Delphi的ObjAuto单元却是不支持如此做的,因此,需要对反射的单元做一些修改,以使其支持var类型的参数对于var和out两种类型,在Delphi的编译器看来,它们的处理是一样的,只不过out参数会在传入时,先进行一次clear操作。但是其本质还是var,因此,我们将这两种形式的参数放在一起讨论。从CodeGear提转载 2012-07-03 11:17:38 · 1181 阅读 · 0 评论 -
D2010 RTTI + Attribute 简单实现ORM
转自:http://hi.baidu.com/tintinsoft/item/e37440f4b910074c922af269 还记得David I 今年四月来盛大时,被问及“反射机制能再做得好一点吗?我们想放弃RTTI”,David I 回答“这的确是需要考虑的地方,当然RTTI我们不会放弃的”。(这个白胡子的老哥哥还真很可爱,当年Borland几经起落,唯一能看得转载 2012-07-03 10:31:15 · 987 阅读 · 0 评论 -
智能指针(Smart Pointer)的实现
{******************************************************** Delphi Smart Pointer class* AutoPtr* Version 0.2 beta* Yang Qinqing @ http://www.cnblogs.com/felixyeou**************************转载 2012-07-03 10:10:25 · 473 阅读 · 0 评论 -
让菜单项显示Hint
Delphi的菜单项,就算设置了Hint,它也不会显示,因为没有ShowHint属性。Delphi自身给出的解决方法是通过一个StatusBar来接收菜单的Hint。但是,用过Java的Swing的人都知道,在Swing里对一个菜单设置Hint是有效的,它能够被显示出来。那么是否Delphi也能够显示呢?本文即是给出了一种解决方案。首先,我们先对Delphi自己的THintWi转载 2012-07-03 11:16:45 · 1966 阅读 · 0 评论 -
Delphi2010强化的反射
很多人可能都发现了,Delphi2010编译后的程序体积非常大,一个空的窗体居然达到接近800K。这些多出来的体积其实就是运行时信息,使用这些信息,我们可以轻松的获取到有关的类内容,并在不知情的情况下使用它们。这个特性对于实现多层的架构有着非同一般的意义。Delphi2010提供了一个Rtti单元,用于实现运行时信息的Get, Set。在其中能找到一个名为TRttiContext的Re转载 2012-07-03 11:10:50 · 463 阅读 · 0 评论 -
D2010 New RTTI 妙解 Xml DataBinding:开篇
Xml DataBinding最大的优点是,用接口和类替代了复杂繁琐的XML节点。一般使用当然没有问题,无非是XML层层的节点看作接口与接口的层级关系。但是,如果你想做一个通用的动态访问XML绑定接口类,问题就凸显麻烦了。由于TXMLDocument基于Interface机制,在生成的Xml DataBinding的Pas文件中,接口反而成了主导的访问入口,而具体的实体类,没有暴露属性,只是在pr转载 2012-07-03 10:57:06 · 410 阅读 · 0 评论 -
JSon SuperObject 研究
SuperObject是delphi不多的著名开源JSON开源类库,其作者的作品还有大名鼎鼎的DSPACK等许多著名的开源VCL类库。 至于SuperObject的详细用法,万一老师已经很描述很清楚。最新版的1.2.1,添加了currency属性,也支持D2010,包括最新的RTTI。 SuperObject看起来很容易上手,但有一些概念必须理解清楚,比如数组的创建和使用、转载 2012-07-03 10:53:09 · 3848 阅读 · 0 评论 -
JSon SuperObject 研究2:数据集与JSON对象互转
JSON不能完全替代XML,但绝对是未来的大势所趋,其优点是简单、体积小、解析更快、解析占用资源更少。在delphi中,数据集是最常用数据存取方式。因此,必须建立JSON与TDataSet之间的互转关系,实现数据之间通讯与转换。值得注意的是,这只是普通的TDataset与JSON之间转换,由于CDS包含了Delta数据包,其数据格式远比普通的TDataset更复杂。下面的程序,或许你有不同的想法,转载 2012-07-03 10:52:38 · 1200 阅读 · 0 评论 -
bpl和dll文件的区别[翻译]
http://www.itbody.com/doc/Html/Delphi/205724197.html [原文] That is correct. A BPL is a DLL. (But not all DLLs are BPLs.) > But I still found some different, such as that I can create a转载 2012-04-16 10:26:45 · 821 阅读 · 0 评论 -
输入框显示文字垂直居中
第一种方法:unit CenterEdit;interfaceuses Windows, Classes, Controls, SysUtils, Messages, StdCtrls, Forms, Graphics;type TCenterEdit=class(TEdit) private FFontHeight:Integer;转载 2012-12-21 23:38:46 · 1550 阅读 · 0 评论