hw工具箱

1. HWtools是什么公司的软件

HWtools是华为公司的软件
HWTOOL华为工具箱免费版是一款工具箱软件，officeba免费提供HWTOOL华为工具箱免费版下载，更多HWTOOL华为工具箱免费版相关版本就在officeba。
HWTOOL华为工具箱免费版是一款专业对于华为荣耀手机开发设计的一款十分功能强大的辅助软件，应用这款pc软件能够轻轻松松的对华为荣耀手机开展一键刷机进而使你的手机可以轻轻松松地拆换升级。

2. 谁知道第五人格的往昔许愿码如何获得

这个是需要兑换的，如果你没有显示兑换证明你没资格拥有，多努力吧。许愿码：BFZ9AHW3S1K ，DGS267HGV1，WVJ1FRMVG1K。愿望码：要交换礼品袋，要收到礼品袋交换码，在墙上输入自己的交换码，直接收到交换的礼品袋。这个夏季礼盒是为开学季准备的，里面有价值888英镑的杰克玫瑰手杖和其他线索。

艾玛找到了那个特别的人，现在她可以在平静中使用她完美的园艺技能和天赋了。也许亲爱的稻草人先生需要一些装饰，因为那根已经腐烂的深棕色的稻草，还有一顶新帽子……当然，她不仅仅是一个漂亮的女孩，但是，嘿，装饰你的梦中情人有什么错呢?只要有足够的钱就行。由于园丁熟悉机械他非常适合破译。

最后，游戏中最需要的皮肤物品，以及其他物品，都可以通过礼品袋交换，礼品袋有使用时间，也有接收方式。

3. 华为手机中如何删除已备份的资料

到手机内存或SD卡里的HWbackup文件夹里删除，方法：

1．打开文件管理器；

2．点击本地，找到手机内存或者SD卡；

3．进入后，找到HWbackup文件夹即可；

华为手机是国内一家中型手机生产商，拥有庞大的人力资源部，手机产品、销售一体化，2015年华为入选Brand Z全球最具价值品牌榜百强，位列科技领域品牌排名第16位。问题一：华为手机备份后,想要删掉备份文件怎样操作。
到手机内存或SD卡里的HWbackup文件夹里删除，方法：
打开文件管理器；
点击【本地】，找到手机内存或者SD卡；
进入后，找到HWbackup文件夹即可

问题二：华为手机如何删除备份
首先将所备份的资料还原出来，进行着设置就没有问题的。
保证设置下就将资料稳定的还原出来设置了。
还是应用宝或者谷歌软件上的工具就可以的了。
稳定的设置下就成功操作着让手机上稳定的操作就可以的了。
顺畅的安装着到手机上就可以的了。
将资料还原出来设置下就成功的进行着资料还原之后设置着了。

问题三：华为手机中如何删除已备份的资料?
到手机内存或SD卡里的HWbackup文件夹里删除，方法：
打开文件管理器；
点击【本地】，找到手机内存或者SD卡；
进入后，找到HWbackup文件夹即可。

问题四：华为6手机备份的文件去哪删除
首先将备份的资料还原到手机上，在操作shanchu
就可以了。
其实手机上备份的资料是很容易出现问题的、
你要是想备份资料，建议你去应用宝上备份。
可以将资料备份到电脑上的。
我觉得备份到电脑上总是要比手机上稳定的。
你就安装个应用宝的软件到电脑上，连接上手机就行了，就可以进行备份了。
点击上面显示的资料还原就可以了。

问题五：华为p7手机怎么把备份的内容删除呢
你找个是备份到哪呢？备份到了哪直接删除不就好了吗
像我就是自己备份就是用应用宝先备份到电脑上
就用数据线连好手机和电脑
然后打开手机的USB调试
在应用宝的工具箱里就能备份了呢
查看起来也是方便点

问题六：华为手机的备份怎么删除
如果备份在本地：到手机内存或SD卡里的HWbackup文件夹里删除,方法:打开文件管理器;点击【本地】,找到手机内存或者SD卡;进入后,找到HWbackup文件夹即可
如果备份在云端，请登入www.hicloud.com

问题七：华为手机怎么关闭备份
打开手机设置--应用程序上面找到备份软件设置关闭就可以。
手机上面的资料最好是备份到电脑上。
安装应用宝软件来备份资料。
首先从手机上选择好资料，然后点击资料备份。
从而就能成功把资料备份了。

