我的微店
得闲笔记
我命由我不由天
12 2010 档案
Delphi实现的透明阴影以及蒙版效果菜单
摘要:QQ2010的皮肤控件目前实现了一部分,看到有些软件的菜单,都有阴影,透明等效果,于是开始重新实现菜单控件,QQ2009版的菜单控件,是自己从TComponent继承了完全模拟实现的一个菜单,虽然实现了菜单控件的效果,但是设计器没去实现,设计时候不太方便,当时也去为它专门做一个设计器,现在,考虑到写个设计器麻烦,懒得搞,干脆直接从TPopMenu继承来实现一个皮肤效果的菜单,这个实现起来实际上也不难,只要替换掉他的Popup弹出过程就行了。这个实现了之后,就开始实现菜单的阴影效果了!经过一天的研究,终于搞出来了,上图纪念一下!,本菜单可实现蒙版,阴影,以及透明设置等 阅读全文
posted @ 2010-12-30 22:24 不得闲 阅读(6171) 评论(6) 推荐(0)
[数据库连接字符串] Access 连接字符串(转)
摘要:ODBC 标准安全策略 Driver={Microsoft Access Driver (*.mdb)};Dbq=C:\mydatabase.mdb;Uid=Admin;Pwd=; 工作组 Driver={Microsoft Access Driver (*.mdb)};Dbq=C:\mydatabase.mdb;SystemDB=C:\mydatabase.mdw; 独占模式 Driver={Microsoft Access Driver (*.mdb)};Dbq=C:\mydatabase.mdb;Exclusive=1;Uid=admin;Pwd=; 管理员模式 如果您需要在程序中使用 阅读全文
posted @ 2010-12-29 11:00 不得闲 阅读(22930) 评论(0) 推荐(2)
使用Delphi自带的TDockTabSet组件实现停靠功能(Jeremy North)
摘要:源地址:http://edn.embarcadero.com/article/33446摘要: Instructions on how to use the TDockTabSet component to make advanced docking user interfaces.IntroductionThis article discusses the use of the TDockTabSet component that was originally introduced in Delphi 2005.Creating the applications main formCreat 阅读全文
posted @ 2010-12-15 10:50 不得闲 阅读(5374) 评论(0) 推荐(1)
修改注册表后不重启计算机边生效(转)
摘要:修改注册表后不重启计算机边生效。const int WM_SETTINGCHANGE = 0x001A;const int HWND_BROADCAST = 0xffff;IntPtr result1;public enum SendMessageTimeoutFlags : uint{SMTO_NORMAL = 0x0000,SMTO_BLOCK = 0x0001,SMTO_ABORTIFHUN... 阅读全文
posted @ 2010-12-01 22:14 不得闲 阅读(3767) 评论(0) 推荐(0)