API许可证

凤凰小麻

  

DLL命令名	返回值类型	公开	备 注
API_启动线程	整数型		建立新的线索
DLL库文件名:
kernel32
在DLL库中对应命令名:
CreateThread
参数名	类 型	传址	数组	备 注
lpThreadAttributes	整数型			线程属性
dwStackSize	整数型			线程栈大小
lpStartAddress	子程序指针			子程序子针型
lpParameter	整数型			向线程传递的参数
dwCreationFlags	整数型			设置线程被创建后的状态,如果为0表示,创建后立即运行,如果为4,表示线程被创建后处于挂起状态。
lpThreadId	整数型			保存新线程的ID

DLL命令名	返回值类型	公开	备 注
API_关闭线程句柄	整数型		关闭一个内核对象。其中包括文件、文件映射、进程、线程、安全和同步对象等。涉及文件处理时，这个函数通常与vb的close命令相似。应尽可能的使用close，因为它支持vb的差错控制。注意这个函数使用的文件句柄与vb的文件编号是完全不同的  非零表示成功，零表示失败。会设置GetLastError
DLL库文件名:
kernel32
在DLL库中对应命令名:
CloseHandle
参数名	类 型	传址	数组	备 注
对象句柄	整数型			欲关闭的一个对象的句柄;

DLL命令名	返回值类型	公开	备 注
API_创建多线程许可证			初始化临界段对象
DLL库文件名:
kernel32
在DLL库中对应命令名:
InitializeCriticalSection
参数名	类 型	传址	数组	备 注
lpCriticalSection	多线程许可证

DLL命令名	返回值类型	公开	备 注
API_进入认可区			加入临界部分
DLL库文件名:
kernel32
在DLL库中对应命令名:
EnterCriticalSection
参数名	类 型	传址	数组	备 注
lpCriticalSection	多线程许可证

DLL命令名	返回值类型	公开	备 注
API_退出许可区			保留前一个输入临界段
DLL库文件名:
kernel32
在DLL库中对应命令名:
LeaveCriticalSection
参数名	类 型	传址	数组	备 注
lpCriticalSection	多线程许可证

DLL命令名	返回值类型	公开	备 注
API_删除许可证			删除临界部分
DLL库文件名:
kernel32
在DLL库中对应命令名:
DeleteCriticalSection
参数名	类 型	传址	数组	备 注
lpCriticalSection	多线程许可证

DLL命令名	返回值类型	公开	备 注
DLL命令1
DLL库文件名:
在DLL库中对应命令名:
DLL命令1
参数名	类 型	传址	数组	备 注

窗口程序集名	保 留	保 留	备 注
窗口程序集1
变量名	类 型	数组	备 注
线程	类_多线程
集_许可证句柄	多线程许可证
集_横	整数型
集_纵	整数型
集_开始	逻辑型

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

变量名	类 型	静态	数组	备 注
线程句柄	整数型
线程ID	整数型

集_许可证句柄 ＝ 线程.创建许可证 ()
置随机数种子 ()
调试输出 (集_许可证句柄)
线程ID ＝ 线程.创建线程 (&子程序_画板, , 线程句柄)
调试输出 (“线程ID为：” ＋ 到文本 (线程ID))
调试输出 (“线程句柄：” ＋ 到文本 (线程句柄))

子程序名	返回值类型	公开	备 注
子程序_画板

画板1.画笔颜色 ＝ 取颜色值 (取随机数 (0, 255), 取随机数 (0, 255), 取随机数 (0, 255))
画板1.刷子颜色 ＝ 取颜色值 (取随机数 (0, 255), 取随机数 (0, 255), 取随机数 (0, 255))
线程.进入许可区 (集_许可证句柄)
画板1.画椭圆 (取随机数 (0, 320), 取随机数 (0, 360), 取随机数 (0, 320), 取随机数 (0, 360))
线程.退出许可区 (集_许可证句柄)
延时 (200)
子程序_画板 ()

子程序名	返回值类型	公开	备 注
_画板1_鼠标左键被按下	逻辑型
参数名	类 型	参考	可空	数组	备 注
横向位置	整数型
纵向位置	整数型
功能键状态	整数型

线程.进入许可区 (集_许可证句柄)
集_开始 ＝ 真
集_横 ＝ 横向位置
集_纵 ＝ 纵向位置

子程序名	返回值类型	公开	备 注
_画板1_鼠标左键被放开	逻辑型
参数名	类 型	参考	可空	数组	备 注
横向位置	整数型
纵向位置	整数型
功能键状态	整数型

集_开始 ＝ 假
线程.退出许可区 (集_许可证句柄)

子程序名	返回值类型	公开	备 注
_画板1_鼠标位置被移动	逻辑型
参数名	类 型	参考	可空	数组	备 注
横向位置	整数型
纵向位置	整数型
功能键状态	整数型

如果真 (集_开始 ＝ 真)
画板1.画矩形 (集_横, 集_纵, 横向位置, 纵向位置)