问题八：华为手机是如何用手机删除云备份
也是需要将资料先还原出来然后在shanchu的呢。所以
就需要进行下用比较稳定的工具了。
一般在云端备份的资料是经常出现问题的呢。
备份着手机上的资料到电脑上就可以了。
首先安装上PC版应用宝软件到电脑上来进行下资料备份呢。
而且还原的时候也是连接手机到电脑上来还原到手机上呢。

问题九：怎样删除华为3手机里的备份
这个可以恢复了在删除就可以了，如果您确定自己手机备份的话，您就可以在总的文件里找到您已经备份过的东西了，找到就可以删除了。
我下载经常用的是腾讯手机管家备份一些有用的东西从来没出现过差错，
所以您可以试试腾讯手机管家的手机备份，
说了这么多真心想要帮到您，望采纳谢谢。

问题十：华为荣耀4c手机更新系统备份的怎么删除
楼主要是想删除备份的话直接找到备份包然后删掉就可以了，华为的话在手机系统设置里面有一个备份与重置，在里面可以看到一个从SD卡中恢复就可以找到备份包，点击删掉就可以了，如果是用手机自带的软件备份的就会在这里，如果不是手机自带的而是云端的话你需要登陆云端去找到并删除，如果是电脑的话类似，我备份用的是电脑版的应用宝，这个不仅备份功能强大，可以备份许多信息，还因为他可以自己指定路径，不需要的时候很容易找到并删除

4. delphi 创建系统服务启动时出错

网上找的，你看看应该有帮助吧，共同学习一下。

Windows 2000/XP和2003等支持一种叫做"服务程序"的东西.程序作为服务启动有以下几个好处:

(1)不用登陆进系统即可运行.
(2)具有SYSTEM特权.所以你在进程管理器里面是无法结束它的.

笔者在2003年为一公司开发机顶盒项目的时候,曾经写过课件上传和媒体服务,下面就介绍一下如何用Delphi7创建一个Service程序.
运行Delphi7,选择菜单File-->New-->Other--->Service Application.将生成一个服务程序的框架.将工程保存为ServiceDemo.dpr和Unit_Main.pas,然后回到主框架.我们注意到,Service有几个属性.其中以下几个是我们比较常用的:

(1)DisplayName:服务的显示名称
(2)Name:服务名称.

我们在这里将DisplayName的值改为"Delphi服务演示程序",Name改为"DelphiService".编译这个项目,将得到ServiceDemo.exe.这已经是一个服务程序了!进入CMD模式,切换致工程所在目录,运行命令"ServiceDemo.exe /install",将提示服务安装成功!然后"net start DelphiService"将启动这个服务.进入控制面版-->管理工具-->服务,将显示这个服务和当前状态.不过这个服务现在什么也干不了,因为我们还没有写代码:)先"net stop DelphiService"停止再"ServiceDemo.exe /uninstall"删除这个服务.回到Delphi7的IDE.

我们的计划是为这个服务添加一个主窗口,运行后任务栏显示程序的图标,双击图标将显示主窗口,上面有一个按钮,点击该按钮将实现Ctrl+Alt+Del功能.

实际上,服务程序莫认是工作于Winlogon桌面的,可以打开控制面板,查看我们刚才那个服务的属性-->登陆,其中"允许服务与桌面交互"是不打钩的.怎么办?呵呵,回到IDE,注意那个布尔属性:Interactive,当这个属性为True的时候,该服务程序就可以与桌面交互了.

File-->New-->Form为服务添加窗口FrmMain,单元保存为Unit_FrmMain,并且把这个窗口设置为手工创建.完成后的代码如下:

unit Unit_Main;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, SvcMgr, Dialogs, Unit_FrmMain;

type
TDelphiService = class(TService)
procere ServiceContinue(Sender: TService; var Continued: Boolean);
procere ServiceExecute(Sender: TService);
procere ServicePause(Sender: TService; var Paused: Boolean);
procere ServiceShutdown(Sender: TService);
procere ServiceStart(Sender: TService; var Started: Boolean);
procere ServiceStop(Sender: TService; var Stopped: Boolean);
private
{ Private declarations }
public
function GetServiceController: TServiceController; override;
{ Public declarations }
end;

var
DelphiService: TDelphiService;
FrmMain: TFrmMain;
implementation

{$R *.DFM}

procere ServiceController(CtrlCode: DWord); stdcall;
begin
DelphiService.Controller(CtrlCode);
end;

function TDelphiService.GetServiceController: TServiceController;
begin
Result := ServiceController;
end;

procere TDelphiService.ServiceContinue(Sender: TService;
var Continued: Boolean);
begin
while not Terminated do
begin
Sleep(10);
ServiceThread.ProcessRequests(False);
end;
end;

