手机程序加密怎么设置

若使用的是vivo手机，可参考以下设置软件加密的方法：

1、Origin OS/iQOO UI/Funtouch OS 30及以上：

（1）进入i管家--实用工具--隐私保护--应用加密--应用加密--打开软件后的开关，即可加密软件。

（2）进入设置--指纹、面部与密码 /指纹与密码/面部与密码--隐私与应用加密--应用加密--打开软件后面对应的开关，即可加密。

2、Funtouch OS 30以下：进入i管家--软件管理--软件锁--点击软件后面对应的锁状图标，即可加密。（需设置隐私密码、密保）

更多使用疑惑可进入vivo官网--我的--在线客服--输入人工，咨询在线客服反馈。

;   本加密方法分三部分      根据对注册表的搜索结果判定设置对话框的内容      若初次使用 则设新密码 若是已经设置密码 则进行验证      一个密码变换小程序（比原来的复杂得多） 当然 如果需要修改密码的功能 只要将设置密码部分改动一下即可     一 程序启动时 通过搜索注册表 判断是否已有密码 来确定窗口的显示内容 不过事先应有以下的声明然后才能使用      在user中加入TRegistry 在var声明中加入以下几个窗体变量     TheReg: TRegistry;     KeyName ValueStr tempStr:String;     procedure TfrmPass FormShow(Sender: TObject);     begin         TheReg := TRegistry Create;         try TheReg RootKey := HKEY—LOCAL—MACHINE;         KeyName := ′SOFARE\Mypassword′;         //有该键则打开 没有则创建         if TheReg OpenKey(KeyName True) then begin             tempStr:=ExtractFileName(Application ExeName); //读取密码             ValueStr:=TheReg ReadString(tempStr);             //密码不为空则修改窗体为验证密码             if ValueStr<>′′ then begin                 edit Visible:=false; frmPass Caption:=′验证密码′;                 edit SetFocus; OK Caption:=′确定′; end                 //密码为空则修改窗体为设置密码对话框             else begin             showmessage(′第一次使用请设置密码!′);             edit Visible:=true; frmPass Caption:=′请设置新密码′;             edit SetFocus; OK Caption:=′设置′;         end; TheReg CloseKey; end;     finally TheReg Free; end; end;       二 按钮的响应代码 包括新设密码和验证密码     procedure TfrmPass OKClick(Sender: TObject);     begin         //根据Edit 的显示与否判断已有密码 进行验证         if edit Visible=false then begin             if pass(edit text)=ValueStr then begin                 showmessage(′密码正确!′); end             else begin                 showmessage(′密码不正确!无权 *** 作!′);             halt; end; end //无密码 设置新密码         else begin         if edit text=edit text then begin             TheReg := TRegistry Create;             TheReg RootKey := HKEY—LOCAL—MACHINE;             KeyName := ′SOFARE\Mypassword′;                 if TheReg OpenKey(KeyName True) then                     TheReg WriteString(tempStr pass(edit text));                     TheReg CloseKey; end                 else begin             showmessage(′再次键入的密码不一致 请重输!′);         edit text:=′′; edit text:=′′;         edit SetFocus; end; //进行下一步 *** 作      end; end;       三 密码变换程序 注意要预先定义     这个变换小程序在笔者看来还不算很复杂 只进行了两次变换 不过 想要破译也是得费点劲 读者还可以采用其他的数学函数进行更为复杂的变换     function pass(pstr:string):string;     var str str :string;     i j:integer;     begin         str:=pstr;         for i:= to length(str) do begin         //进行第一次变换         j:=(i＊i＊i mod (i＋ ))＋(i＊i mod (i＋ ))＋i＊ ＋ ;         str :=str ＋chr(ord(str[i])＋j); //第二次变换         j:=(i＊i＊i mod (i＋ ))＋(i＊i mod (i＋ ))＋i＊ ＋ ;         str :=str ＋chr(ord(str[i])＋j); end;     pass:=str ;     end;  lishixinzhi/Article/program/Delphi/201311/24821

以上就是关于手机程序加密怎么设置全部的内容，包括:手机程序加密怎么设置、用注册表对Delphi程序加密、等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！