基本信息
源码名称:Windows10开启自动关闭自动更新
源码大小:3.17M
文件格式:.rar
开发语言:Pascal
更新时间:2021-12-22
   友情提示:(无需注册或充值,赞助后即可获取资源下载链接)

     嘿,亲!知识可是无价之宝呢,但咱这精心整理的资料也耗费了不少心血呀。小小地破费一下,绝对物超所值哦!如有下载和支付问题,请联系我们QQ(微信同号):813200300

本次赞助数额为: 2 元 
   源码介绍
Windows10开机后,将自动关闭自动更新服务

function StartServices(Const   SvrName:   String):   Boolean;
  var
      a,b:SC_HANDLE;
        c:PChar;
  begin
        Result:=False;

        a:=OpenSCManager(nil,nil,SC_MANAGER_ALL_ACCESS);

        if a <=0 then  Exit;

        b:=OpenService(a,PChar(SvrName),SERVICE_ALL_ACCESS);

        if b <=0  then  Exit;
            try
              Result:=StartService(b,0,c);
              CloseServiceHandle(b);
              CloseServiceHandle(a);
        except
              CloseServiceHandle(b);
              CloseServiceHandle(a);
              Exit;
        end;
  end;