精易论坛

标题: 【纯源码无模块】经典线程同步 信号量Semaphore [打印本页]

---

作者: 执着    时间: 2013-5-9 12:05
标题: 【纯源码无模块】经典线程同步 信号量Semaphore


经典线程同步，信号量的使用实例！ 经典线程同步 信号量Semaphore.rar (34.63 KB, 下载次数: 485)

2013-5-9 12:04 上传

点击文件名下载附件
下载积分: 精币 -2 枚

此源码在许可证方面有问题！大家注意下！去掉许可证可以正常运行的！加上就不行！


PS：
  目前这个问题已经完美解决了！
  
  小米云编程交流群：160070938  多线程 POST 网络 欢迎你的加入！

---

作者: 执着    时间: 2013-5-9 12:05
自己的沙发！

---

作者: 宇智波·晓易    时间: 2013-5-9 12:06
前来学习。

---

作者: 网络注册会员    时间: 2013-5-9 12:07
顶一下看看

---

作者: scqandcy    时间: 2013-5-9 12:08
我来顶顶。。。高手就是不同凡响

---

作者: fengyewl    时间: 2013-5-9 12:08
卡卡卡

---

作者: taozi520    时间: 2013-5-9 12:42
来看看。

---

作者: 黑色衬衣    时间: 2013-5-9 12:57
这个是什么啊 什么都没~晕死

---

作者: beyondyjx    时间: 2013-5-9 13:51
看看

---

作者: tcz918    时间: 2013-5-9 19:36
和前面那个有什么区别啊

---

作者: 易之天玄    时间: 2013-5-9 22:23
谢谢了！留下记号吧！

---

作者: daiqu    时间: 2013-5-10 18:54
好东西  拿走了

---

作者: sgk324    时间: 2013-5-13 10:44
东西不错，收藏了，谢谢！

---

作者: ♂乱步    时间: 2013-5-13 13:05
没下载点了..................

---

作者: 奋斗的叶子    时间: 2013-5-13 14:56
线程不错.下来看啊看学习

---

作者: 爱过你的傻瓜    时间: 2013-5-13 19:19
不错啊，顶了。。。

---

作者: Lynx    时间: 2013-5-15 20:39
正在学习多线程

---

作者: 宇智波·佐助    时间: 2013-5-17 10:13
你量很大啊

---

作者: yonzon    时间: 2013-5-24 04:14
正在学习多线程。

---

作者: 半睡半醒    时间: 2013-6-17 16:39
修正bug后 还能来声明一下   不错的！

---

作者: 散落的记忆    时间: 2013-6-17 16:58
好东西  拿走了

---

作者: 源源不断啦啦啦    时间: 2013-6-29 11:22
好东西 拿下了

---

作者: 抉择    时间: 2013-6-29 11:32
表示不懂，留着以后学习

---

作者: bmoay    时间: 2013-7-22 14:17
这个可以有，感谢分享····

---

作者: bmoay    时间: 2013-7-30 10:58
下载了············

---

作者: 250302716    时间: 2013-8-4 16:26
正在学习多线程

---

作者: helper    时间: 2013-11-28 04:47
学习一下

---

作者: xjb110    时间: 2014-5-19 14:03
谢谢楼主分享!!!!

---

作者: packy2013    时间: 2014-5-23 02:33
目前这个问题已经完美解决了！

---

作者: glgg    时间: 2014-6-25 00:31


不错给力，线程同步了，只有一个线程可以修改变量。。。感觉比用许可证爽些

  

窗口程序集名	保 留	保 留	备 注
窗口程序集1
变量名	类 型	数组	备 注
ThreadParameter	整数型
LicId	整数型
Num	整数型
handle	整数型	10
ThreadNum	整数型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

Main ()

子程序名	返回值类型	公开	备 注
Main

变量名	类 型	静态	数组	备 注
threadid	整数型
id	整数型
I	整数型

