发表回复

您的电子邮箱地址不会被公开。 必填项已用*标注

易语言倒计时源码

易语言倒计时源码,源码是易语言调用API函数的应用教程。

.版本 2 .子程序 _开始_被单击 ' 本源码来自三叶资源网(www.sanye.cx) 子程序_清理内存 () .如果 (总时间.内容 = “”) 总时间.内容 = “1” .否则 .如果结束 .如果 (开始.标题 = “B”) 起始X = 5 起始y = 5 数字宽度 = 到整数 (宽度编辑框.内容) 数字高度 = 到整数 (高度编辑框.内容) 数字厚度 = 到整数 (厚度编辑框.内容) 线条间隙 = 到整数 (间隙编辑框.内容) time = 到整数 (分钟.内容) × 60 + 到整数 (秒钟.内容) 总时间.内容 = 到文本 (time) isalarm = 真 isonce = 真 是否倒数 = 真 API_InitializeCriticalSection (多线程许可证) 载入 (窗口1, , 假) 绘图线程 = 0 时钟1 = 1 .判断循环首 (取反 (是否已创建 (窗口1))) .判断循环尾 () 子程序_绘图 (time) API_SetTimer (_启动窗口.取窗口句柄 (), 时钟1, 1000, &子程序_主时钟事件) 开始.标题 = “S” .否则 开始.标题 = “B” 暂停.标题 = “P” API_KillTimer (_启动窗口.取窗口句柄 (), 时钟1) 是否倒数 = 假 .如果真 (子程序_取线程状态 (绘图线程) = 2) 子程序_等待线程 (绘图线程, 1000) .如果真结束 ' API_TerminateThread (绘图线程, 0) .如果真 (子程序_取线程状态 (绘图线程) = 1) API_CloseHandle (绘图线程) .如果真结束 API_DeleteCriticalSection (多线程许可证) 窗口1.销毁 () .如果结束

易语言倒计时源码》有0个想法

发表回复

您的电子邮箱地址不会被公开。 必填项已用*标注