子程序名	返回值类型	公开	备 注
__启动窗口_将被销毁

线程.删除许可证 (集_许可证句柄)

数据类型名	公开	备 注
多线程许可证
成员名	类 型	传址	数组	备 注
DebugInfo	整数型			调试信息
LockCount	整数型			锁定计数
RecursionCount	整数型			递归计数
OwningThread	整数型			拥有线程
LockSemaphore	整数型			锁定信号量
SpinCount	整数型			自旋计数

窗口程序集名	保 留	保 留	备 注
类_多线程, , 公开

子程序名	返回值类型	公开	备 注
_初始化			当基于本类的对象被创建后，此方法会被自动调用

子程序名	返回值类型	公开	备 注
_销毁			当基于本类的对象被销毁前，此方法会被自动调用

子程序名	返回值类型	公开	备 注
创建许可证	多线程许可证

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

API_创建多线程许可证 (许可证_d)
返回 (许可证_d)

子程序名	返回值类型	公开	备 注
创建线程	整数型		返回0代表未成功,如线程句柄为空则返回ID，否则返回线程句柄
参数名	类 型	参考	可空	数组	备 注
执行子程序	子程序指针
传递参数	整数型
线程句柄	整数型
立即运行	逻辑型

变量名	类 型	静态	数组	备 注
局_线程状态	整数型
局_线程ID	整数型
局_线程句柄	整数型

局_线程状态 ＝ 4
如果真 (立即运行 ＝ 真 或 是否为空 (立即运行) ＝ 真)
局_线程状态 ＝ 0
局_线程句柄 ＝ API_启动线程 (0, 0, 执行子程序, 传递参数, 局_线程状态, 局_线程ID)
如果真 (局_线程句柄 ＜ 1)
返回 (0)
如果 (是否为空 (线程句柄))
API_关闭线程句柄 (局_线程句柄)
线程句柄 ＝ 局_线程句柄
返回 (局_线程ID)

子程序名	返回值类型	公开	备 注
进入许可区
参数名	类 型	参考	可空	数组	备 注
许可证	多线程许可证

API_进入认可区 (许可证)

子程序名	返回值类型	公开	备 注
退出许可区
参数名	类 型	参考	可空	数组	备 注
许可证	多线程许可证

API_退出许可区 (许可证)

子程序名	返回值类型	公开	备 注
删除许可证
参数名	类 型	参考	可空	数组	备 注
许可证	多线程许可证

API_删除许可证 (许可证)

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

