已知道 一个窗口的句柄, 如何扑捉该窗口的onresize 事件,并在onresize 事件中写入自己的代码?...

已知道 一个窗口的句柄, 如何扑捉该窗口的onresize 事件,并在onresize 事件中写入自己的代码? Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiAPI/html/delphi_20061120145223192.html
已知道   一个窗口的句柄,   如何扑捉该窗口的onresize   事件,并在其中写入自己的代码?

 
  用   SetWindowLong   大概代码如下  
   
  Txxxform  
      function   NewWinProc(var   Message:   TMessage):   Integer;  
   
  下面代码设成你的处理过程  
  //     NewProc,   OldProc:   Pointer;  
      NewProc   :=   WinUtils.MakeObjectInstance(NewWinProc);  
      OldProc   :=   Pointer(GetWindowLong(你的句柄,   GWL_WNDPROC));  
      SetWindowLong(你的句柄,   GWL_WNDPROC,   Longint(NewProc));  
   
  function   xxx.NewWinProc(var   Message:   TMessage):   Integer;  
  begin  
      if   Message.Msg   =   WM_SIZE   then  
      begin  
          ...  
          result   :=   1;  
      end  
      else   OldProc(Message);  
  end;  
   
 

Hook

转载于:https://www.cnblogs.com/delphi2007/archive/2008/11/27/1342628.html

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值