如何把MouseMove的事件代码在另外一个form设置为可以无效,

Question

我有两个form一个在MouseMove的时候有一个代码事件发生，需要在另外一个form控制其MouseMove的时候的代码事件发不发生，如何实现？

Answer 1

另外的form里不写代码它会实现么?
--------------------------------------------------------------------
据查证 hammer_shi(@农业专家@(*暂时是菜鸟*))为激进分子,该账号已删除.  

Answer 2

//需要在另外一个form控制其MouseMove的时候的代码事件发不发生，如何实现？
那你就在另我一个form里写入
Form1.OnMouseMove := nil；
//form1为第一个Form。

Answer 3

另一个窗体.OnMouseMove := nil

Answer 4

发的不好意思有点歧义在另外一个窗体上写     
  你想控制的窗体.OnMouseMove := nil

Answer 5

procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
    if abs(x-form1.Width)>x then form1.Left:=form1.Left+1 else form1.Left:=form1.Left-1;
    if abs(y-form1.Height)>y then form1.top:=form1.top+1 else form1.Top:=form1.Top-1;
end;这就是要暂时无效的控制的代码事件

Answer 6

那么和想控制的窗体.OnMouseMove := nil设为无效
相对的语句，即设为有效功能语句是什么？