许可证问题 有个小问题

你的套路我的心

子程序1
进入许可
-----
其他代码--很多其他子程序
---

退出许可


运行很多次子程序1
为什么会卡死呢





补充内容 (2020-6-7 16:21):
下面那张图放错了 第一张图为主

qianhuo

您好,你要用一个线程来启动        启动线程 (&子程序, , )   这样子就不会卡死了

你的套路我的心

qianhuo 发表于 2020-6-7 16:24
您好,你要用一个线程来启动        启动线程 (&子程序, , )   这样子就不会卡死了

  你好 启动线程 可以带参数吗  我子程序有参数的

qianhuo

你的套路我的心 发表于 2020-6-7 16:27
你好 启动线程 可以带参数吗  我子程序有参数的

可以带  整数型的  参数   复杂一点的 传文本型,数组之类的就要使用内存了

补充内容 (2020-6-7 16:38):
如果我的回答,帮助了你的话,请采纳

你的套路我的心

qianhuo 发表于 2020-6-7 16:30
可以带  整数型的  参数   复杂一点的 传文本型,数组之类的就要使用内存了

我的是文本行型的 {:3_41:}

无所谓的永久

可以用精易模块传文本参

qianhuo

你的套路我的心 发表于 2020-6-7 16:38
我的是文本行型的 {:3_41:}

这样的话,就要使用内存的方式来传递参数了

你的套路我的心

qianhuo 发表于 2020-6-7 16:40
这样的话,就要使用内存的方式来传递参数了

可以这样吗
加入许可证
启动线程 (&子程序, , )
退出许可证

qianhuo

你的套路我的心 发表于 2020-6-7 18:30
可以这样吗
加入许可证
启动线程 (&子程序, , )

不可以,,       启动线程(&子程序,,)   这个命令 一般在按钮点击下后触发的     许可证开开始   

补充内容 (2020-6-7 19:21):
许可证开开始
执行的代码
退出许可证   

补充内容 (2020-6-7 19:22):
许可证一般在子程序里上的

Sao熊

  

DLL命令名	返回值类型	公开	备 注
InitializeCriticalSection	整数型		初始化一个临界区对象
DLL库文件名:
kernel32.dll
在DLL库中对应命令名:
InitializeCriticalSection
参数名	类 型	传址	数组	备 注
lpCriticalSection	critical_section			指向一个 CRITICAL_SECTION 结构

DLL命令名	返回值类型	公开	备 注
CreateThread	整数型		创建一个新的线程，创建完毕会立即返回。成功则返回新线程的句柄，零表示失败
DLL库文件名:
kernel32.dll
在DLL库中对应命令名:
CreateThread
参数名	类 型	传址	数组	备 注
lpThreadAttributes	整数型			指向一个SECURITY_ATTRIBUTES结构,主要用来指定句柄是否可以被继承,如果让线程使用默认的安全属性,可以将此值设为 NULL
dwStackSize	整数型			线程堆栈大小,如果为0,那么线程的堆栈大小和主线程使用的大小相同
lpStartAddress	子程序指针			线程的开始执行地址,指向一个新线程函数(过程)的指针
lpParameter	整数型			传递给自定义参数,传递给子线程的参数,0为无限止
dwCreationFlags	整数型			设置线程被创建后的状态,如果为0表示,创建后立即运行,如果为CREATE_SUSPENDED标志,表示线程被创建后处于挂志状态,直到使用ResumeThread函数显式地启动线程为止
lpThreadId	整数型			指向一个双字节变量,用来接收函数返回的线程ID.线程ID在系统范围内是唯一的.

DLL命令名	返回值类型	公开	备 注
CloseHandle	逻辑型		关闭打开的对象句柄
DLL库文件名:
Kernel32
在DLL库中对应命令名:
CloseHandle
参数名	类 型	传址	数组	备 注
hObject	整数型			要关闭的对象句柄

DLL命令名	返回值类型	公开	备 注
EnterCriticalSection	整数型		进入一个临界区对象
DLL库文件名:
kernel32.dll
在DLL库中对应命令名:
EnterCriticalSection
参数名	类 型	传址	数组	备 注
lpCriticalSection	CRITICAL_SECTION			指向一个CRITICAL_SECTIONX结构

DLL命令名	返回值类型	公开	备 注
LeaveCriticalSection	整数型		退出一个临界区对象,可以看成是将标志从 不允许 改回 允许 状态.
DLL库文件名:
kernel32.dll
在DLL库中对应命令名:
LeaveCriticalSection
参数名	类 型	传址	数组	备 注
lpCriticalSection	CRITICAL_SECTION			指向一个CRITICAL_SECTIONX结构