procere TDelphiService.ServiceExecute(Sender: TService);
begin
while not Terminated do
begin
Sleep(10);
ServiceThread.ProcessRequests(False);
end;
end;

procere TDelphiService.ServicePause(Sender: TService;
var Paused: Boolean);
begin
Paused := True;
end;

procere TDelphiService.ServiceShutdown(Sender: TService);
begin
gbCanClose := true;
FrmMain.Free;
Status := csStopped;
ReportStatus();
end;

procere TDelphiService.ServiceStart(Sender: TService;
var Started: Boolean);
begin
Started := True;
Svcmgr.Application.CreateForm(TFrmMain, FrmMain);
gbCanClose := False;
FrmMain.Hide;
end;

procere TDelphiService.ServiceStop(Sender: TService;
var Stopped: Boolean);
begin
Stopped := True;
gbCanClose := True;
FrmMain.Free;
end;

end.

主窗口单元如下:

unit Unit_FrmMain;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, ShellApi, Graphics, Controls, Forms,
Dialogs, ExtCtrls, StdCtrls;

const
WM_TrayIcon = WM_USER + 1234;
type
TFrmMain = class(TForm)
Timer1: TTimer;
Button1: TButton;
procere FormCreate(Sender: TObject);
procere FormCloseQuery(Sender: TObject; var CanClose: Boolean);
procere FormDestroy(Sender: TObject);
procere Timer1Timer(Sender: TObject);
procere Button1Click(Sender: TObject);
private
{ Private declarations }
IconData: TNotifyIconData;
procere AddIconToTray;
procere DelIconFromTray;
procere TrayIconMessage(var Msg: TMessage); message WM_TrayIcon;
procere SysButtonMsg(var Msg: TMessage); message WM_SYSCOMMAND;
public
{ Public declarations }
end;

var
FrmMain: TFrmMain;
gbCanClose: Boolean;
implementation

{$R *.dfm}

procere TFrmMain.FormCreate(Sender: TObject);
begin
FormStyle := fsStayOnTop; {窗口最前}
SetWindowLong(Application.Handle, GWL_EXSTYLE, WS_EX_TOOLWINDOW); {不在任务栏显示}
gbCanClose := False;
Timer1.Interval := 1000;
Timer1.Enabled := True;
end;

procere TFrmMain.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
CanClose := gbCanClose;
if not CanClose then
begin
Hide;
end;
end;

procere TFrmMain.FormDestroy(Sender: TObject);
begin
Timer1.Enabled := False;
DelIconFromTray;
end;

procere TFrmMain.AddIconToTray;
begin
ZeroMemory(@IconData, SizeOf(TNotifyIconData));
IconData.cbSize := SizeOf(TNotifyIconData);
IconData.Wnd := Handle;
IconData.uID := 1;
IconData.uFlags := NIF_MESSAGE or NIF_ICON or NIF_TIP;
IconData.uCallbackMessage := WM_TrayIcon;
IconData.hIcon := Application.Icon.Handle;
IconData.szTip := 'Delphi服务演示程序';
Shell_NotifyIcon(NIM_ADD, @IconData);
end;

procere TFrmMain.DelIconFromTray;
begin
Shell_NotifyIcon(NIM_DELETE, @IconData);
end;

procere TFrmMain.SysButtonMsg(var Msg: TMessage);
begin
if (Msg.wParam = SC_CLOSE) or
(Msg.wParam = SC_MINIMIZE) then Hide
else inherited; // 执行默认动作
end;

procere TFrmMain.TrayIconMessage(var Msg: TMessage);
begin
if (Msg.LParam = WM_LBUTTONDBLCLK) then Show();
end;

procere TFrmMain.Timer1Timer(Sender: TObject);
begin
AddIconToTray;
end;

procere SendHokKey;stdcall;
var
HDesk_WL: HDESK;
begin
HDesk_WL := OpenDesktop ('Winlogon', 0, False, DESKTOP_JOURNALPLAYBACK);
if (HDesk_WL <> 0) then
if (SetThreadDesktop (HDesk_WL) = True) then
PostMessage(HWND_BROADCAST, WM_HOTKEY, 0, MAKELONG (MOD_ALT or MOD_CONTROL, VK_DELETE));
end;

procere TFrmMain.Button1Click(Sender: TObject);
var
dwThreadID : DWORD;
begin
CreateThread(nil, 0, @SendHokKey, nil, 0, dwThreadID);
end;

end.

补充:
(1)关于更多服务程序的演示程序,请访问以下Url:http://www.torry.net/pages.php?id=226,上面包含了多个演示如何控制和管理系统服务的代码.

