这许可证是开玩笑的吧

流星暴雨 · 发表于 2019-4-9 00:34:31

重现代码
直接就崩掉了

窗口程序集名	保留	保留	备注
程序集1

子程序名	返回值类型	公开	备注
_启动子程序	整数型		本子程序在程序启动后最先执行

计次循环首 (100, )

线程_启动 (&子程序1, , )

计次循环尾 ()
调试输出 (1)
程序_延时 (1000000, )
返回 (0) ' 可以根据您的需要返回任意数值

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

线程_创建许可证 ()

i支持库列表	支持库注释
spec	特殊功能支持库

子程序名	返回值类型	公开	备注
线程_创建许可证	线程许可证		创建并返回一个进入许可证数值，此许可证值用作进入程序中的指定许可代码区，以避免多线程冲突

变量名	类型	静态	数组	备注
进入许可证	线程许可证

InitializeCriticalSection (进入许可证)
加入成员 (集_许可证数组, 进入许可证)
返回 (进入许可证)

hhh，无锁改变数组成员数，可真是个小天才

流星暴雨 · 发表于 2019-7-1 20:29:43

@项目部002 今天看你在精易模块发布贴at我来着，看看这个吧

萌菌团 · 发表于 2019-4-17 16:44:26

本帖最后由萌菌团于 2019-4-17 16:47 编辑

大概率直接崩溃了,不会输出over

子程序名	返回值类型	公开	备注
_启动子程序	整数型		本子程序在程序启动后最先执行

计次循环首 (1000, )

启动线程 (&子程序1, , )

计次循环尾 ()
调试输出 (“over”)
返回 (0) ' 可以根据您的需要返回任意数值

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

加入成员 (arr, 1)

这样就不会有问题

子程序名	返回值类型	公开	备注
_启动子程序	整数型		本子程序在程序启动后最先执行

a ＝创建进入许可证 ()

计次循环首 (1000, )

启动线程 (&子程序1, , )

计次循环尾 ()
调试输出 (“over”)
返回 (0) ' 可以根据您的需要返回任意数值

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

进入许可区 (a)
加入成员 (arr, 1)
退出许可区 (a)

萌菌团 · 发表于 2019-4-17 16:43:09

楼主说的是无锁改变临界资源的引发的问题.. 和许可证没啥关系, 楼上关注点都错了吧

yui1200 · 发表于 2019-4-9 10:56:02

先创建，进入-退出-销毁

yui1200 · 发表于 2019-4-9 10:55:17

方法不对！

回不到的过去 · 发表于 2019-4-9 10:14:04

没用过模块的许可证，好像不是这么用的吧
在启动窗口创建完成创建就可以了
在多线程中用相应的线程_进入许可区() 线程_退出许可区()

即使是官方的许可证也不能多线程重复创建，容易引起程序不稳定，还有就是不用了要删除许可证

		自动登录	找回密码
密码			注册

[BUG反馈] 这许可证是开玩笑的吧