線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1513
推到 Plurk!
推到 Facebook!

一个窗口最小化时激发什么事件?

尚未結案
railgunman
初階會員


發表:59
回覆:121
積分:36
註冊:2003-03-31

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-09-29 15:32:40 IP:218.88.xxx.xxx 未訂閱
给为高手好! 一个窗口最小化时激发什么事件?我想的是当窗口最小化时执行相应的代码! 怎样才能办到呢?
william
版主


發表:66
回覆:2535
積分:3048
註冊:2002-07-11

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-09-29 16:31:32 IP:147.8.xxx.xxx 未訂閱
Put a TApplicationEvents on your form and write the OnMinimize event.
railgunman
初階會員


發表:59
回覆:121
積分:36
註冊:2003-03-31

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-09-29 16:37:53 IP:218.88.xxx.xxx 未訂閱
Thanks!!!!!!!! TApplicationEvents 是一个控件吗?是的话,那在哪里呢?我没有找到! 最小化的不是住窗体,也激发TApplicationEvents 的OnMinimize 事件吗?
railgunman
初階會員


發表:59
回覆:121
積分:36
註冊:2003-03-31

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-09-29 16:48:16 IP:218.88.xxx.xxx 未訂閱
我觉得TApplicationEvents 应该是一个类才对(愚见,我对对象和类知道得很少,不知高手对,要是对对象理解深刻的话,介绍一下相关资料,让小弟学习学习)! 要是我的一个应用程序有很多窗口,我都要处理它们最小化时的事件,怎么处理?在它们每个窗口上面各放一个TApplicationEvents 吗?然后在处理它们的the OnMinimize event???
william
版主


發表:66
回覆:2535
積分:3048
註冊:2002-07-11

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-09-29 17:16:08 IP:147.8.xxx.xxx 未訂閱
It is on the Additional page. If you cannot find it, you can assign a handler to Application.OnMinimize and it is for the whole application only. You need to capture the windows message WM_SIZE for a form based operation: e.g.
  TForm1 = class(TForm)
  private
    procedure WMSIZE(var Msg: TWMSize); message WM_SIZE;
  public
  end;    procedure TForm1.WMSIZE(var Msg: TWMSize);
begin
    if Msg.SizeType=SIZE_MINIMIZED then
        ShowMessage('Minimized');
end;
railgunman
初階會員


發表:59
回覆:121
積分:36
註冊:2003-03-31

發送簡訊給我
#6 引用回覆 回覆 發表時間:2003-09-30 10:21:12 IP:218.88.xxx.xxx 未訂閱
谢谢高手,不过小弟还是有疑问: procedure TForm1.WMSIZE(var Msg: TWMSize); begin if Msg.SizeType=SIZE_MINIMIZED then ShowMessage('Minimized'); end; 其中的var Msg: TWMSize,Msg参数是Windows系统发送给当前form的windows消息吗?
william
版主


發表:66
回覆:2535
積分:3048
註冊:2002-07-11

發送簡訊給我
#7 引用回覆 回覆 發表時間:2003-09-30 10:56:01 IP:147.8.xxx.xxx 未訂閱
Yes TWMSize is a windows message.
railgunman
初階會員


發表:59
回覆:121
積分:36
註冊:2003-03-31

發送簡訊給我
#8 引用回覆 回覆 發表時間:2003-09-30 17:32:04 IP:218.88.xxx.xxx 未訂閱
谢谢!!!!!!
系統時間:2024-05-18 12:56:43
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!