Question

易语言制作的窗口程序怎样按一个按钮进度条就启动

Answer 1

我帮你做了一个源码，基本达到你的要求。原理是插入一个透明标签，设置透明标签的标题，刚启动时透明标签的标题是0，再插入时钟1组件，设置时钟1_周期事件，如果透明标签的标题是0就在0的基础上+5，关闭程序时写配置项透明标签的标题，这时保存到配置项里的透明标签的标题 = 5，下次启动程序时读配置项，透明标签的标题 = 5，进度条也进度到5％，然后时钟1_时钟周期 = 0，进度条就会停在5％的地方，如果再关闭程序写配置项透明标签的标题 5 再加上 5 ，配置项里面的数据就,5+5=10，
下次启动透明标签的标题就是10。如此循环，进度条也跟着配置项的数据在动。下面是代码，你可以参考一下。如果你复制代码要注意，因为有不少如果（），复制的时候很容易出错的。你可以把电子邮箱写上，我把源码给你发过去。

代码如下：我这代码里面有透明标签1，那是设置 ％ 的，你可以去除不用。当然如果你不想透明标签2让人看见，可以在子程序 __启动窗口_创建完毕设置为 透明标签2.可视=假

.版本 2
.支持库 iext

.程序集 窗口程序集1
.程序集变量 w, 文本型

.子程序 _时钟1_周期事件

透明标签2.标题 ＝ 到文本 (进度条1.位置)
.如果 (进度条1.位置 ＝ 到数值 (w))
时钟1.时钟周期 ＝ 0
.如果 (透明标签2.标题 ≠ “100”)
透明标签2.标题 ＝ 到文本 (到数值 (透明标签2.标题) ＋ 5)
.否则

.如果结束

.否则

.如果结束
.如果 (进度条1.位置 ＝ 100)
时钟1.时钟周期 ＝ 0
.否则
.如果 (进度条1.位置 ≠ 100)
进度条1.位置 ＝ 进度条1.位置 ＋ 1
.否则

.如果结束

.如果结束

.子程序 __启动窗口_创建完毕

.如果 (透明标签2.标题 ＝ “0”)
透明标签2.标题 ＝ “5”
.否则

.如果结束
时钟1.时钟周期 ＝ 25
w ＝ 到文本 (读配置项 (取运行目录 () ＋ “\配置.ini”, “程序配置”, “编号”, ))

.子程序 __启动窗口_可否被关闭, 逻辑型

写配置项 (取运行目录 () ＋ “\配置.ini”, “程序配置”, “编号”, 透明标签2.标题) tāi蕤т▇m〕i蕤т▇u帧b￥ob￥vxㄨ，
你可以试下

记录下上网时间

2011-8-10 16:25:59