如何接受消息中断正在处理的过程

2016-02-19 13:22 6 1 收藏

下面图老师小编跟大家分享如何接受消息中断正在处理的过程,一起来学习下过程究竟如何进行吧!喜欢就赶紧收藏起来哦~

【 tulaoshi.com - 编程语言 】

 

  var Interrupt:boolean;
  
  procedure TForm1.Button5Click(Sender: TObject);
  begin
    memo1.Lines.Add('Button5Click OK');
    Interrupt:=true;
  end;

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/bianchengyuyan/)

  procedure TForm1.Button6Click(Sender: TObject);
  var i,j,n:integer;
  begin
    Interrupt:=false;
    for i:=0 to 10000 do
    for j:=0 to 10000 do
    begin
      inc(n);
      Application.ProcessMessages;
      if Interrupt then
      begin
        memo1.Lines.Add('Interrupt OK');
        exit;
      end;
    end;
    memo1.Lines.Add('Button6Click OK');
  end;
  

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/bianchengyuyan/)

来源:http://www.tulaoshi.com/n/20160219/1604010.html

延伸阅读
标签: SQLServer
CREATE PROCEDURE [LoneUser] --INPUT @DBName nvarchar(50), @UserName nvarchar(50) AS Exec sp_configure allow updates,1 RECONFIGURE WITH OVERRIDE Declare @ExecStr nvarchar(4000) Select @ExecStr = Declare @b varbinary(85) + Use Master ...
标签: 电脑入门
在日常工作当中,当需要使用图表来直观展现数据随时间变化的趋势时,可以使用折线图来达到目的。但是当某个时间段内数据为空值或零值时,就会使得图表当中的折线出现断裂的情况,影响数据信息的展现。如下图所示: 此时,我们可以通过简单的设置快速解决该问题。 首先单击图表将其选中,在图表工具设计选项卡的数据选项组中单击选择数据按...
一个非可视的组件必须对Windows操作系统或用户定义的消息作出响应。然而,由于一个非可视组件没有窗口,因此它也没有窗口句柄,自然它也不能接收到消息,为了解决这一问题,我们的思路是创建一个隐藏的窗口,使非可视组件能够接收到消息。 为了给你的非可视组件创建一个隐藏的窗口,需要有以下: 1.一个私有变量型(Private Variab...
一、前 言 Windows提供强大的功能以及友好的图形用户界面(GUI),使得它不仅广泛的用作管理事务型工作的支持平台,也被工业领域的工程人员所关注。 但Windows3.1并非基于优先级来调度任务,无法立即响应外部事件中断,也就不能满足工业应用环境中实时事件处理和实时控制应用的要求。因此,如何在Windows环境中处理外部实时事件一...
标签: 电脑入门
曾经在百度贴吧中看到这样的一个帖子,某屌丝男在QQ上向女神表白了,正期待的看着QQ聊天窗口,上面显示的正在输入让屌丝男满心的欢喜。若干分钟后,女神只发来了一句哦!正在输入四个字,欺骗了多少等待爱情的人啊?当然这可能只是一个玩笑,不过QQ正在输入这项功能设计在我们的平常生活中的确有好有不好,QQ正在输入的功能其实也是在变相的透露...

经验教程

971

收藏

94
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部