易语言系统服务程序源码

系统结构:ServiceMain,SvcCtrlHandler,ReportSvcStatus,StartServiceCtrlDispatcher,RegisterServiceCtrlHandler,SetServiceStatus,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ ServiceMain
           |  |
           |  |------ SvcCtrlHandler
           |  |
           |  |------ ReportSvcStatus
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   StartServiceCtrlDispatcher
           |  |
           |  |---[dll]------   RegisterServiceCtrlHandler
           |  |
           |  |---[dll]------   SetServiceStatus

调用的DLL命令:

.DLL命令 StartServiceCtrlDispatcher, 整数型, "Advapi32.dll", "StartServiceCtrlDispatcherA"
    .参数 lpServiceTable, SERVICE_TABLE_ENTRY, 数组

.DLL命令 RegisterServiceCtrlHandler, 整数型, "Advapi32.dll", "RegisterServiceCtrlHandlerA"
    .参数 lpServiceName, 整数型
    .参数 lpHandlerProc, 整数型

.DLL命令 SetServiceStatus, 整数型, "Advapi32.dll", "SetServiceStatus"
    .参数 hServiceStatus, 整数型
    .参数 lpServiceStatus, SERVICE_STATUS