不知道为什么用WM_OVING会有问题,不过你可以用WM_SIZING

解决方案 »

  1.   

    我要的就是wm_moving的wparam的edge,虽然可以用wm_move来实现,但我想知道怎样处理wm_moving
      

  2.   

    在Form的OnCreate事件中写如下代码:
    Application.OnMessage := MyAppMessage;
    另外加这样一个过程:
    procedure TForm1.MyAppMessage(Msg: TMsg; var Handled: Boolean);
    begin
      if Msg.message = WM_MOVING then
      ...........
    end;
      

  3.   

    prometheusphinx(白日梦)这样做与我的方法有本质区别吗?
    我需要取得wparam以知道窗口的移动方向,可msg.wparam根本就是一个不变的值