求多线程多个许可证 例子~

a395944065

比如 需要子程序1 单独一个线程  子程序2单独一个线程      

创建2个许可证 每个线程单独一个许可证

2个线程能同时运行互不影响。。

zqq68003002

许可证和你几个子程序没关系，只要操作公共的东西就要用许可证，
比如说你的2个子程序都需要操作一个程序集或者全局变量，那就要加许可证，不过一个足以了

被封禁言

多线程控制.rar (1.74 KB, 下载次数: 165)

2015-3-8 20:18 上传

点击文件名下载附件

a395944065

被封禁言 发表于 2015-3-8 20:18

亲你这个是一个许可证 线程需要排队的···仔细看我的要求··

helper

2个线程操作 不同的子程序 而且又用2个许可证  和没用许可证是一样的

杨子

既然只有2个线程 独立运行 还要许可证做什么?

狼啸天

.版本 2
.支持库 EThread

.程序集 窗口程序集1
.程序集变量 许可证1, 整数型
.程序集变量 许可证2, 整数型
.程序集变量 许可证3, 整数型

.子程序 _按钮1_被单击

许可证1 ＝ 创建进入许可证 ()
按钮1.禁止 ＝ 真
启动线程 (&循环, 许可证1)

.子程序 _按钮2_被单击

许可证2 ＝ 创建进入许可证 ()
按钮2.禁止 ＝ 真
启动线程 (&循环, 许可证2)

.子程序 _按钮3_被单击

许可证3 ＝ 创建进入许可证 ()
按钮3.禁止 ＝ 真
启动线程 (&循环, 许可证3)

.子程序 循环
.参数 许可证, 整数型
.局部变量 i, 整数型

进入许可区 (许可证)
.计次循环首 (100000, i)
    .判断开始 (许可证 ＝ 许可证1)
        标签1.标题 ＝ 到文本 (i)
    .判断 (许可证 ＝ 许可证2)
        标签2.标题 ＝ 到文本 (i)
    .判断 (许可证 ＝ 许可证3)
        标签3.标题 ＝ 到文本 (i)
    .默认

    .判断结束
    处理事件 ()
.计次循环尾 ()
退出许可区 (许可证)
删除进入许可证 (许可证)
.判断开始 (许可证 ＝ 许可证1)
    按钮1.禁止 ＝ 假
.判断 (许可证 ＝ 许可证2)
    按钮2.禁止 ＝ 假
.判断 (许可证 ＝ 许可证3)
    按钮3.禁止 ＝ 假
.默认

.判断结束

来自易语言资源网

a395944065

helper 发表于 2015-3-8 20:34
2个线程操作 不同的子程序 而且又用2个许可证  和没用许可证是一样的

我表达的不准确，，就是线程需要操作程序集的变量，，又需要能同时进行。。。

a395944065

zqq68003002 发表于 2015-3-8 20:57
许可证和你几个子程序没关系，只要操作公共的东西就要用许可证，
比如说你的2个子程序都需要操作一个程序 ...

我表达的不准确，，就是线程需要操作程序集的变量，，又需要能同时进行。。。互不影响

birdmanxp

楼主到底知不知道许可证是干嘛的？程序集的变量也是属于公共变量，但只在程序集内部共用，跟其他的程序集是互不相干的。你的两个线程如果分属不同的程序集的话，那个根本不需要许可证。如果两个线程是在同一个程序集的话必须使用同一个许可证才能确保程序集公共变量的安全。不管哪种情况两个许可证都是错误的。