(2)请切记:Windows实际上存在多个桌面.例如屏幕传输会出现白屏,可能有两个原因:一是系统处于锁定或未登陆桌面,二是处于屏幕保护桌面.这时候要将当前桌面切换到该桌面才能抓屏.

(3)关于服务程序与桌面交互,还有种动态切换方法.大概单元如下:
unit ServiceDesktop;

interface

function InitServiceDesktop: boolean;
procere DoneServiceDeskTop;

implementation

uses Windows, SysUtils;

const
DefaultWindowStation = 'WinSta0';
DefaultDesktop = 'Default';
var
hwinstaSave: HWINSTA;
hdeskSave: HDESK;
hwinstaUser: HWINSTA;
hdeskUser: HDESK;
function InitServiceDesktop: boolean;
var
dwThreadId: DWORD;
begin
dwThreadId := GetCurrentThreadID;
// Ensure connection to service window station and desktop, and
// save their handles.
hwinstaSave := GetProcessWindowStation;
hdeskSave := GetThreadDesktop(dwThreadId);

hwinstaUser := OpenWindowStation(DefaultWindowStation, FALSE, MAXIMUM_ALLOWED);
if hwinstaUser = 0 then
begin
OutputDebugString(PChar('OpenWindowStation failed' + SysErrorMessage(GetLastError)));
Result := false;
exit;
end;

if not SetProcessWindowStation(hwinstaUser) then
begin
OutputDebugString('SetProcessWindowStation failed');
Result := false;
exit;
end;

hdeskUser := OpenDesktop(DefaultDesktop, 0, FALSE, MAXIMUM_ALLOWED);
if hdeskUser = 0 then
begin
OutputDebugString('OpenDesktop failed');
SetProcessWindowStation(hwinstaSave);
CloseWindowStation(hwinstaUser);
Result := false;
exit;
end;
Result := SetThreadDesktop(hdeskUser);
if not Result then
OutputDebugString(PChar('SetThreadDesktop' + SysErrorMessage(GetLastError)));
end;

procere DoneServiceDeskTop;
begin
// Restore window station and desktop.
SetThreadDesktop(hdeskSave);
SetProcessWindowStation(hwinstaSave);
if hwinstaUser <> 0 then
CloseWindowStation(hwinstaUser);
if hdeskUser <> 0 then
CloseDesktop(hdeskUser);
end;

initialization
InitServiceDesktop;
finalization
DoneServiceDesktop;
end.
更详细的演示代码请参看:http://www.torry.net/samples/samples/os/isarticle.zip

(4)关于安装服务如何添加服务描述.有两种方法:一是修改注册表.服务的详细信息都位于HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\下面,例如我们刚才那个服务就位于HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\DelphiService下.第二种方法就是先用QueryServiceConfig2函数获取服务信息,然后ChangeServiceConfig2来改变描述.用Delphi实现的话,单元如下:

unit WinSvcEx;

interface

uses Windows, WinSvc;

const
//
// Service config info levels
//
SERVICE_CONFIG_DESCRIPTION = 1;
SERVICE_CONFIG_FAILURE_ACTIONS = 2;

//
// DLL name of imported functions
//
AdvApiDLL = 'advapi32.dll';
type
//
// Service description string
//
PServiceDescriptionA = ^TServiceDescriptionA;
PServiceDescriptionW = ^TServiceDescriptionW;
PServiceDescription = PServiceDescriptionA;
{$EXTERNALSYM _SERVICE_DESCRIPTIONA}
_SERVICE_DESCRIPTIONA = record
lpDescription : PAnsiChar;
end;
{$EXTERNALSYM _SERVICE_DESCRIPTIONW}
_SERVICE_DESCRIPTIONW = record
lpDescription : PWideChar;
end;
{$EXTERNALSYM _SERVICE_DESCRIPTION}
_SERVICE_DESCRIPTION = _SERVICE_DESCRIPTIONA;
{$EXTERNALSYM SERVICE_DESCRIPTIONA}
SERVICE_DESCRIPTIONA = _SERVICE_DESCRIPTIONA;
{$EXTERNALSYM SERVICE_DESCRIPTIONW}
SERVICE_DESCRIPTIONW = _SERVICE_DESCRIPTIONW;
{$EXTERNALSYM SERVICE_DESCRIPTION}
SERVICE_DESCRIPTION = _SERVICE_DESCRIPTIONA;
TServiceDescriptionA = _SERVICE_DESCRIPTIONA;
TServiceDescriptionW = _SERVICE_DESCRIPTIONW;
TServiceDescription = TServiceDescriptionA;

