一个基础问题?(0分)

  • 主题发起人 darkblood
  • 开始时间
D

darkblood

Unregistered / Unconfirmed
GUEST, unregistred user!
一个基础问题,怎样从循环中跳出,怎样中止一个正在执行的过程?
比如我按了第一个按钮之后,开始执行库的搜索,我想用另一个按钮中止搜索,应该怎么做
 
从循环中跳出可以:
1、Continue,跳过本次循环
2、Break,跳出循环
不过如何要实现你的功能要用后台线程执行搜索。
 
定义一个全局变量
Var
FLG:Boolean=True;
在第一个Button的过程中加入:
If Not FLG Then Exit;
在第二个Button的过程中加入:
FLG:=False;
一切OK
 
break 终止循环
exit 终止过程
 
只能用线程,循环程序在线程中执行,按按钮中止线程的运行
 
在库的搜索代码种植入 Application.ProcessMessages
使终止事件能捕获消息!
 
顶部