手机站
网通分站
电信主站
购物车
续租服务
在线提问
常见问题
付款方式
购买流程
忘记密码？
密　码:
用户名：
首 页
  域名注册
  虚拟主机
  智能建站主机
  服务器租用
  VPS主机
  企业邮局
  代理专区
  客服中心
当前位置 : 主页>程序设计>delphi>列表

怎样让程序延时

来源：互联网 作者：西部数码 时间：2008-04-09
西部数码-全国虚拟主机10强！40余项虚拟主机管理功能,全国领先!双线多线虚拟主机南北访问畅通无阻!免费赠送企业邮局,.CN域名,自助建站480元起,免费试用7天,满意再付款! P4主机租用799元/月.月付免压金!

Q：怎样让程序延时

A：

procedure Delay(msecs:integer);

var
FirstTickCount:longint;

begin

FirstTickCount:=GetTickCount;
repeat
Application.ProcessMessages;
until ((GetTickCount-FirstTickCount) >= Longint(msecs));

end;

文章整理：西部数码--专业提供域名注册、虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢!

[打印] [关闭]
Google
相关文章
  • 设计模式、用Delphi描述--
  • Delphi2005学习笔记1
  • Delphi客户服务器应用开发（七）
  • TsncCurrency 货币编辑控件 V1.1
  • 实现自动赫夫曼编码的例子
  • 在标题栏画一个按钮的演示程序
  • Delphi中的类和对象
  • 命令行参数，程序参数
  • Octane和Delphi Q
  • 利用Windows消息获取Memo的行和
    • 热点关注
    IDC资讯 虚拟主机 域名注册 托管租用 vps主机 智能建站
    网站运营 建站经验 策划盈利 搜索优化 网站推广 免费资源
    网站联盟 联盟新闻 联盟介绍 联盟点评 网赚技巧
    行业资讯 业界动态 搜索引擎 网络游戏 门户动态 电子商务 广告传媒
    网络编程 Asp.Net编程 Asp编程 Php编程 Xml编程 Access Mssql Mysql 其它
    服务器技术 Web服务器 Ftp服务器 Mail服务器 Dns服务器 安全防护
    软件技巧 其它软件 Word Excel Powerpoint Ghost Vista QQ空间 QQ FlashGet 迅雷 Internet Explorer
    网页制作 FrontPages Dreamweaver Javascript css photoshop fireworks Flash
    程序设计 Java技术 C/C++ VB delphi
    网络知识 网络协议 网络安全 网络管理 组网方案 Cisco技术
    操作系统 Win2000 WinXP Win2003 Mac OS Linux FreeBSD
    返回首页 |关于我们 | 联系我们 | 付款方式 | 创业联盟 | 价格总览 | 资讯中心 | 友情链接 | 网站地图 | 招贤纳士 | RSS

    版权所有     西部数码(www.west263.com)
    CopyRight (c) 2002~2007 west263.com all right reserved.
    公司地址：四川成都市万和路90号天象大厦4楼　邮编：610031
    电话总机：028-86263408 86263960 86264018 86267838 86262244 86263408
    售前咨询：总机转201 202 203 204 205 206 207 208
    售后服务：总机转211 212 213 214 217 218 晚上0点以后拔分机225
    财务咨询：总机转224 223 传真：028-86264041 财务QQ：点击发送消息给对方635483282
    售前咨询QQ：点击发送消息给对方327314358 点击发送消息给对方241975952 点击发送消息给对方275026793 点击发送消息给对方408235859 点击发送消息给对方2182518 点击发送消息给对方499513144
    售后服务QQ：点击发送消息给对方634349278 点击发送消息给对方809071471 点击发送消息给对方307742704 点击发送消息给对方512359778 点击发送消息给对方287976517 点击发送消息给对方363783715     在线咨询
    《中华人民共和国增值电信业务经营许可证》编号：川B2-20030065号