上一页 1 2 3 4 5 6 ··· 24 下一页
摘要: 屏幕录像软件 BB FlashBack 阅读全文
posted @ 2012-01-12 17:50 许明吉博客 阅读(199) 评论(0) 推荐(0) 编辑
摘要: 根据一副 png 图片绘制半透明窗体时,用了 WS_EX_LAYERED 后当前窗体再也不会处理 paint 事件,所以所含的子控件是一辈子也不会画出来的,但是这个控件确实存在,而且可以响应事件 。而此时 windows 画制窗体是使用 UpdateLayeredWindow 这个 api 函数的。 对于按钮,完全可以自己画两个图片然后盖在 button 上面,通过处理 button 的 enter 和 leave 消息来切换者两个图片来表达按钮状态 对于输入框..这个可以用一个让任何人看了都生气地办法,那就是....两个窗体,的确别人就是这么做的 可以用一个空心窗体只显示该显示的控件,然后. 阅读全文
posted @ 2012-01-12 16:30 许明吉博客 阅读(2432) 评论(0) 推荐(0) 编辑
摘要: // 不同风格的光标procedure TForm1.Edit1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);begin CreateCaret(Edit1.Handle, 0, 10, 4); ShowCaret(Edit1.Handle);end;// 用图像做光标procedure TForm1.Memo1MouseDown(Sender: TObject; Button... 阅读全文
posted @ 2012-01-12 16:07 许明吉博客 阅读(1264) 评论(0) 推荐(0) 编辑
摘要: 需求:QQ我的资料中基本资料窗体中的文本框: 正常状态下,文本框只有一条看起来只有一个像素的边框,边框的颜色从上到下由深到浅的渐变,当鼠标定位到该文本框时,其边框会变粗,而且边框的颜色加亮显示如下图所示: 实现思路:一、准备两个边框素材图片,一个是正常状态下的边框素材,比如:另一个是鼠标进入到文本框内的边框素材比如:二、需要的参数首先是边框素材的绘制边距,分为左边距,右边距,上边距,下边距边框素材根据边距的设置,使用九宫格缩放绘制到界面上其次是边框的边距,也为左边距,右边距,上边距,下边框代表的是文本框客户区(即输入区)的大小默认的,边框素材的绘制边距和边框的边距是一样的三、消息处理边框属于文 阅读全文
posted @ 2012-01-12 10:39 许明吉博客 阅读(2731) 评论(1) 推荐(0) 编辑
摘要: 需求: 当文本框没有输入内容且输入焦点不在文本框时,显示提示文字:“请输入帐号” 当文本框得到输入焦点时提示文字不显示 实现的思路有两种,一种是在外部控制,在文本框的OnEnter事件中,将提示文字清除,在OnExit事件中如果文本框的Text为空时给文本框加上提示文字, 而且提示文字的颜色和正常文字的颜色有区别,一般大家使用灰色另一种是重新制作一个控件,当文本框获取焦点且Text为空时,使用WM_PAINT消息,在其中绘制提示文字 ifNot Focused and (Text='') and (HelpText<>'') thenbegin // 阅读全文
posted @ 2012-01-12 10:36 许明吉博客 阅读(7549) 评论(0) 推荐(0) 编辑
摘要: 最近在网上发现这篇文章,看看自己的编程习惯掌握了多少?1. 避免将多个类放在一个文件里面。 2. 一个文件应该只有一个命名空间,避免将多个命名空间放在同一个文件里面。3. 一个文件最好不要超过500行的代码(不包括机器产生的代码)。 4. 一个方法的代码长度最好不要超过25行。5. 避免方法中有超过5个参数的情况。使用结构来传递多个参数。 6. 每行代码不要超过80个字符。 7. 不要手工的修改机器产生的代码。 a) 如果需要编辑机器产生的代码,编辑格式和风格要符合该编码标准。b) Use partial classes whenever possible to factor out the 阅读全文
posted @ 2012-01-11 09:55 许明吉博客 阅读(1514) 评论(0) 推荐(0) 编辑
摘要: Delphi版 关于QQ输入控件无法Spy到句柄的实现方案可行性研究 QQ2009版本的界面,和以前的版本有个显著的不同,就是无法通过Spy++抓到界面上某些元素的句柄了,对于这个技术的实现方案,相信好多人都有一些 揣度,实现方法怎样,有人说是应用的DirectUI技术,也有人说是用反Hook,等等一些列的说道!在这,我也说说我的一点看法!我说的一种方法不属 于以上的任何一种方法。至于如何,且听我慢慢道来!此思路,来源于一个偶然,在聊天窗口失去焦点与获得焦点时的一个偶然。 聊天的时候,我们要输入信息,首先要让窗口获得焦点!然后输入框也要获得焦点,才能输入。那么我们可以想象一下,在Delphi中 阅读全文
posted @ 2012-01-06 23:47 许明吉博客 阅读(814) 评论(0) 推荐(0) 编辑
摘要: type TARGBRect = packed record Blue, Green, Red, Alpha: Byte; end; var I, x, y: Integer; bmp: TGpBitmap; bg: TGpGraphics; Data: TBitmapData; P: PInteger; begin DoubleBuffered := True; bmp := TGpBitmap.Create('0.bmp'); try Data := bmp.LockBits(GpRect(0, 0, W, H), [imRead, imWr... 阅读全文
posted @ 2012-01-05 16:15 许明吉博客 阅读(4448) 评论(0) 推荐(1) 编辑
摘要: TGBBitmap用在GDI+中,而TBitmap用在GDI中,有的时候,我们需要将它们进行转换,例如我们要将一个JPEG的图片的缩略图放到TBitmap中,这样它就可以很方便的被Windows中的多个控件所使用(如ImageList、Image等等控件)。 程序用DELPHI实现,使用了for Delphi 的GDI+接口函数,GDI+部分的代码可能与网上的不同,但差别不大。 代码如下:use gdipapi,gdipobj,gdiputilprocedure TForm1.ToBitmap(fnames:string);VAR Graphics : TGPGraph... 阅读全文
posted @ 2012-01-05 13:36 许明吉博客 阅读(3077) 评论(0) 推荐(0) 编辑
摘要: http://download.csdn.net/detail/wangwenzhuang/2943282 阅读全文
posted @ 2012-01-04 22:29 许明吉博客 阅读(1052) 评论(0) 推荐(0) 编辑
上一页 1 2 3 4 5 6 ··· 24 下一页