IT天空

 找回密码
 加入我们

手机号码,快捷登录

搜索

[分享] 倒计时安装程序 带进度条

  [复制链接]
w452898170 发表于 2018-6-4 21:12:39 | 显示全部楼层

活跃 291| 技术 0| 互助 0| 钻石 0

binghun186 发表于 2018-9-2 11:58:59 | 显示全部楼层

活跃 317| 技术 0| 互助 0| 钻石 0

谢谢,收藏了
zpmc123 发表于 2018-9-4 10:45:31 | 显示全部楼层

活跃 173| 技术 0| 互助 0| 钻石 0

效果不错!学习一下,下载备用
fyq 发表于 2018-9-4 13:50:32 | 显示全部楼层

活跃 20629| 技术 3| 互助 3| 钻石 0

学习学习,谢谢楼主
2969634951 发表于 2018-9-9 20:00:20 | 显示全部楼层

活跃 31| 技术 0| 互助 0| 钻石 0

可以更换安装应用吗
影子妖精 发表于 2018-9-12 23:17:48 | 显示全部楼层

活跃 186| 技术 0| 互助 0| 钻石 0

来看一下
深究到底的菜鸟 发表于 2018-9-13 10:09:30 | 显示全部楼层

活跃 1303| 技术 0| 互助 0| 钻石 0

好东西,支持一下。
deanbao 发表于 2018-9-16 18:43:59 | 显示全部楼层

活跃 15| 技术 0| 互助 0| 钻石 0

非常感谢分享
lrb5233961 发表于 2018-10-4 00:26:39 来自手机 | 显示全部楼层

活跃 33| 技术 0| 互助 0| 钻石 0

好东西学习了
x354512049 发表于 2018-10-5 01:22:14 | 显示全部楼层

活跃 14| 技术 0| 互助 0| 钻石 0

看看有没有我写的好
12407470 发表于 2018-10-5 21:57:03 | 显示全部楼层

活跃 48| 技术 0| 互助 0| 钻石 0

wszycg 发表于 2018-10-6 00:08:50 | 显示全部楼层

活跃 218| 技术 0| 互助 0| 钻石 0

厉害啊 我的楼主
MC_SHD1 发表于 2019-1-6 22:08:04 | 显示全部楼层

活跃 112| 技术 0| 互助 0| 钻石 0

来学习了~
颜色丶小楠 发表于 2019-2-7 18:44:57 | 显示全部楼层

活跃 1379| 技术 0| 互助 0| 钻石 0

学习一下            
gzh888666 发表于 2019-2-8 21:50:40 | 显示全部楼层

活跃 2602| 技术 0| 互助 0| 钻石 0

什么东东,静默参数安装
gzh888666 发表于 2019-2-8 21:54:05 | 显示全部楼层

活跃 2602| 技术 0| 互助 0| 钻石 0

没有安装源码呀!只是一个图形#NoTrayIcon #include <ButtonConstants.au3> #include <StaticConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3>  Global $time = 30 ;倒计时时间  单位为秒 #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("安全套装选择", 410, 370, -1, -1, BitOR($WS_MINIMIZEBOX, $WS_GROUP)) $Group1 = GUICtrlCreateGroup("", 6, 2, 393, 337) $Label1 = GUICtrlCreateLabel("温馨提示:系统将在30秒后默认选择360安全套餐", 23, 274, 368, 22) GUICtrlSetFont(-1, 12, 400, 0, "Verdana") $Icon1 = GUICtrlCreateIcon("D:\小工具\2.ico", -1, 50, 80, 128, 128) $Icon2 = GUICtrlCreateIcon("D:\小工具\1.ico", -1, 233, 79, 128, 128) $Label2 = GUICtrlCreateLabel("360安全套装", 60, 224, 98, 22) GUICtrlSetFont(-1, 12, 400, 0, "Verdana") $Label3 = GUICtrlCreateLabel("QQ管家安全套装", 229, 222, 126, 22) GUICtrlSetFont(-1, 12, 400, 0, "Verdana") GUICtrlCreateGroup("", -99, -99, 1, 1) $Progress1 = GUICtrlCreateProgress(16, 304, 369, 25) GUICtrlCreateGroup("", -99, -99, 1, 1) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ###  AdlibRegister("_timer", 1000)  While 1         $nMsg = GUIGetMsg()         Switch $nMsg                 Case $GUI_EVENT_CLOSE                         Exit          EndSwitch         If $time <= 0 Then ExitLoop WEnd  ok()  Func _timer()         $time -= 1         GUICtrlSetData($Label1,"温馨提示:系统将在"&$time&"秒后默认选择360安全套餐")                  GUICtrlSetData($Progress1, (30 - $time) / 0.3)         If $time <= 0 Then AdlibUnRegister()          EndFunc   ;==>_timer  Func ok()         ShellExecute("notepad.exe") EndFunc
lianglhm36 发表于 2019-2-10 23:32:33 | 显示全部楼层

活跃 1402| 技术 0| 互助 0| 钻石 0


全家桶啊

点评

只是写一个案例给你们看而已。。。。  详情 回复 发表于 2019-2-11 15:55
 楼主| yuhomesheng 发表于 2019-2-11 15:55:43 | 显示全部楼层

活跃 8510| 技术 47| 互助 66| 钻石 20


只是写一个案例给你们看而已。。。。
kuailetiande 发表于 2019-4-24 09:08:57 | 显示全部楼层

活跃 6891| 技术 0| 互助 0| 钻石 0

学习下知识
18960601773 发表于 2019-4-24 22:45:56 | 显示全部楼层

活跃 25448| 技术 0| 互助 0| 钻石 50

看看怎么安装全家桶。。。哈哈
您需要登录后才可以回帖 登录 | 加入我们

本版积分规则

签到任务
最火的业界新闻
  • 微软介绍两款4G LTE教育PC:采用骁龙7c平台
  • [图]华为P40 Pro高清渲染图再曝光:将效仿G
  • 报告:抖音海外版TikTok去年营收1.77亿美元
  • [图]Windows 10 Build 19546发布:计算器引
  • 解决 Chromium Microsoft Edge 以错误语言
  • [图]学习代数新方式:Windows计算器即将上
  • 中国互联网竞相发红包抢用户 有多少能留下
  • 微软计划通过Windows Update推广Chromium E
  • 这些第三方软件居然可以删除我的微信好友?
  • 今日头条2019手机行业白皮书:华为手机成最
炫酷的硬件Show
  • 振华SUPER FLOWER 铜皇450W 铜牌电源
  • 比小更小,Mini-STX装机
  • 华擎X99E-ITX + 银欣ML06 装机记
  • 最强双路泰坦硬管水冷 制作流程
  • 银欣FT02,双路E5工作站
  • 迟到的定制机箱小钢炮清理灰尘
  • 乔思伯UMX1 Plus,小巧的家用综合主机
  • 分体水冷第二弹-Inwin 805 infinity
  • 第一次DIY硬管水冷~~
  • 樱桃MX6.0 青轴 机械键盘 开箱
有趣的美图分享
  • 搞学问的,就必须要严谨
  • 怎么赔
  • 我想玩我的世界
  • 是真的狠
  • 强迫锻炼
  • 保护费
  • 卖家秀与买家秀
  • 非常形象了
  • 老婆因为这个背景墙跟我大吵了一架
  • 我对继母的印象
关注官方微信
快速回复 返回顶部 返回列表