.版本 2<br /> <br /> .DLL命令 API_启动线程, 整数型, "kernel32", "CreateThread", , 建立新的线索<br />     .参数 lpThreadAttributes, 整数型, , 线程属性<br />     .参数 dwStackSize, 整数型, , 线程栈大小<br />     .参数 lpStartAddress, 子程序指针, , 子程序子针型<br />     .参数 lpParameter, 整数型, , 向线程传递的参数<br />     .参数 dwCreationFlags, 整数型, , 设置线程被创建后的状态,如果为0表示,创建后立即运行,如果为4,表示线程被创建后处于挂起状态。<br />     .参数 lpThreadId, 整数型, 传址, 保存新线程的ID<br /> <br /> .DLL命令 API_关闭线程句柄, 整数型, "kernel32", "CloseHandle", , 关闭一个内核对象。其中包括文件、文件映射、进程、线程、安全和同步对象等。涉及文件处理时，这个函数通常与vb的close命令相似。应尽可能的使用close，因为它支持vb的差错控制。注意这个函数使用的文件句柄与vb的文件编号是完全不同的  非零表示成功，零表示失败。会设置GetLastError<br />     .参数 对象句柄, 整数型, , 欲关闭的一个对象的句柄;<br /> <br /> .DLL命令 API_创建多线程许可证, , "kernel32", "InitializeCriticalSection", , 初始化临界段对象<br />     .参数 lpCriticalSection, 多线程许可证, 传址<br /> <br /> .DLL命令 API_进入认可区, , "kernel32", "EnterCriticalSection", 公开, 加入临界部分<br />     .参数 lpCriticalSection, 多线程许可证, 传址<br /> <br /> .DLL命令 API_退出许可区, , "kernel32", "LeaveCriticalSection", , 保留前一个输入临界段<br />     .参数 lpCriticalSection, 多线程许可证, 传址<br /> <br /> .DLL命令 API_删除许可证, , "kernel32", "DeleteCriticalSection", , 删除临界部分<br />     .参数 lpCriticalSection, 多线程许可证, 传址<br /> <br /> .DLL命令 DLL命令1<br /> .版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集1<br /> .程序集变量 线程, 类_多线程<br /> .程序集变量 集_许可证句柄, 多线程许可证<br /> .程序集变量 集_横, 整数型<br /> .程序集变量 集_纵, 整数型<br /> .程序集变量 集_开始, 逻辑型<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 线程句柄, 整数型<br /> .局部变量 线程ID, 整数型<br /> <br /> 集_许可证句柄 ＝ 线程.创建许可证 ()<br /> 置随机数种子 ()<br /> 调试输出 (集_许可证句柄)<br /> 线程ID ＝ 线程.创建线程 (&子程序_画板, , 线程句柄)<br /> 调试输出 (“线程ID为：” ＋ 到文本 (线程ID))<br /> 调试输出 (“线程句柄：” ＋ 到文本 (线程句柄))<br /> <br /> .子程序 子程序_画板<br /> <br /> 画板1.画笔颜色 ＝ 取颜色值 (取随机数 (0, 255), 取随机数 (0, 255), 取随机数 (0, 255))<br /> 画板1.刷子颜色 ＝ 取颜色值 (取随机数 (0, 255), 取随机数 (0, 255), 取随机数 (0, 255))<br /> 线程.进入许可区 (集_许可证句柄)<br /> 画板1.画椭圆 (取随机数 (0, 320), 取随机数 (0, 360), 取随机数 (0, 320), 取随机数 (0, 360))<br /> 线程.退出许可区 (集_许可证句柄)<br /> 延时 (200)<br /> 子程序_画板 ()<br /> <br /> <br /> .子程序 _画板1_鼠标左键被按下, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> <br /> 线程.进入许可区 (集_许可证句柄)<br /> 集_开始 ＝ 真<br /> 集_横 ＝ 横向位置<br /> 集_纵 ＝ 纵向位置<br /> <br /> <br /> .子程序 _画板1_鼠标左键被放开, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> <br /> 集_开始 ＝ 假<br /> 线程.退出许可区 (集_许可证句柄)<br /> <br /> <br /> .子程序 _画板1_鼠标位置被移动, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> <br /> .如果真 (集_开始 ＝ 真)<br />     画板1.画矩形 (集_横, 集_纵, 横向位置, 纵向位置)<br /> .如果真结束<br /> <br /> <br /> <br /> .子程序 __启动窗口_将被销毁<br /> <br /> 线程.删除许可证 (集_许可证句柄)<br /> .版本 2<br /> <br /> .数据类型 多线程许可证, 公开<br />     .成员 DebugInfo, 整数型, , , 调试信息<br />     .成员 LockCount, 整数型, , , 锁定计数<br />     .成员 RecursionCount, 整数型, , , 递归计数<br />     .成员 OwningThread, 整数型, , , 拥有线程<br />     .成员 LockSemaphore, 整数型, , , 锁定信号量<br />     .成员 SpinCount, 整数型, , , 自旋计数<br /> .版本 2<br /> <br /> .程序集 类_多线程, , 公开<br /> <br /> .子程序 _初始化, , , 当基于本类的对象被创建后，此方法会被自动调用<br /> <br /> <br /> <br /> .子程序 _销毁, , , 当基于本类的对象被销毁前，此方法会被自动调用<br /> <br /> <br /> <br /> .子程序 创建许可证, 多线程许可证, 公开<br /> .局部变量 许可证_d, 多线程许可证<br /> <br /> API_创建多线程许可证 (许可证_d)<br /> 返回 (许可证_d)<br /> <br /> <br /> .子程序 创建线程, 整数型, 公开, 返回0代表未成功,如线程句柄为空则返回ID，否则返回线程句柄<br /> .参数 执行子程序, 子程序指针<br /> .参数 传递参数, 整数型, 可空<br /> .参数 线程句柄, 整数型, 参考 可空<br /> .参数 立即运行, 逻辑型, 可空<br /> .局部变量 局_线程状态, 整数型<br /> .局部变量 局_线程ID, 整数型<br /> .局部变量 局_线程句柄, 整数型<br /> <br /> 局_线程状态 ＝ 4<br /> .如果真 (立即运行 ＝ 真 或 是否为空 (立即运行) ＝ 真)<br />     局_线程状态 ＝ 0<br /> .如果真结束<br /> 局_线程句柄 ＝ API_启动线程 (0, 0, 执行子程序, 传递参数, 局_线程状态, 局_线程ID)<br /> .如果真 (局_线程句柄 ＜ 1)<br />     返回 (0)<br /> .如果真结束<br /> .如果 (是否为空 (线程句柄))<br />     API_关闭线程句柄 (局_线程句柄)<br /> .否则<br />     线程句柄 ＝ 局_线程句柄<br /> .如果结束<br /> 返回 (局_线程ID)<br /> <br /> <br /> .子程序 进入许可区, , 公开<br /> .参数 许可证, 多线程许可证<br /> <br /> API_进入认可区 (许可证)<br /> <br /> .子程序 退出许可区, , 公开<br /> .参数 许可证, 多线程许可证<br /> <br /> API_退出许可区 (许可证)<br /> <br /> .子程序 删除许可证, , 公开<br /> .参数 许可证, 多线程许可证<br /> <br /> API_删除许可证 (许可证)

jingyizhanghao

666666666666666

yuan123

不错  ，以后不用模块了  ，支持！