//
// Actions to take on service failure
//
{$EXTERNALSYM _SC_ACTION_TYPE}
_SC_ACTION_TYPE = (SC_ACTION_NONE, SC_ACTION_RESTART, SC_ACTION_REBOOT, SC_ACTION_RUN_COMMAND);
{$EXTERNALSYM SC_ACTION_TYPE}
SC_ACTION_TYPE = _SC_ACTION_TYPE;

PServiceAction = ^TServiceAction;
{$EXTERNALSYM _SC_ACTION}
_SC_ACTION = record
aType : SC_ACTION_TYPE;
Delay : DWORD;
end;
{$EXTERNALSYM SC_ACTION}
SC_ACTION = _SC_ACTION;
TServiceAction = _SC_ACTION;

PServiceFailureActionsA = ^TServiceFailureActionsA;
PServiceFailureActionsW = ^TServiceFailureActionsW;
PServiceFailureActions = PServiceFailureActionsA;
{$EXTERNALSYM _SERVICE_FAILURE_ACTIONSA}
_SERVICE_FAILURE_ACTIONSA = record
dwResetPeriod : DWORD;
lpRebootMsg : LPSTR;
lpCommand : LPSTR;
cActions : DWORD;
lpsaActions : ^SC_ACTION;
end;
{$EXTERNALSYM _SERVICE_FAILURE_ACTIONSW}
_SERVICE_FAILURE_ACTIONSW = record
dwResetPeriod : DWORD;
lpRebootMsg : LPWSTR;
lpCommand : LPWSTR;
cActions : DWORD;
lpsaActions : ^SC_ACTION;
end;
{$EXTERNALSYM _SERVICE_FAILURE_ACTIONS}
_SERVICE_FAILURE_ACTIONS = _SERVICE_FAILURE_ACTIONSA;
{$EXTERNALSYM SERVICE_FAILURE_ACTIONSA}
SERVICE_FAILURE_ACTIONSA = _SERVICE_FAILURE_ACTIONSA;
{$EXTERNALSYM SERVICE_FAILURE_ACTIONSW}
SERVICE_FAILURE_ACTIONSW = _SERVICE_FAILURE_ACTIONSW;
{$EXTERNALSYM SERVICE_FAILURE_ACTIONS}
SERVICE_FAILURE_ACTIONS = _SERVICE_FAILURE_ACTIONSA;
TServiceFailureActionsA = _SERVICE_FAILURE_ACTIONSA;
TServiceFailureActionsW = _SERVICE_FAILURE_ACTIONSW;
TServiceFailureActions = TServiceFailureActionsA;

///////////////////////////////////////////////////////////////////////////
// API Function Prototypes
///////////////////////////////////////////////////////////////////////////
TQueryServiceConfig2 = function (hService : SC_HANDLE; dwInfoLevel : DWORD; lpBuffer : pointer;
cbBufSize : DWORD; var pcbBytesNeeded) : BOOL; stdcall;
TChangeServiceConfig2 = function (hService : SC_HANDLE; dwInfoLevel : DWORD; lpInfo : pointer) : BOOL; stdcall;

var
hDLL : THandle ;
LibLoaded : boolean ;

var
OSVersionInfo : TOSVersionInfo;

{$EXTERNALSYM QueryServiceConfig2A}
QueryServiceConfig2A : TQueryServiceConfig2;
{$EXTERNALSYM QueryServiceConfig2W}
QueryServiceConfig2W : TQueryServiceConfig2;
{$EXTERNALSYM QueryServiceConfig2}
QueryServiceConfig2 : TQueryServiceConfig2;

{$EXTERNALSYM ChangeServiceConfig2A}
ChangeServiceConfig2A : TChangeServiceConfig2;
{$EXTERNALSYM ChangeServiceConfig2W}
ChangeServiceConfig2W : TChangeServiceConfig2;
{$EXTERNALSYM ChangeServiceConfig2}
ChangeServiceConfig2 : TChangeServiceConfig2;

implementation

initialization
OSVersionInfo.dwOSVersionInfoSize := SizeOf(OSVersionInfo);
GetVersionEx(OSVersionInfo);
if (OSVersionInfo.dwPlatformId = VER_PLATFORM_WIN32_NT) and (OSVersionInfo.dwMajorVersion >= 5) then
begin
if hDLL = 0 then
begin
hDLL:=GetMoleHandle(AdvApiDLL);
LibLoaded := False;
if hDLL = 0 then
begin
hDLL := LoadLibrary(AdvApiDLL);
LibLoaded := True;
end;
end;

