其他分享
首页 > 其他分享> > win 窗体 按钮 .Enabled:=false 中间做很多事情 还是会触发clik事件思考

win 窗体 按钮 .Enabled:=false 中间做很多事情 还是会触发clik事件思考

作者:互联网

本人是delphi ,

btnStart.Enabled:=false;

 之间做一个递归比较耗时,

btnStart.Enabled:=true;

发现在Enabled:=false; 之后还是会触发用户重复clik,诧异了。 百度了一下,发现 C# winform也是有这个问题,同一套机制。百度到下方文章,

避免用户重复点击按钮(使用Enable:=False,消息繁忙时会有堵塞的问题,只能改用Sleep) - findumars - 博客园
https://www.cnblogs.com/findumars/p/6347945.html

// 现象描述:
//    用户点击按钮后程序开始繁忙工作,这时候用户不知道是否成功,就继续点几次
//    采用Enalbe = false ... = true的方式发现还会触发点击,分析原因如下
// 当程序繁忙的时候消息被堵住了
// 所以点击消息还会被处理
// 将队列里的消息处理掉后才打开按钮的Enabled

private void button1_Click(object sender, EventArgs e)
{
    button1.Enabled = false;
    Thread.Sleep(2000);
    richTextBox1.AppendText(Environment.TickCount.ToString() + "/r/n");
    Application.DoEvents(); // 关键语句
    button1.Enabled = true;
}

而我改成: 就可以了。

procedure TForm1.btnStartClick(Sender: TObject);
begin
  btnStart.Enabled:=false;
  ErgodicDirectory('');//递归去做的比较耗时的事情
  Application.ProcessMessages();
  btnStart.Enabled:=true;//在恢复之前 用Application.ProcessMessages();
end;

 

application.ProcessMessages的主要作用使程序在循环时能够相应外界事件。
一般情况下,程序在循环的时候不响应外界事件。直到循环结束为止才能接受和响应外界事件。
application.ProcessMessages可以有效的解决循环循环的独占问题,能够暂时中断应用程序的执行。
比如,你要设计一个计算,这个计算需要循环10000次。当循环开始到500次的时候,用户突然不想计算下去了,它想取消这个计算,
这时候你就可以设置一个cancel按钮,然后在循环体内部合适的位置application.ProcessMessages。来处理cancel按钮的信息,中断循环。
如果你在循环体内没有application.ProcessMessages这句。当循环开始后,程序就被10000次的这个循环独占了,直到循环结束为止。在循环的期间,用户的按什么按钮都没有用。

平时也是常用 application.ProcessMessages 来 防止程序假死。想不到这里也需要用到它。

 

标签:ProcessMessages,false,win,Enabled,application,循环,按钮
来源: https://www.cnblogs.com/rogge7/p/16420483.html