01 2012 档案

网站开发技术网站
摘要：http://www.cssrain.cn/http://www.uml.org.cn/http://www.htmldrive.nethttp://www.uml.org.cn/ 阅读全文
posted @ 2012-01-21 16:55 许明吉博客 阅读(276) 评论(0) 推荐(0)
国外设计网站
摘要：http://www.hongkiat.comhttp://www.hv-designs.co.uk/2011/06/28/milk-ui-kit-freebie/免费的失量图http://www.vectorstock.com/free-vectors?order=popular国外的下载网站http://www.sharewarejunction.comhttp://www.allulook4.com/95f/KeyCreator+7+5+2.htmlhttp://usenetdownloads.net/usenet.nl/v4/register.php?file=S2V5Y3JlYXRv 阅读全文
posted @ 2012-01-16 11:46 许明吉博客 阅读(202) 评论(0) 推荐(0)
屏幕录像软件 BB FlashBack
摘要：屏幕录像软件 BB FlashBack 阅读全文
posted @ 2012-01-12 17:50 许明吉博客 阅读(204) 评论(0) 推荐(0)
C# 窗体样式使用WS_EX_LAYERED后，无法绘制windows控件的解决办法
摘要：根据一副 png 图片绘制半透明窗体时，用了 WS_EX_LAYERED 后当前窗体再也不会处理 paint 事件，所以所含的子控件是一辈子也不会画出来的，但是这个控件确实存在，而且可以响应事件 。而此时 windows 画制窗体是使用 UpdateLayeredWindow 这个 api 函数的。 对于按钮，完全可以自己画两个图片然后盖在 button 上面，通过处理 button 的 enter 和 leave 消息来切换者两个图片来表达按钮状态 对于输入框..这个可以用一个让任何人看了都生气地办法，那就是....两个窗体，的确别人就是这么做的 可以用一个空心窗体只显示该显示的控件，然后. 阅读全文
posted @ 2012-01-12 16:30 许明吉博客 阅读(2481) 评论(0) 推荐(0)
delphi 改变闪动光标
摘要：// 不同风格的光标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 许明吉博客 阅读(1277) 评论(0) 推荐(0)
delphi 可以自定义边框的文本框TSkinNormalEdit思路(QQ2011风格)
摘要：需求：QQ我的资料中基本资料窗体中的文本框： 正常状态下，文本框只有一条看起来只有一个像素的边框，边框的颜色从上到下由深到浅的渐变，当鼠标定位到该文本框时，其边框会变粗，而且边框的颜色加亮显示如下图所示： 实现思路：一、准备两个边框素材图片，一个是正常状态下的边框素材，比如：另一个是鼠标进入到文本框内的边框素材比如：二、需要的参数首先是边框素材的绘制边距，分为左边距，右边距，上边距，下边距边框素材根据边距的设置，使用九宫格缩放绘制到界面上其次是边框的边距，也为左边距，右边距，上边距，下边框代表的是文本框客户区（即输入区）的大小默认的，边框素材的绘制边距和边框的边距是一样的三、消息处理边框属于文 阅读全文
posted @ 2012-01-12 10:39 许明吉博客 阅读(2766) 评论(1) 推荐(0)
delphi 文本框内容空白时加上提示文字,输入内容时提示文字不显示
摘要：需求： 当文本框没有输入内容且输入焦点不在文本框时，显示提示文字：“请输入帐号” 当文本框得到输入焦点时提示文字不显示 实现的思路有两种，一种是在外部控制，在文本框的OnEnter事件中，将提示文字清除，在OnExit事件中如果文本框的Text为空时给文本框加上提示文字， 而且提示文字的颜色和正常文字的颜色有区别，一般大家使用灰色另一种是重新制作一个控件，当文本框获取焦点且Text为空时，使用WM_PAINT消息，在其中绘制提示文字 ifNot Focused and (Text='') and (HelpText<>'') thenbegin // 阅读全文
posted @ 2012-01-12 10:36 许明吉博客 阅读(7612) 评论(0) 推荐(0)
C#编程中的66个好习惯，你有多少个？
摘要：最近在网上发现这篇文章，看看自己的编程习惯掌握了多少？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 许明吉博客 阅读(1525) 评论(0) 推荐(0)
Delphi版 关于QQ输入控件无法Spy到句柄的实现方案可行性研究
摘要：Delphi版 关于QQ输入控件无法Spy到句柄的实现方案可行性研究 QQ2009版本的界面，和以前的版本有个显著的不同，就是无法通过Spy++抓到界面上某些元素的句柄了，对于这个技术的实现方案，相信好多人都有一些 揣度，实现方法怎样，有人说是应用的DirectUI技术，也有人说是用反Hook，等等一些列的说道！在这，我也说说我的一点看法！我说的一种方法不属 于以上的任何一种方法。至于如何，且听我慢慢道来！此思路，来源于一个偶然，在聊天窗口失去焦点与获得焦点时的一个偶然。 聊天的时候，我们要输入信息，首先要让窗口获得焦点！然后输入框也要获得焦点，才能输入。那么我们可以想象一下，在Delphi中 阅读全文
posted @ 2012-01-06 23:47 许明吉博客 阅读(834) 评论(0) 推荐(0)
改变PNG图片的透明度 delphi
摘要：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 许明吉博客 阅读(4491) 评论(0) 推荐(1)
TGPBitmap转为TBitmap
摘要：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 许明吉博客 阅读(3114) 评论(0) 推荐(0)
WPF 3D相册效果+半透明玻璃【源码】
摘要：http://download.csdn.net/detail/wangwenzhuang/2943282 阅读全文
posted @ 2012-01-04 22:29 许明吉博客 阅读(1063) 评论(0) 推荐(0)
delphi 半透明窗体类
摘要：{******************************************************************************* 半透明窗体控件 版本：1.0 功能说明 : 1.支持颜色和图片半透明 2.暂时只能手动指定背景图片 3.可调透明度(0..255) 4.可控制是否可移动窗体 联系方式： Email: mdejtoz@163.com*******************************************************************************}unit uTranslucentForm;i... 阅读全文
posted @ 2012-01-04 22:24 许明吉博客 阅读(3391) 评论(0) 推荐(0)
delphi 用API实现 窗体半透明效果
摘要：procedure TForm1.Button1Click(Sender: TObject);varh: HWND;FormStyle: Integer;beginh := self.Handle;FormStyle := GetWindowLong(h, GWL_EXSTYLE);SetWindowLong(h, GWL_EXSTYLE, FormStyle or WS_EX_LAYERED);SetLayeredWindowAttributes(h, 0, 128, LWA_ALPHA);end; procedure TForm1.Button2Click(Sender: TObject. 阅读全文
posted @ 2012-01-03 22:52 许明吉博客 阅读(2004) 评论(0) 推荐(0)
delphi 取控件下的图象
摘要：unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, jpeg;type TForm1 = class(TForm) pnl1: TPanel; pnl2: TPanel; img1: TImage; img2: TImage; btn1: TButton; procedure btn1Click(Sender: TObject); proced... 阅读全文
posted @ 2012-01-03 17:52 许明吉博客 阅读(585) 评论(0) 推荐(0)