| 窗口程序集名 | 保 留 | 保 留 | 备 注 |
| 窗口程序集_启动窗口 | |||
| 变量名 | 类 型 | 数组 | 备 注 |
| g_static_critical | 线程许可证 | ||
| g_data | 整数型 | 0 | 可以使用自定义数据类型 |
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||
| __启动窗口_创建完毕 | |||||
InitializeCriticalSection (g_static_critical)
' //启动工作线程，一般情况下启动数量为CPU支持的线程数 *2
计次循环首 (10, )
启动线程 (&WorkerThread, , )
计次循环尾 ()| 子程序名 | 返回值类型 | 公开 | 备 注 | ||
| WorkerThread | 工作线程 | ||||
| 变量名 | 类 型 | 静态 | 数组 | 备 注 | ||
| i | 整数型 | |||||
| m_data | 整数型 | |||||
判断循环首 (真)EnterCriticalSection (g_static_critical) ' //进入临界区
如果 (取数组成员数 (g_data) ＞ 0)m_data ＝ g_data [1]删除成员 (g_data, 1, 1)LeaveCriticalSection (g_static_critical) ' //退出临界区 ' //处理相关数据调试输出 (m_data)
LeaveCriticalSection (g_static_critical) ' //退出临界区
Sleep (10) ' //无任务待命
判断循环尾 ()| 子程序名 | 返回值类型 | 公开 | 备 注 | ||
| _按钮1_被单击 | 拟投递一个任务 | ||||
| 变量名 | 类 型 | 静态 | 数组 | 备 注 | ||
| i | 整数型 | |||||
i ＝ i ＋ 1
加入成员 (g_data, i)
LeaveCriticalSection (g_static_critical) ' //退出临界区
| i支持库列表 | 支持库注释 |
| EThread | 多线程支持库 |
| spec | 特殊功能支持库 |
