|
|
本帖最后由 urenai 于 2025-10-24 11:56 编辑
DLL 只有2个导出函数:
第一个是安装服务。
第二个是构建服务名称。
- <火山程序 类型 = "通常" 版本 = 1 />
- 方法 Init <公开 静态>
- {
- 变量 pd <类型 = 变整数>
- 变量 pa1 <类型 = 变整数>
- 变量 pa2 <类型 = 变整数>
- 变量 ps <类型 = 变整数>
- @ @<pd> = (INT_P)LoadLibraryW(L"ServiceDLL.dll");
- @ @<pa1> = (INT_P)GetProcAddress((HMODULE)@<pd>,(LPCSTR)1);
- @ @<pa2> = (INT_P)GetProcAddress((HMODULE)@<pd>,(LPCSTR)2);
- ps = 分配内存 (1024)
- 内存清零 (ps, 1024)
- 调用静态方法 (pa2, 整数, 取文本指针 ("ServiceDLL_Test"), ps) // 构建服务名
- 调用静态方法 (pa1, 逻辑型, -950618, ps) // 安装服务
- 全局信息框 ("点击确定,服务自动释放。")
- }
复制代码
不是源码,测试用32 64 位 DLL。
ServiceDLL.7z
(232.95 KB, 下载次数: 1)
|
|