重定义数组 (handle, 假, 10)
WriteLog (“ ”)
WriteLog (“ 经典线程同步 信号量Semaphore ”)
WriteLog (“ By 小米Cod http://125.confly.eu.org ”)
WriteLog (“ ”)
ThreadParameter ＝ CreateSemaphoreA (0, 0, 1, “xmiyun”)
' InitializeCriticalSection (LicId)
Num ＝ 0
判断循环首 (ThreadNum ＜ 10)
threadid ＝ CreateThread (0, 0, 到整数 (&Fun), ThreadNum, 0, id)
加入成员 (handle, threadid)
CloseHandle (threadid)
' 延时 (100)
WaitForSingleObject (ThreadParameter, -1)
ThreadNum ＝ ThreadNum ＋ 1
判断循环尾 ()
MsgWaitForMultipleObjects (10, handle, 真, -1, 0)
CloseHandle (ThreadParameter)

子程序名	返回值类型	公开	备 注
Fun
参数名	类 型	参考	可空	数组	备 注
id	整数型

ReleaseSemaphore (ThreadParameter, 1, 0)
Num ＝ Num ＋ 1
WriteLog (“线程编号：” ＋ 到文本 (id) ＋ “ 全局资源Num值：” ＋ 到文本 (Num))

子程序名	返回值类型	公开	备 注
WriteLog			写日志
参数名	类 型	参考	可空	数组	备 注
txt	文本型

编辑框_log.加入文本 (txt ＋ #换行符 )

.版本 2<br /> <br /> .程序集 窗口程序集1<br /> .程序集变量 ThreadParameter, 整数型<br /> .程序集变量 LicId, 整数型<br /> .程序集变量 Num, 整数型<br /> .程序集变量 handle, 整数型, , "10"<br /> .程序集变量 ThreadNum, 整数型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> Main ()<br /> <br /> .子程序 Main<br /> .局部变量 threadid, 整数型<br /> .局部变量 id, 整数型<br /> .局部变量 I, 整数型<br /> <br /> 重定义数组 (handle, 假, 10)<br /> WriteLog (“ ”)<br /> WriteLog (“ 经典线程同步 信号量Semaphore ”)<br /> WriteLog (“ By 小米Cod <a href="http://125.confly.eu.org/" target="_blank">http://125.confly.eu.org</a> ”)<br /> WriteLog (“ ”)<br /> ThreadParameter ＝ CreateSemaphoreA (0, 0, 1, “xmiyun”)<br /> ' InitializeCriticalSection (LicId)<br /> Num ＝ 0<br /> .判断循环首 (ThreadNum ＜ 10)<br /> threadid ＝ CreateThread (0, 0, 到整数 (&Fun), ThreadNum, 0, id)<br /> 加入成员 (handle, threadid)<br /> CloseHandle (threadid)<br /> ' 延时 (100)<br /> WaitForSingleObject (ThreadParameter, -1)<br /> ThreadNum ＝ ThreadNum ＋ 1<br /> .判断循环尾 ()<br /> MsgWaitForMultipleObjects (10, handle, 真, -1, 0)<br /> CloseHandle (ThreadParameter)<br /> <br /> .子程序 Fun<br /> .参数 id, 整数型<br /> <br /> ReleaseSemaphore (ThreadParameter, 1, 0)<br /> Num ＝ Num ＋ 1<br /> WriteLog (“线程编号：” ＋ 到文本 (id) ＋ “ 全局资源Num值：” ＋ 到文本 (Num))<br /> <br /> .子程序 WriteLog, , , 写日志<br /> .参数 txt, 文本型<br /> <br /> 编辑框_log.加入文本 (txt ＋ #换行符)

---

作者: biody    时间: 2015-1-2 16:44
下载来学习！

---

作者: lantiansky    时间: 2015-3-15 17:14
收藏先，经典

---

作者: zyb6860    时间: 2015-11-4 08:48
谢谢楼主分享!!!!

---

作者: 1991664517    时间: 2016-3-21 16:57
谢谢楼主分享!!!!

---

作者: 专治TB异常    时间: 2016-4-21 03:09
家注意下！去掉许可证可以正常运行的！加上就不行！

---

作者: hackergg    时间: 2017-11-4 20:35
线程同步

---

作者: 调皮的男孩    时间: 2017-11-5 00:52
哈哈哈学习一下

---

作者: 风语如歌    时间: 2019-4-18 17:24
66666666666666666666666

---

作者: 蒙顺童    时间: 2022-9-7 20:16
程序_延时 (1, 1)

---

作者: yuzhong3    时间: 2025-6-17 12:29
111111111111111111111111

---

欢迎光临 精易论坛 (https://125.confly.eu.org/)

Powered by Discuz! X3.4