让你实现系统托盘(即右下角的小图标)变得非常方便的原码:一句话就可以实现,怎么样也许你不相信,看看就知道了。就下面一句就实现了: TrayCon1.AddToTray Me, Me.Icon, \"系统托盘实例\", menu 并且在运行期间你还可以更改tip文字，更改图标，更改菜单等操作，窗体退出时，自动删除托盘，不需要人工介入，是不是减少了您平时的一大段的代码啊-allow you to realize the system tray (lower right corner of t

内容索引:Delphi源码,控件组件,小键盘 　　模拟QQ小键盘的一款Delphi控件源码，控件关键字：低级键盘钩子、按键状态 正常 鼠标进入 鼠标点击、数字数组、字母数组、所有按键的区域结构、忽略键盘的Shift消息、如果此值为真，则取Shift状态的时候按照下面的字段拳… 　　FAutoFitSize: Boolean; //是否自动调整大小 　　 FAtOnceRePaint: Boolean; //字段改变后是否立即刷新 　　 FUsePicture: Boolean; //使用图片做为

mfc的一段源码，不知道有没有帮助，大家下下来看看吧-the section of source code in mfc