if hDLL <> 0 then
begin
@QueryServiceConfig2A := GetProcAddress(hDLL, 'QueryServiceConfig2A');
@QueryServiceConfig2W := GetProcAddress(hDLL, 'QueryServiceConfig2W');
@QueryServiceConfig2 := @QueryServiceConfig2A;
@ChangeServiceConfig2A := GetProcAddress(hDLL, 'ChangeServiceConfig2A');
@ChangeServiceConfig2W := GetProcAddress(hDLL, 'ChangeServiceConfig2W');
@ChangeServiceConfig2 := @ChangeServiceConfig2A;
end;
end
else
begin
@QueryServiceConfig2A := nil;
@QueryServiceConfig2W := nil;
@QueryServiceConfig2 := nil;
@ChangeServiceConfig2A := nil;
@ChangeServiceConfig2W := nil;
@ChangeServiceConfig2 := nil;
end;

finalization
if (hDLL <> 0) and LibLoaded then
FreeLibrary(hDLL);

end.

unit winntService;

interface

uses
Windows,WinSvc,WinSvcEx;

function InstallService(const strServiceName,strDisplayName,strDescription,strFilename: string):Boolean;
//eg:InstallService('服务名称','显示名称','描述信息','服务文件');
procere UninstallService(strServiceName:string);
implementation

function StrLCopy(Dest: PChar; const Source: PChar; MaxLen: Cardinal): PChar; assembler;
asm
PUSH EDI
PUSH ESI
PUSH EBX
MOV ESI,EAX
MOV EDI,EDX
MOV EBX,ECX
XOR AL,AL
TEST ECX,ECX
JZ @@1
REPNE SCASB
JNE @@1
INC ECX
@@1: SUB EBX,ECX
MOV EDI,ESI
MOV ESI,EDX
MOV EDX,EDI
MOV ECX,EBX
SHR ECX,2
REP MOVSD
MOV ECX,EBX
AND ECX,3
REP MOVSB
STOSB
MOV EAX,EDX
POP EBX
POP ESI
POP EDI
end;

function StrPCopy(Dest: PChar; const Source: string): PChar;
begin
Result := StrLCopy(Dest, PChar(Source), Length(Source));
end;

function InstallService(const strServiceName,strDisplayName,strDescription,strFilename: string):Boolean;
var
//ss : TServiceStatus;
//psTemp : PChar;
hSCM,hSCS:THandle;

srvdesc : PServiceDescription;
desc : string;
//SrvType : DWord;

lpServiceArgVectors:pchar;
begin
Result:=False;
//psTemp := nil;
//SrvType := SERVICE_WIN32_OWN_PROCESS and SERVICE_INTERACTIVE_PROCESS;
hSCM:=OpenSCManager(nil,nil,SC_MANAGER_ALL_ACCESS);//连接服务数据库
if hSCM=0 then Exit;//MessageBox(hHandle,Pchar(SysErrorMessage(GetLastError)),'服务程序管理器',MB_ICONERROR+MB_TOPMOST);

hSCS:=CreateService( //创建服务函数
hSCM, // 服务控制管理句柄
Pchar(strServiceName), // 服务名称
Pchar(strDisplayName), // 显示的服务名称
SERVICE_ALL_ACCESS, // 存取权利
SERVICE_WIN32_OWN_PROCESS or SERVICE_INTERACTIVE_PROCESS,// 服务类型 SERVICE_WIN32_SHARE_PROCESS
SERVICE_AUTO_START, // 启动类型
SERVICE_ERROR_IGNORE, // 错误控制类型
Pchar(strFilename), // 服务程序
nil, // 组服务名称
nil, // 组标识
nil, // 依赖的服务
nil, // 启动服务帐号
nil); // 启动服务口令
if hSCS=0 then Exit;//MessageBox(hHandle,Pchar(SysErrorMessage(GetLastError)),Pchar(Application.Title),MB_ICONERROR+MB_TOPMOST);

if Assigned(ChangeServiceConfig2) then
begin
desc := Copy(strDescription,1,1024);
GetMem(srvdesc,SizeOf(TServiceDescription));
GetMem(srvdesc^.lpDescription,Length(desc) + 1);
try
StrPCopy(srvdesc^.lpDescription, desc);
ChangeServiceConfig2(hSCS,SERVICE_CONFIG_DESCRIPTION,srvdesc);
finally
FreeMem(srvdesc^.lpDescription);
FreeMem(srvdesc);
end;
end;
lpServiceArgVectors := nil;
if not StartService(hSCS, 0, lpServiceArgVectors) then //启动服务
Exit; //MessageBox(hHandle,Pchar(SysErrorMessage(GetLastError)),Pchar(Application.Title),MB_ICONERROR+MB_TOPMOST);
CloseServiceHandle(hSCS); //关闭句柄
Result:=True;
end;

