易语言线程池类模块源码 [db:版本]

易语言线程池类模块源码

系统结构:启动线程池,提交任务,关闭线程池,线程,call,CreateIoCompletionPort,GetQueuedCompletionStatus,PostQueuedCompletionStatus,CreateThread,CloseHandle,SetEvent,WaitForSingleObject,ResetEvent,CreateEvent,Sleep,

======程序集1
| |
| |------ _启动子程序
| |
| |------ _临时子程序
| |
| |
======线程池
| |
| |------ _初始化
| |
| |------ _销毁
| |
| |------ 启动线程池
| |
| |------ 提交任务
| |
| |------ 关闭线程池
| |
| |
======程序集_线程池
| |
| |------ 线程
| |
| |------ call
| |
| |
======调用的Dll
| |
| |---[dll]------ CreateIoCompletionPort
| |
| |---[dll]------ GetQueuedCompletionStatus
| |
| |---[dll]------ PostQueuedCompletionStatus
| |
| |---[dll]------ CreateThread
| |
| |---[dll]------ CloseHandle
| |
| |---[dll]------ SetEvent
| |
| |---[dll]------ WaitForSingleObject
| |
| |---[dll]------ ResetEvent
| |
| |---[dll]------ CreateEvent
| |
| |---[dll]------ Sleep

调用的DLL命令:

.DLL命令 CreateIoCompletionPort, 整数型, , "CreateIoCompletionPort"
.参数 Handle, 整数型
.参数 ExistingCompletionPort, 整数型
.参数 CompletionKey, 整数型
.参数 NumberOfConcurrentThreads, 整数型

.DLL命令 GetQueuedCompletionStatus, 整数型, , "GetQueuedCompletionStatus"
.参数 CompletionPort, 整数型
.参数 lpNumberOfBytesTransferred, 整数型, 传址
.参数 lpCompletionKey, 整数型, 传址
.参数 lpOverlapped, 整数型, 传址
.参数 dwMilliseconds, 整数型

.DLL命令 PostQueuedCompletionStatus, 整数型, , "PostQueuedCompletionStatus"
.参数 CompletionPort, 整数型
.参数 dwNumberOfBytesTransferred, 整数型
.参数 dwCompletionKey, 整数型
.参数 lpOverlapped, 整数型

.DLL命令 CreateThread, 整数型
.参数 lpThreadAttributes, 整数型
.参数 dwStackSize, 整数型
.参数 lpStartAddress, 子程序指针
.参数 lpParameter, 整数型
.参数 dwCreationFlags, 整数型
.参数 lpThreadId, 整数型, 传址

.DLL命令 CloseHandle, 整数型, , "CloseHandle"
.参数 hObject, 整数型

.DLL命令 SetEvent, 整数型
.参数 hEvent, 整数型

.DLL命令 WaitForSingleObject, 整数型
.参数 hHandle, 整数型
.参数 dwMilliseconds, 整数型

.DLL命令 ResetEvent, 整数型
.参数 hEvent, 整数型

.DLL命令 CreateEvent, 整数型, , "CreateEventA"
.参数 lpEventAttributes, 整数型
.参数 bManualReset, 整数型
.参数 bInitialState, 整数型
.参数 lpNam, 文本型

.DLL命令 Sleep, 整数型, , "Sleep"
.参数 Time, 整数型