800分解决以下问题: (详情见帖)

[cmain83]

1、如何截取点击任务栏上“快速启动”栏的“显示桌面”按钮的消息（也就是按快捷键
WIN + D）（具体是什么消息，消息的各参数所代表的意义）

2、如何截取桌面重画的消息（具体是什么消息，消息的各参数所代表的意义）

3、如何使桌面重画（发送什么消息或用什么函数？）

4、注册系统热键 ALT + A 的代码

5、如何截取最小化消息进行处理（注：我要做的是不让它最小化，而是做另外的处理）
（具体是什么消息，消息的各参数所代表的意义）

[cmain83]

问题3已经解决... (谢谢 aiirii(ari) )

[efsnake]

学习ing

[cmain83]

还请各位大侠帮忙做做 1、2、5 这个问题

小弟先谢了。。
在线等待中................

[flfljh]

学习ing

[zhyanger]

对最小化消息进行处理
添加一个最小处理的过程
Procedure TFrmMain.AppMiniMized(Sender:TObject);
Begin
.........
End;
调用时
Application.OnMinimize:=AppMiniMized;
AppMiniMized(Nil);

[cmain83]

楼上的，这种方法不行。。

进行处理后窗口还是会最小化。。
不信你试试。。
我要的是不让窗体最小化。

[rockswj]

第5个问题：
procedure WMSYSCOMMAND(var msg:TWMSYSCOMMAND);message WM_SYSCOMMAND;
procedure TForm1.WMSYSCOMMAND(var msg: TWMSYSCOMMAND);
begin
if msg.CmdType=SC_MINIMIZE then
begin
msg.Result:=0;
showmessage('不能最小化');
end else
inherited;
end;

[hkbarton]

好象已经有很多人回答了呢，我只说最后一个吧
要拦截最小化的消息，拦截WM_SYSCOMMAND就可以了，并检测它的wParam参数是不是SC_MINIMIZE，如是就为最小化事件发生，做相应的处理就可以了，但delphi中也有一个特殊的地方，那是因为它开发的每一个程序都有一个隐藏的Application，这个自己也有一个最小化事件（对应于点两次任务兰的最小化），你还需要在这里处理

[saien]

不简单

[cmain83]

问题 5 只解决了一半.....


请各位测试一下:
点击窗口上的最小化按钮可以正确执行.

但是用另一种方法最小化:
用鼠标右键点击状态栏上的程序图标，在其弹出的菜单中点“最小化命令”，此时根本就没有产生
WM_SYSCOMMAND 消息
请问如何解决？？

[cmain83]

顶...

主要还有1、2 两问

[Seahilly]

up

[noil0125]

问题 5 只解决了一半.....


请各位测试一下:
点击窗口上的最小化按钮可以正确执行.

但是用另一种方法最小化:
用鼠标右键点击状态栏上的程序图标，在其弹出的菜单中点“最小化命令”，此时根本就没有产生
WM_SYSCOMMAND 消息
请问如何解决？？
----------------------------------------------------------------------------------


让应用程序不显示在任务栏怎么样？
这样的话好像没问题了。
Application.Initialize;
Application.CreateForm(TForm1, Form1);
SetWindowLong(Application.Handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW);
//增加的
Application.Run;

[yudehui]

关于消息函数
本论坛的精华部分
和FAQ部分都有的
自己看看了

[nyf1220]

不会，郁闷

[delphipan]

关注

学习

[cmain83]

今天请假在外.

明天公司里再说..

[lchy20cn]

有趣

[lx47]

活活，这个要标记一下啊。
牛人。。。。

[wzds2000]

顶。。。