如何是等待应答的窗口不被关闭？

yourform.enabled := false; 

解决方案 »

  1.   

    另，yourForm.Cursor := crHourglass;完成后，enabled = true, cursor = crDefault
      

  2.   

    能不能说的详细一点，是不是说要是使当前的窗口上的所有按钮在等待的时候都不可用，那么只要让form.enabled为false就可以了？然后改鼠标？
      

  3.   

    sorry, 应在窗口的执行中，使用Screen.Cursor,
    例如下：
      Screen.Cursor := crHourglass;
      Enabled := False;
      Try
        //你的处理
      Finally
        Enabled := True;
       Screen.Crusor := crDefault;
      End