自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(12)
  • 资源 (3)
  • 收藏
  • 关注

原创 Delphi XE2快捷键(Ctrl+Shift+C\Ctrl+Shift+上下键)失效解决办法。

重新安装Delphi XE2后发现我最常用的几组快捷键(Ctrl+Shift+C\Ctrl+Shift+上下键)时好时坏,极其烦人,后来在https://forums.embarcadero.com/message.jspa?messageID=491338中终于发现了问题所在,原来是AQtime搞的鬼,在控制面板中的“程序和功能”中把“SmartBear AQtime 7 Standard

2013-07-10 09:40:25 4594

原创 挖掘DrawGrid/StringGrid的潜力1

 unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, GDIPAPI, GDIPOBJ, Themes, Dialogs, Grids, StdCtrls;type TForm1 = clas

2009-10-12 21:10:00 8525 2

原创 饭桶牌农历控件包3.0 Beta版(带源码)发布啦

距上次发布已经有一年多时间了,这次更新是应大家要求加上了农历月历控件,下拉框的模式也有改变,增加了一些背景设置功能,如背景图,颜色。。。 欢迎大家使用,如有意义或问题,请发到xzhifei@qq.com,谢谢 下载链接:http://www.2ccc.com/article.asp?articleid=5319

2009-07-24 08:54:00 1573

原创 饭桶牌农历控件有新版了

近来晚上闲来无事,无意中看了RZ的控件组,发现有一个带月历简单的控件,那个日历的Combox做得很好,就细看了一下源码,随后略有所悟,于是拿来一年多前的那个农历控件进行更新,效果不错,呵如图所示,可以实现除平面与普通界面外,还可实现桌面主题的外框:XP风格的实现并非模拟,是真正的XP风格,实现代码可以看源码OnPaint过程下载链接:http://www.lexchou.com.c

2008-01-31 20:05:00 2712 1

原创 QQ的捕捉屏幕的程序

Panel1与lblRect是模仿QQ的那个小提示框,双击选中框时我并没有做什么处理 ,请大家自己看着办 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls; 

2007-07-17 17:18:00 2133

原创 WindowsNT/200 环境下要自订纸张尺寸(自定义页面)

近日因项目需要接触了打印机,自定义纸张的大小问题困扰了我一个多星期,还以为XP系统无法自定义纸张,后来在网上搜索时无意中发现,打印机都有最小纸张的标准,如果小于或大于这个标准,就算自定义好了页面,都无法选择它(不会显示出来),如果用程序强制设置打印的话,它会按A4的标准走纸,比如我用的Epson LQ-300K+这款打印机,最小纸张是10CM*10.16CM,而我要的宽度正好小于10CM,后来我改

2007-07-05 12:27:00 3664

原创 自画TListView带进度条的Item

  自画TlistView带进度条的Item TListView的Item条一般是由系统自画的,但电驴就实现了自画,使之看起来很漂亮,我们用DELPHI也可以实现! 首先要引用CommCtrl单元,这是TListView底层控制单元:uses CommCtrl; //画状态条procedure DrawSubItem(LV: TListView; Item:

2007-02-26 16:41:00 5647 4

原创 TListView的ListItem完全自绘

因工作需要完全自绘ListItem,模仿成电驴的样式,查找了N久相关的资料,发现很少有这方面的,最后用ListView_GetSubItemRect关键词在一个小日本的网站上找到一点相关的代码,修改后解决该问题。至于是否存在BUG,偶用了几天还木有发现,如果有什么问题,请大家回复一下,谢谢注意:代码只支持ViewStyle=vsReport效果图如下:uses 

2006-02-20 11:39:00 8284 15

原创 Delphi自带的SpinEdit控件太丑了,自己写一个替换它

unit UpDownEdit; interface uses  Windows, SysUtils, Classes, Controls, StdCtrls, ComCtrls, Messages; type  TUpDownEdit = class(TCustomControl)  private    { Private declarations

2004-10-28 15:03:00 3775 3

原创 纸牌控件的编写(上)

使用了系统自带的纸牌库,无需任何资源,具有边角圆滑的效果,支持Windows 98、Windows 2000系统。效果如下图: 还具有自定义图象功能,如下图所示:unit ZFPlayCard;{2003.11.27xzhifei}interface uses  Windows, WinTypes, Messages, SysUtils, C

2004-05-21 18:17:00 1898 1

原创 纸牌控件的编写(下)

constructor TZFPlayCard.Create(AOwner: TComponent);var  x, y: integer;begin  inherited Create(AOwner);  FCardId := 1;  cdtInit(x, y);  SetBounds(0, 0, x, y);  ControlStyle := [csClickE

2004-05-17 23:01:00 1444

原创 纸牌控件的编写(中)

function cdtInit(var CardWidth, CardHeight: TCoordinate): Bool; {$ifdefWin32}stdcall;{$ENDIF Win32}function cdtDraw(aDC: HDC; X, Y: TCoordinate; Card: TCardId;  Mode: Cardinal; Color: TColorRe

2004-05-17 17:48:00 1363

模拟QQ截屏的DELPHI源码

模拟QQ截屏,支持拖动大小,JPG格式存储

2009-10-26

ChnCalendar v3.1 beta 饭桶牌农历控件

修正一些发现的BUG 增加了年号功能(公元1年到1948年) 农历范围增加到公元1年到2100年 修改DEMO演示程序

2009-07-28

ChnCalendar v3.0 beta 饭桶牌农历控件

距上次发布已经有一年多时间了,这次更新是应大家要求加上了农历月历控件,下拉框的模式也有改变,增加了一些背景设置功能,如背景图,颜色。。。 欢迎大家使用,如有意义或问题,请发到xzhifei@qq.com,谢谢

2009-07-23

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除