.shuj类型 CRITICAL_SECTION, , 许可证类型结构

数据类型名	公开	备 注
(未定义数据类型名)
成员名	类 型	传址	数组	备 注
DebugInfo	整数型			0
LockCount	整数型			0
RecursionCount	整数型			0
OwningThread	整数型			0
LockSemaphore	整数型			0
SpinCount	整数型			0

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

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

InitializeCriticalSection (G_许可证)  ' 创建临界

子程序名	返回值类型	公开	备 注
_按钮1_被单击

CloseHandle (CreateThread (0, 0, &子程序1, 0, 0, 0))

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

EnterCriticalSection (G_许可证)  ' 进入临界
G_全局变量 ＝ “随便”
LeaveCriticalSection (G_许可证)  ' 离开临界

.版本 2<br /> <br /> .DLL命令 InitializeCriticalSection, 整数型, "kernel32.dll", "InitializeCriticalSection", , 初始化一个临界区对象<br />     .参数 lpCriticalSection, critical_section, 传址, 指向一个 CRITICAL_SECTION 结构<br /> <br /> .DLL命令 CreateThread, 整数型, "kernel32.dll", "CreateThread", , 创建一个新的线程，创建完毕会立即返回。成功则返回新线程的句柄，零表示失败<br />     .参数 lpThreadAttributes, 整数型, , 指向一个SECURITY_ATTRIBUTES结构,主要用来指定句柄是否可以被继承,如果让线程使用默认的安全属性,可以将此值设为 NULL<br />     .参数 dwStackSize, 整数型, , 线程堆栈大小,如果为0,那么线程的堆栈大小和主线程使用的大小相同<br />     .参数 lpStartAddress, 子程序指针, , 线程的开始执行地址,指向一个新线程函数(过程)的指针<br />     .参数 lpParameter, 整数型, , 传递给自定义参数,传递给子线程的参数,0为无限止<br />     .参数 dwCreationFlags, 整数型, , 设置线程被创建后的状态,如果为0表示,创建后立即运行,如果为CREATE_SUSPENDED标志,表示线程被创建后处于挂志状态,直到使用ResumeThread函数显式地启动线程为止<br />     .参数 lpThreadId, 整数型, , 指向一个双字节变量,用来接收函数返回的线程ID.线程ID在系统范围内是唯一的.<br /> <br /> .DLL命令 CloseHandle, 逻辑型, "Kernel32", "CloseHandle", , 关闭打开的对象句柄<br />     .参数 hObject, 整数型, , 要关闭的对象句柄<br /> <br /> .DLL命令 EnterCriticalSection, 整数型, "kernel32.dll", "EnterCriticalSection", , 进入一个临界区对象<br />     .参数 lpCriticalSection, CRITICAL_SECTION, 传址, 指向一个CRITICAL_SECTIONX结构<br /> <br /> .DLL命令 LeaveCriticalSection, 整数型, "kernel32.dll", "LeaveCriticalSection", , 退出一个临界区对象,可以看成是将标志从 不允许 改回 允许 状态.<br />     .参数 lpCriticalSection, CRITICAL_SECTION, 传址, 指向一个CRITICAL_SECTIONX结构<br /> .版本 2<br /> <br /> .shuj类型 CRITICAL_SECTION, , 许可证类型结构<br />     .成员 DebugInfo, 整数型, , , 0<br />     .成员 LockCount, 整数型, , , 0<br />     .成员 RecursionCount, 整数型, , , 0<br />     .成员 OwningThread, 整数型, , , 0<br />     .成员 LockSemaphore, 整数型, , , 0<br />     .成员 SpinCount, 整数型, , , 0<br /> .版本 2<br /> <br /> .程序集 窗口程序集_窗口1<br /> <br /> .子程序 _窗口1_创建完毕<br /> <br /> InitializeCriticalSection (G_许可证)  ' 创建临界<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> CloseHandle (CreateThread (0, 0, &子程序1, 0, 0, 0))<br /> <br /> .子程序 子程序1<br /> <br /> EnterCriticalSection (G_许可证)  ' 进入临界<br /> G_全局变量 ＝ “随便”<br /> LeaveCriticalSection (G_许可证)  ' 离开临界

补充内容 (2020-6-8 00:06):

-信 念。 发表于 2020-6-8 00:04
[e=1].版本 2

.DLL命令 InitializeCriticalSection, 整数型, "kernel32.dll", "InitializeCriticalSecti ...

精易这个代码框有点BUG 补充一下 按个未定义shuj类型是CRITICAL_S...