易语言系统服务管理器源码

系统结构:状态,操作系统服务,API_取Window和DOS版本扩展,API_OpenSCManager,API_EnumServicesStatusEx,RtlMoveMemory,API_OpenService,API_QueryServiceStatus,API_ControlService,API_StartService,API_QueryServiceStatusEx,API_DeleteService,API_CloseServiceHandle,

======启动窗口程序集
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 状态
           |  |
           |  |------ _超级列表框1_被双击
           |  |
           |  |------ __启动窗口_尺寸被改变
           |  |
           |  |------ _超级列表框1_当前表项被改变
           |  |
           |  |------ _超级列表框1_右键单击表项
           |  |
           |  |------ _启动_被选择
           |  |
           |  |------ _停止_被选择
           |  |
           |  |------ _暂停_被选择
           |  |
           |  |------ _恢复_被选择
           |  |
           |  |------ _重新启动_被选择
           |  |
           |  |------ _删除_被选择
           |  |
           |  |------ _属性_被选择
           |  |
           |  |------ _刷新_被选择
           |  |
           |  |------ 操作系统服务
           |  |
           |  |
======查看服务窗口程序集
           |  |
           |  |------ _查看服务_创建完毕
           |  |
           |  |------ _超级按钮5_被单击
           |  |
           |  |------ _超级按钮6_被单击
           |  |
           |  |------ _超级按钮1_被单击
           |  |
           |  |------ _超级按钮2_被单击
           |  |
           |  |------ _时钟1_周期事件
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   API_取Window和DOS版本扩展
           |  |
           |  |---[dll]------   API_OpenSCManager
           |  |
           |  |---[dll]------   API_EnumServicesStatusEx
           |  |
           |  |---[dll]------   RtlMoveMemory
           |  |
           |  |---[dll]------   API_OpenService
           |  |
           |  |---[dll]------   API_QueryServiceStatus
           |  |
           |  |---[dll]------   API_ControlService
           |  |
           |  |---[dll]------   API_StartService
           |  |
           |  |---[dll]------   API_QueryServiceStatusEx
           |  |
           |  |---[dll]------   API_DeleteService
           |  |
           |  |---[dll]------   API_CloseServiceHandle

调用的DLL命令:

.DLL命令 API_取Window和DOS版本扩展, 整数型, , "GetVersionExA", , 在一个OSVERSIONINFO结构中载入与平台和操作系统有关的版本信息  非零表示成功，零表示失败
    .参数 版本, OSVERSIONINFO, , OSVERSIONINFO，用于装载版本信息的结构。在正式调用函数之前，必须先将这个结构的dwOSVersionInfoSize字段设为结构的大小（148）;

.DLL命令 API_OpenSCManager, 整数型, "advapi32.dll", "OpenSCManagerA", , 连接服务控件管理器
    .参数 lpMachineName, 整数型
    .参数 lpDatabaseName, 整数型
    .参数 dwDesiredAccess, 整数型

.DLL命令 API_EnumServicesStatusEx, 整数型, "ADVAPI32.DLL", "EnumServicesStatusExA"
    .参数 hSCManager, 整数型
    .参数 InfoLevel, 整数型
    .参数 dwServiceType, 整数型
    .参数 dwServiceState, 整数型
    .参数 lpServices, 字节集, 传址
    .参数 cbBufSize, 整数型
    .参数 pcbBytesNeeded, 整数型, 传址
    .参数 lpServicesReturned, 整数型, 传址
    .参数 lpResumeHandle, 整数型
    .参数 pszGroupName, 整数型

.DLL命令 RtlMoveMemory, 整数型, , "RtlMoveMemory"
    .参数 Destination, ENUM_SERVICE_STATUS_PROCESS
    .参数 Source, 字节集
    .参数 Length, 整数型

.DLL命令 API_OpenService, 整数型, "Advapi32.dll", "OpenServiceA"
    .参数 hSCManager, 整数型
    .参数 lpServiceName, 文本型
    .参数 dwDesiredAccess, 整数型

.DLL命令 API_QueryServiceStatus, 整数型, "advapi32.dll", "QueryServiceStatus", , 获取服务状态
    .参数 hService, 整数型
    .参数 lpServiceStatus, SERVICE_STATUS, 传址

.DLL命令 API_ControlService, 整数型, "advapi32.dll", "ControlService", , 向服务器发送控件
    .参数 hService, 整数型
    .参数 dwControl, 整数型
    .参数 lpServiceStatus, SERVICE_STATUS, 传址

.DLL命令 API_StartService, 整数型, "advapi32.dll", "StartServiceA", , 开始运行服务
    .参数 hService, 整数型
    .参数 dwNumServiceArgs, 整数型
    .参数 lpServiceArgVectors, 整数型

.DLL命令 API_QueryServiceStatusEx, 整数型, "ADVAPI32.DLL", "QueryServiceStatusEx"
    .参数 hService, 整数型
    .参数 InfoLevel, 整数型
    .参数 lpBuffer, 字节集
    .参数 cbBufSize, 整数型
    .参数 pcbBytesNeeded, 整数型, 传址

.DLL命令 API_DeleteService, 逻辑型, "advapi32.dll", "DeleteService", , 从SCMANAGER数据库中删除服务　
    .参数 hService, 整数型

.DLL命令 API_CloseServiceHandle, 整数型, "advapi32.dll", "CloseServiceHandle", , 关闭ServiceControlManager对象　
    .参数 hSCObject, 整数型