procere UninstallService(strServiceName:string);
var
SCManager: SC_HANDLE;
Service: SC_HANDLE;
Status: TServiceStatus;
begin
SCManager := OpenSCManager(nil, nil, SC_MANAGER_ALL_ACCESS);
if SCManager = 0 then Exit;
try
Service := OpenService(SCManager, Pchar(strServiceName), SERVICE_ALL_ACCESS);
ControlService(Service, SERVICE_CONTROL_STOP, Status);
DeleteService(Service);
CloseServiceHandle(Service);
finally
CloseServiceHandle(SCManager);
end;
end;

end.

(5)如何暴力关闭一个服务程序,实现我们以前那个"NT工具箱"的功能?首先,根据进程名称来杀死进程是用以下函数:
uses Tlhelp32;

function KillTask(ExeFileName: string): Integer;
const
PROCESS_TERMINATE = $0001;
var
ContinueLoop: BOOL;
FSnapshotHandle: THandle;
FProcessEntry32: TProcessEntry32;
begin
Result := 0;
FSnapshotHandle := CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0);
FProcessEntry32.dwSize := SizeOf(FProcessEntry32);
ContinueLoop := Process32First(FSnapshotHandle, FProcessEntry32);

while Integer(ContinueLoop) <> 0 do
begin
if ((UpperCase(ExtractFileName(FProcessEntry32.szExeFile)) =
UpperCase(ExeFileName)) or (UpperCase(FProcessEntry32.szExeFile) =
UpperCase(ExeFileName))) then
Result := Integer(TerminateProcess(
OpenProcess(PROCESS_TERMINATE,
BOOL(0),
FProcessEntry32.th32ProcessID),
0));
ContinueLoop := Process32Next(FSnapshotHandle, FProcessEntry32);
end;
CloseHandle(FSnapshotHandle);
end;

但是对于服务程序,它会提示"拒绝访问".其实只要程序拥有Debug权限即可:
function EnableDebugPrivilege: Boolean;
function EnablePrivilege(hToken: Cardinal; PrivName: string; bEnable: Boolean): Boolean;
var
TP: TOKEN_PRIVILEGES;
Dummy: Cardinal;
begin
TP.PrivilegeCount := 1;
LookupPrivilegeValue(nil, pchar(PrivName), TP.Privileges[0].Luid);
if bEnable then
TP.Privileges[0].Attributes := SE_PRIVILEGE_ENABLED
else TP.Privileges[0].Attributes := 0;
AdjustTokenPrivileges(hToken, False, TP, SizeOf(TP), nil, Dummy);
Result := GetLastError = ERROR_SUCCESS;
end;

var
hToken: Cardinal;
begin
OpenProcessToken(GetCurrentProcess, TOKEN_ADJUST_PRIVILEGES, hToken);
result:=EnablePrivilege(hToken, 'SeDebugPrivilege', True);
CloseHandle(hToken);
end;

使用方法:
EnableDebugPrivilege;//提升权限
KillTask('xxxx.exe');//关闭该服务程序.

-----------------------------------作者：陈经韬 来源：CnXHacker.Net -----------------

5. 华为手机恢复出厂设置后有激活密码怎么破解或跳过

华为手机与荣耀手机刷机恢复出厂后账户密码忘记了,怎麽跳过激活呀.如何去激活设备不开机了激活手机设备锁定的此设备已关联至华为帐号登陆不成功.原来的绑定都更换过了不在用了重置密码及清除成功的方法这里分享实用的解锁清除开机好用的手动解决方法

一、申请解锁的方法是自己到华为官方网上去点右上角 登陆的这里.然后再点忘了密码的项

二,把你之前知道的找回内容添写一下.并添写好新的重置要更改的密码点确定直到成功就可以直接在手机上登上用了.如果你用这种方法找不回继续看后面清除方法步骤了

三,直接解锁直接用这个华为手机和荣耀手机通用的清除解锁帐户原方平台工具包来弄了

包的下载连接: https://yunbal.com/s/X8RCYNWAJdjNpKX 把这包的这一段连接复制然后粘贴到你的电脑上或者浏览器栏上.电脑键盘回车键确定输提取码进去打开点下载按扭那里下好这个包并解压它里面有全部需要的文件平台工具驱动等

四,这里把刚才上面下好的包解压里面找到华为助手驱动安装在电脑上运行它.这主要是用来识别手机驱动用的.

再照文件解锁工具包按提示进行手机电脑上线刷平台工具清除解锁操作，手机顺利重启即解锁帐号密码成功;

