易语言WIN32程序设计之多线程源码

系统结构:ThreadFunc,GetModuleHandle,DialogBoxParam,ExitProcess,EndDialog,CreateThread,CloseHandle,GetDlgItem,SetWindowText,EnableWindow,SetDlgItemInt,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ _ProcWin
           |  |
           |  |------ ThreadFunc
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   GetModuleHandle
           |  |
           |  |---[dll]------   DialogBoxParam
           |  |
           |  |---[dll]------   ExitProcess
           |  |
           |  |---[dll]------   EndDialog
           |  |
           |  |---[dll]------   CreateThread
           |  |
           |  |---[dll]------   CloseHandle
           |  |
           |  |---[dll]------   GetDlgItem
           |  |
           |  |---[dll]------   SetWindowText
           |  |
           |  |---[dll]------   EnableWindow
           |  |
           |  |---[dll]------   SetDlgItemInt

调用的DLL命令:

.DLL命令 GetModuleHandle, 整数型, , "GetModuleHandleA"
    .参数 lpModuleName, 整数型

.DLL命令 DialogBoxParam, 整数型, , "DialogBoxParamA"
    .参数 hInstance, 整数型
    .参数 pTemplate, 整数型
    .参数 hOwner, 整数型
    .参数 DlgProc, 整数型
    .参数 lParam, 整数型

.DLL命令 ExitProcess, 整数型, , "ExitProcess"
    .参数 nExitCode, 整数型

.DLL命令 EndDialog, 整数型, , "EndDialog"
    .参数 hWnd, 整数型
    .参数 nRetul, 整数型

.DLL命令 CreateThread, 整数型, , "CreateThread"
    .参数 pSecurity, 整数型
    .参数 StackSize, 整数型
    .参数 ThreadFunction, 整数型
    .参数 pThreadParam, 整数型
    .参数 CreationFlags, 整数型
    .参数 pThreadId, 整数型

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

.DLL命令 GetDlgItem, 整数型, , "GetDlgItem"
    .参数 hWnd, 整数型
    .参数 ControlID, 整数型

.DLL命令 SetWindowText, 整数型, , "SetWindowTextA"
    .参数 hWnd, 整数型
    .参数 Text, 文本型

.DLL命令 EnableWindow, 整数型, , "EnableWindow"
    .参数 hWnd, 整数型
    .参数 Enable, 逻辑型

.DLL命令 SetDlgItemInt, 整数型, , "SetDlgItemInt"
    .参数 hWnd, 整数型
    .参数 ControlID, 整数型
    .参数 Value, 整数型
    .参数 IsSigned, 逻辑型