delphi 立即停止timer

本文整理自网络，侵删。

 
问题：我设置timer1.enabled := false;后，当OnTimer事件中未执行完时，还是会执行下面的语句。
有没有方法可以直接停止执行。不管下面的语句有没有执行。
谢谢。
回复：没有直接停的办法，只有在OnTimer事件中加上Timer1.Enabled的判断。如：
procedure TForm1.Timer1Timer(Sender: TObject);
var
  i: Integer;
begin
  if not Timer1.Enabled then
    Exit;

  for i := 0 to 999 do
  begin
    if not Timer1.Enabled then
      Exit;
  end;
end;
 

相关阅读 >>

Delphi执行cmd命令和bat文件

Delphi 从其它access数据导入数据到本地数据库

Delphi获取操作系统安装磁盘盘符

Delphi 自动关闭弹出的窗口

Delphi 列举系统服务,停止启动所选服务

Delphi 操作系统时间与web标准时间校正

Delphi link() 精简打开网址

Delphi 用正则表达式获取指定的字符串续取出所有符合要求的字符串

Delphi 截取字符串的用法

Delphi image 图像清空

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi 立即停止timer