五,重启时显示开机画面后需要稍等几分钟.提示设置语言选择.选完简体中文.然后下一步.

不要连WIFI跳过.云界面也跳过激活华为成功开机使用这样就手动的自己有效的弄好了手机
刷系统申请方法教程HUAWEI华为P30/华为P30pro不开机定屏.反复重启变砖手机忘记了锁D屏密码帐号密码激活手机跳过清除刷机不了.无法换掉密码来开机启动.HUAWEI华为P30/华为P30pro清除密码锁,小孩乱设置.或者是之前朋友及家人购机店长设置的原来的帐号无法正常输入正确密码和帐号的不开机.进不了系统需要线刷来清除密码的可以用这篇经验来一步一步把手机弄好新机一样的教程帖

1. 方法一:
手机解锁的工作： 申请解锁码。条件:用户必须申请开通华为云账号；用户必须在申请解锁的设备上登录华为云账号并使用超过14天；每个华为云账号半年内只能申请不超过2个设备解锁码。到华为官方解锁网站：申请解锁码。
进入网址之后，解锁协议打勾，并且进入下一步，登陆自己的华为云账号，点击下一步，进入下一个界面，如下图：

2. 手机打开USB调解模式（如果你手机已经显示帐号密码锁没办法进去系统开USB的用后面方法二弄)解锁，如果申请到解锁码的.直接用下图ADB一键解开有.打开华为工具箱
也可以用点击解锁bootloader，弹出窗口输入16位解锁码并确定，手机自动重启进入一个白色屏幕，显示安卓机器人表示成功进入fastboot模式，之后转跳进入解锁模式画面，按音量上键选择yes……，关机键确定，手机再次自动重启并进行格式化，格式化之后手机重启，解锁完成！（解锁后每次重启开机都会有橙色英文安全提醒画面，属正常现象）
，由于本人的手机已经解锁过，找不到当时的图片，大家就这样看着吧，因为是一样的。至此方法一解锁，到这里就结束了！

方法二:
用这个HUAWEI华为P30/华为P30pro用的解锁清除平台线刷包软件来弄
包的下载连接: 直接打开连接进去下载.或者复制这个连接在你的电脑上或者浏览器上粘贴.再按电脑回车键确定打开输密码后点下载.下好后要解压.里面有祥细说明和平台这些的

5.在上面下的包里面解压找到华为手机助手驱动这些安装的驱动步骤.把它先安装好

6.安装好后.手机关机按音量-键连电脑手机显示FASTBOOT来连机进行线刷包线刷清除解锁帐号密码的步骤方案一步 一步弄直到成功

7.完成后.手机会自动重启开机.显示华为开机标志后需要耐心慢等几分钟.提示设语言确定的提示点下一步
跳过进卓面后设置为新的设备手机就可以正常用了.新机如初了

6. 豪沃克幕墙工具包安装后在CAD界面里不显示怎么办

你要先双击运行你桌面上的工具包加载你需要的CAD版本；如果加载过后还没有，就试着打开CAD，在上方的菜单栏点击右键下拉是否有HWUTIL的选项，有说明你加载成功了，勾选豪沃克工具就行，没有的话就证明没加载成功，建议重装。

7. 华为手机无法root，怎样删除预设软件下载了hwRomcleaner也不管用！！

删除自带软件要root<
用腾讯手机管家等工具，打开后可以看到ROOT权限相关信息，如果手机已经ROOT则会显示“已获取”
下载并安装好腾讯手机管家PC版之后，
打开该软件并进入工具箱，选择KingRoot通过USB 将手机同电脑连接后，无论选择那款工具，用户都可以通过简单的鼠标点击，选择“一键ROOT”按钮后，应用工具将智能匹配手机系统，寻找最适合该手机的ROOT方案，几分钟之后，手机即可成功获得ROOT权限你就能获得更多权限了。
1、用腾讯手机管家-软件搬家- 移动所有可以移动的应用程序数据到SD卡。
2、不少人在查看存储空间时有时会犯一些错误，即把存储卡容量误认为内存容量，这是或许你会怀疑自己存储卡剩余容量还有不少，怎么会不够呢！事实上内存和存储是不同的，所以不要找错位置了。
3、点击通知栏图标，进入“存储空间使用情况”，可以在底端查看到内部存储空间，包括总容量和剩余容量（可用空间），将会发现可用空间已所剩不多，也正是这个原因导致提示的产生。
4、用腾讯手机管家加速小火箭，关闭后台应用进程一键清理内存和无用进程的功效。提升手机运行速度。