- 博客(13)
- 资源 (3)
- 收藏
- 关注
RSS订阅原创 Android Studio插件报“Compatible with IntelliJ IDEA only“错误的解决办法
保存后，重启Android Studio即可解决问题！
2023-08-13 15:45:30
706
1
原创 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
4867
原创 挖掘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
8718
2
原创 饭桶牌农历控件包3.0 Beta版(带源码)发布啦
距上次发布已经有一年多时间了，这次更新是应大家要求加上了农历月历控件，下拉框的模式也有改变，增加了一些背景设置功能，如背景图，颜色。。。 欢迎大家使用，如有意义或问题，请发到[email protected]，谢谢 下载链接：http://www.2ccc.com/article.asp?articleid=5319
2009-07-24 08:54:00
1644
原创 饭桶牌农历控件有新版了
近来晚上闲来无事，无意中看了RZ的控件组，发现有一个带月历简单的控件，那个日历的Combox做得很好，就细看了一下源码，随后略有所悟，于是拿来一年多前的那个农历控件进行更新，效果不错，呵如图所示，可以实现除平面与普通界面外，还可实现桌面主题的外框：XP风格的实现并非模拟，是真正的XP风格，实现代码可以看源码OnPaint过程下载链接：http://www.lexchou.com.c
2008-01-31 20:05:00
2772
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
2178
原创 WindowsNT/200 环境下要自订纸张尺寸（自定义页面）
近日因项目需要接触了打印机，自定义纸张的大小问题困扰了我一个多星期，还以为XP系统无法自定义纸张，后来在网上搜索时无意中发现，打印机都有最小纸张的标准，如果小于或大于这个标准，就算自定义好了页面，都无法选择它（不会显示出来），如果用程序强制设置打印的话，它会按A4的标准走纸，比如我用的Epson LQ-300K+这款打印机，最小纸张是10CM*10.16CM，而我要的宽度正好小于10CM，后来我改
2007-07-05 12:27:00
3770
原创 自画TListView带进度条的Item
自画TlistView带进度条的Item TListView的Item条一般是由系统自画的，但电驴就实现了自画，使之看起来很漂亮，我们用DELPHI也可以实现！ 首先要引用CommCtrl单元，这是TListView底层控制单元：uses CommCtrl; //画状态条procedure DrawSubItem(LV: TListView; Item:
2007-02-26 16:41:00
5814
4
原创 TListView的ListItem完全自绘
因工作需要完全自绘ListItem，模仿成电驴的样式，查找了N久相关的资料，发现很少有这方面的，最后用ListView_GetSubItemRect关键词在一个小日本的网站上找到一点相关的代码，修改后解决该问题。至于是否存在BUG，偶用了几天还木有发现，如果有什么问题，请大家回复一下，谢谢注意：代码只支持ViewStyle=vsReport效果图如下：uses
2006-02-20 11:39:00
8517
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
3939
3
原创 纸牌控件的编写(上)
使用了系统自带的纸牌库，无需任何资源，具有边角圆滑的效果，支持Windows 98、Windows 2000系统。效果如下图： 还具有自定义图象功能，如下图所示：unit ZFPlayCard;{2003.11.27xzhifei}interface uses Windows, WinTypes, Messages, SysUtils, C
2004-05-21 18:17:00
1968
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
1503
原创 纸牌控件的编写(中)
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
1416
ChnCalendar v3.1 beta 饭桶牌农历控件
2009-07-28
ChnCalendar v3.0 beta 饭桶牌农历控件
2009-07-23
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人