Delphi
文章平均质量分 87
zhaogang
保持饥饿,保持愚蠢,勇于犯错
展开
-
回炉再煅——Delphi6,CxGrid4功能实现小记(分组、下拉框、多行复制)
由于公司业务的关系,又要写回Delphi程序。以下是为完成客户需求时所写的一些功能需求代码,作为又一次的记录。 IDE版本:Delphi6, 控件版本:DevExpress4.5 先来个D6截图,缅怀一下 CxGrid的强大不容置疑,但也带来的繁多的属性与复杂的操作,加上能找到的中文说明不多,所以很多时候只能通过看例子和自己摸索。 一、代码实现分组 CxGrid可原创 2014-02-20 10:36:41 · 3361 阅读 · 0 评论 -
Delphi6 控件运行期移动类
由于工作的需要,还要帮助用户维护一套旧系统,系统中包括仓库货架的布局设置,为了用户可直观的在系统中设置货架位置,就想让运行期的控件可移动,于是写了以下类 IDE:Delphi6 控件移动类代码: type TMoveClass = class(TObject) private GIsMove : Boolean; //是否允许移动 GPosX, GPosY原创 2016-12-13 13:20:57 · 597 阅读 · 0 评论 -
Delphi6控件内容完整截屏
由于用户那套旧系统需要截取Form中控件的内容,但经常因内容超长而截屏不完整(又被踢下坑了)。 经搜索,网上有不少关于这方面的资料(感谢他们的分享),再自己琢磨了一下,得到了以下代码。 值得注意的是,以下代码在Win8下可正常截图,但在Win7下超出屏幕部分的截取就会黑屏。由于程序只是简单的调用了user32.dll的方法,所以问题还是出在user32.dll(真心没闹懂微软想干嘛) 后来针原创 2016-12-13 15:59:21 · 1997 阅读 · 0 评论