在服务管理器,选择服务,单击右键,选择属性中的登陆,可修改帐号。
或者在编程中实现:
schService = CreateService( //调用建立SERVICE的API
schSCManager, //SERVICE管理器数据库的句柄
TEXT(m_lpServiceName), //服务名称
TEXT(m_lpServiceDisplayName), //显示的名称
SERVICE_ALL_ACCESS, //希望得到的运行权限
SERVICE_WIN32_OWN_PROCESS, //SERVICE的类型
SERVICE_AUTO_START, //启动的方式
SERVICE_ERROR_NORMAL, //错误控制类型
TEXT(m_lpServicePathName), //可执行文件的路径名
NULL, //一组服务装入时的顺序
NULL, //检查人标记
_T("RPCSS\0"), //从属
NULL, //本地USER名 在此输入帐号
NULL); //密码 在此输入密码
或者在编程中实现:
schService = CreateService( //调用建立SERVICE的API
schSCManager, //SERVICE管理器数据库的句柄
TEXT(m_lpServiceName), //服务名称
TEXT(m_lpServiceDisplayName), //显示的名称
SERVICE_ALL_ACCESS, //希望得到的运行权限
SERVICE_WIN32_OWN_PROCESS, //SERVICE的类型
SERVICE_AUTO_START, //启动的方式
SERVICE_ERROR_NORMAL, //错误控制类型
TEXT(m_lpServicePathName), //可执行文件的路径名
NULL, //一组服务装入时的顺序
NULL, //检查人标记
_T("RPCSS\0"), //从属
NULL, //本地USER名 在此输入帐号
NULL); //密码 在此输入密码
解决方案 »
- 如何检测或者监视某一个程序被注入或者窗口被读取了
- 一个关于FLASH插件安装的问题。
- 请问 我要实现按下回车键,光标从edit控件跳到combobox控件上,再按一下回车从combobox控件跳到datetimeedit控件上,怎么做
- 今晚平安夜,明天剩蛋节!兄弟们辛苦了~!散分~~~~~~~~~~~~!
- 怎样把HKEY类型转换成String?
- 这个问题如何解决?
- 请教!winsock连接服务器后使用recv时出现死机
- 如何跟踪调试动态链接庫(*.dll)?
- access数据库的字段定义中的“常规时间(1996-6-19 17:34:25)”怎么与delphi的time返回的TDateTime交互?
- Look at me---怎样在TListBox中显示图标?
- delphi bde+中文access如何在英文win98下正常工作
- 我想在 Excel 中给文件字加双下划线,可是编译时提示变量没有定义
我没找到你的这段代码,下面是我的type
TMyService = class(TService)
procedure Timer1Timer(Sender: TObject);
private
{ Private declarations }
procedure Timer1Timer(Sender: TObject);
public
{ Public declarations }
end;var
FWBService: TFWBService;implementation{$R *.DFM}procedure ServiceController(CtrlCode: DWord); stdcall;
begin
FWBService.Controller(CtrlCode);
end;