Delphi自定义消息应用及delphi托盘实现interfaceuses   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls,shellapi;const  WindowsMessage =WM_USER+101   ;procedure UserPro(Var Message:TMessage):message WindowsMessage 其中UserP…

delphi 自定义消息     消息描述 Tmsg是   Windows系统用来记录描述一个具体的windows消息的.就是windows   用于封装应用程序及系统程序发生的消息,它是操作系统使用的.   Tmessage   则封装了TMsg的参数,是应用程序响应的消息.该消息记载了消息的编号,最重要的就是它携带的两个参数.一般接收对象要定义处理句柄,然后对收到的消息 进行处理.如果不定义处理句柄,就交给祖先类去处理.我们在应用程序中使用的是TMessage   消息,而不是TMsg消息.…

标题:我的 Delphi 学习之路 -- Delphi 助手的安装 作者:断桥烟雨旧人伤 Delphi 助手的安装 CnWizards 类似于 VS 中的番茄助手,在编写 Delphi 代码时帮助极大,以下为它的安装过程. CnWizards 安装语言支持简体中文,所以这里我们选择简体中文安装,如下: 点击下一步: 点击我接受: 这里需将下面三个勾勾上,然后再点击下一步: 选择安装路径: 把自述文件的勾去掉,点击完成: 在 Delphi IDE 启动画面上会出现 Wizards,说明已经安装成功…

标题:我的 Delphi 学习之路 -- Delphi 的安装 作者:断桥烟雨旧人伤 1. Delphi 版本的选择 Delphi 版本众多,我该选择哪一个,这确实是个问题,自从 Borland 公司被己购后,Delphi 就一直没更新过,一直停留在 Delphi7 的经典版本上,现在网络上大多都是 Delphi7 的教学,书也是 Delphi7 的,其它版本很少,几乎看不到,然而它其实在更新,只是另外一家公司,为 Embarcadero(易博龙)技术公司,易博龙现已将 Delphi 更新到了…

标题:我的 Delphi 学习之路 -- Delphi 的认识 作者:断桥烟雨旧人伤 1. 什么是 Delphi Delphi 是 Windows 平台下著名的快速应用程序开发工具(Rapid Application Development,简称 RAD).它的前身,即是 DOS 时代盛行一时的 BorlandTurbo Pascal,最早的版本由美国 Borland(宝兰)公司于 1995 年开发.主创者为 Anders Hejlsberg.经过数年的发展,此产品也转移至 Embarcader…

Delphi for Android (aka Delphi XE5 aka RAD Studio XE5) has appeared   Blimey, that took me by surprise (again)! I figured it was coming fairly soon, but I didn’t realise quite that soon. Anyway, Delphi XE5 is here (as is RAD Studio XE5 and siblings),…

我晕,Delphi 7 以后增加了这么多有用的语法,我都不知道.真是越学越觉得自己浅薄,自己所作的Delphi项目所用的知识还不够Delphi知识储备体系的十分之一,更别说Delphi还在继续发展. ----------------------------------------------------------------------- 自Delphi 7以来的Delphi 2009测试版新语法特性                 by eGust======================…

---- 现在很多的应用程序都有这样一种功能,当用户选择最小化窗口时,窗口不是象平常那样最小化到任务栏上,而是“最小化”成一个任务栏图标.象FoxMail 3.0 NetVampire 3.0等都提供了这样的功能.实现这样的功能实际上并不复杂,在窗口最小化时,窗口会发出WM_SYSCOMMAND消息,你只要需要截取Windows的WM_SYSCOMMAND消息,在窗口最小化时隐藏窗口并调用WindowsAPI函数Shell_NotifyIcon将定义的图标添加到任务栏上,Shell_Notify…

1.new -->application 2.在form1中加入一个tPopMenu 命名为pm1 3.uses ShellAPI; 4.定义一个常量在 const WM_TRAYMSG = WM_USER + 101; 5.在private中生命变量 NotifyIcon: TNotifyIconData; 6.声明两个消息 procedure TfrmMain.WMSysCommand(var Msg: TMessage); begin if Msg.WParam = SC_ICON the…

1.new -->application 2.在form1中加入一个tPopMenu 命名为pm1 3.uses ShellAPI; 4.定义一个常量在 const WM_TRAYMSG = WM_USER + 101; 5.在private中生命变量 NotifyIcon: TNotifyIconData; 6.声明两个消息 procedure TfrmMain.WMSysCommand(var Msg: TMessage); begin if Msg.WParam = SC_ICON the…