易语言Queue队列源码

系统结构:Test,Init,Count,IsEmpty,Clear,PopBin,PopBool,PopInt,PopStr,PushBin,PushBool,PushInt,PushStr,CoInitialize,CoUninitialize,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ Test
           |  |
           |  |
======窗口程序集1
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |
======_Queue
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ Init
           |  |
           |  |------ Count
           |  |
           |  |------ IsEmpty
           |  |
           |  |------ Clear
           |  |
           |  |------ PopBin
           |  |
           |  |------ PopBool
           |  |
           |  |------ PopInt
           |  |
           |  |------ PopStr
           |  |
           |  |------ PushBin
           |  |
           |  |------ PushBool
           |  |
           |  |------ PushInt
           |  |
           |  |------ PushStr
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   CoInitialize
           |  |
           |  |---[dll]------   CoUninitialize

调用的DLL命令:

.DLL命令 CoInitialize, 整数型, "ole32.dll", "CoInitialize", , 初始化对象开始
    .参数 pvReserved, 整数型, , 值为0

.DLL命令 CoUninitialize, 整数型, "ole32.dll", "CoUninitialize", , 初始化对象结束