控制另外一个程序的上面的控制的Enable还是disable

procedure TForm1.bt1Click(Sender: TObject);
var
      winT,winM:integer;
begin
       winM:=findwindow(nil,'气死我了');
      wint:=FindwindowEX(winM,0,nil,'看你听不听话');
      windows.SetParent(wint,self.Handle);
      EnableWindow(wint,true);
      windows.SetParent(winT,winm);
end;

---

至于为什么要用SetParent．．答案大家自己找一下．去掉和不去掉会有什么不同的情况．