易语言类方法创建线程源码

系统结构:ddd,取当前类指针,取方法指针,创建线程,线程接口,创建循环线程,关闭循环线程,取循环线程空闲索引,循环线程接口,线程_创建线程,线程_等待执行完毕,线程_线程结束,操作_取字节集指针,调用_CALL,转换_十六转十,转换_十转十六,线程_取当前线程ID,转换_字节集到整数,本地内存_读整数型,本地内存_拷贝内存,本地内存_读字节集,本地内存_写字节集,本地内存_写整数型,TerminateThread,CreateThread,WaitForSingleObject,CloseHandle,GetCurrentThreadId,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |
======测试类
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ ddd
           |  |
           |  |
======草帽基类
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ 取当前类指针
           |  |
           |  |------ 取方法指针
           |  |
           |  |------ 创建线程
           |  |
           |  |------ 线程接口
           |  |
           |  |------ 创建循环线程
           |  |
           |  |------ 关闭循环线程
           |  |
           |  |------ 取循环线程空闲索引
           |  |
           |  |------ 循环线程接口
           |  |
           |  |
======程序集1
           |  |
           |  |------ 线程_创建线程
           |  |
           |  |------ 线程_等待执行完毕
           |  |
           |  |------ 线程_线程结束
           |  |
           |  |------ 操作_取字节集指针
           |  |
           |  |------ 调用_CALL
           |  |
           |  |------ 转换_十六转十
           |  |
           |  |------ 转换_十转十六
           |  |
           |  |------ _取十六进制文本
           |  |
           |  |------ 线程_取当前线程ID
           |  |
           |  |------ 转换_字节集到整数
           |  |
           |  |
======程序集2
           |  |
           |  |------ 本地内存_读整数型
           |  |
           |  |------ 本地内存_拷贝内存
           |  |
           |  |------ 本地内存_读字节集
           |  |
           |  |------ 本地内存_写字节集
           |  |
           |  |------ 本地内存_写整数型
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   TerminateThread
           |  |
           |  |---[dll]------   CreateThread
           |  |
           |  |---[dll]------   WaitForSingleObject
           |  |
           |  |---[dll]------   CloseHandle
           |  |
           |  |---[dll]------   GetCurrentThreadId

调用的DLL命令:

.DLL命令 TerminateThread, 逻辑型, , , 公开
    .参数 hThread, 整数型
    .参数 dwExitCode, 整数型

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

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

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

.DLL命令 GetCurrentThreadId, 整数型, "kernel32.dll", "GetCurrentThreadId"