Skip to content
体验新版
项目
组织
正在加载...
登录
切换导航
打开侧边栏
xxadev
vscode
提交
f2bf9539
V
vscode
项目概览
xxadev
/
vscode
与 Fork 源项目一致
从无法访问的项目Fork
通知
2
Star
0
Fork
0
代码
文件
提交
分支
Tags
贡献者
分支图
Diff
Issue
0
列表
看板
标记
里程碑
合并请求
0
Wiki
0
Wiki
分析
仓库
DevOps
项目成员
Pages
V
vscode
项目概览
项目概览
详情
发布
仓库
仓库
文件
提交
分支
标签
贡献者
分支图
比较
Issue
0
Issue
0
列表
看板
标记
里程碑
合并请求
0
合并请求
0
Pages
分析
分析
仓库分析
DevOps
Wiki
0
Wiki
成员
成员
收起侧边栏
关闭侧边栏
动态
分支图
创建新Issue
提交
Issue看板
体验新版 GitCode,发现更多精彩内容 >>
提交
f2bf9539
编写于
6月 27, 2018
作者:
J
Joao Moreno
浏览文件
操作
浏览文件
下载
电子邮件补丁
差异文件
detect system installation on user installation
fixes #52965
上级
2dc0a00c
变更
2
隐藏空白更改
内联
并排
Showing
2 changed file
with
16 addition
and
3 deletion
+16
-3
build/gulpfile.vscode.win32.js
build/gulpfile.vscode.win32.js
+2
-1
build/win32/code.iss
build/win32/code.iss
+14
-2
未找到文件。
build/gulpfile.vscode.win32.js
浏览文件 @
f2bf9539
...
...
@@ -81,7 +81,8 @@ function buildWin32Setup(arch, target) {
AppMutex
:
product
.
win32MutexName
,
Arch
:
arch
,
AppId
:
arch
===
'
ia32
'
?
ia32AppId
:
x64AppId
,
IncompatibleAppId
:
arch
===
'
ia32
'
?
x64AppId
:
ia32AppId
,
IncompatibleTargetAppId
:
arch
===
'
ia32
'
?
product
.
win32AppId
:
product
.
win32x64AppId
,
IncompatibleArchAppId
:
arch
===
'
ia32
'
?
x64AppId
:
ia32AppId
,
AppUserId
:
product
.
win32AppUserModelId
,
ArchitecturesAllowed
:
arch
===
'
ia32
'
?
''
:
'
x64
'
,
ArchitecturesInstallIn64BitMode
:
arch
===
'
ia32
'
?
''
:
'
x64
'
,
...
...
build/win32/code.iss
浏览文件 @
f2bf9539
...
...
@@ -957,14 +957,26 @@ Root: {#EnvironmentRootKey}; Subkey: "{#EnvironmentKey}"; ValueType: expandsz; V
// Don't allow installing conflicting architectures
function InitializeSetup(): Boolean;
var
RegRootKey: String;
RegKey: String;
ThisArch: String;
AltArch: String;
begin
Result := True;
if IsWin64 then begin
RegKey := 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\' + copy('{#IncompatibleAppId}', 2, 38) + '_is1';
#if "user" == InstallTarget
if '{#Arch}' = 'ia32' then RegRootKey := 'HKLM32' else RegRootKey := 'HKLM64';
RegKey := 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\' + copy('{#IncompatibleTargetAppId}', 2, 38) + '_is1';
if RegKeyExists(RegRootKey, RegKey) then begin
if MsgBox('{#NameShort} is already installed on this system for all users. Are you sure you want to install it for this user?', mbConfirmation, MB_YESNO) = IDNO then begin
Result := false;
end;
end;
#endif
if Result and IsWin64 then begin
RegKey := 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\' + copy('{#IncompatibleArchAppId}', 2, 38) + '_is1';
if '{#Arch}' = 'ia32' then begin
Result := not RegKeyExists({#Uninstall64RootKey}, RegKey);
...
...
编辑
预览
Markdown
is supported
0%
请重试
或
添加新附件
.
添加附件
取消
You are about to add
0
people
to the discussion. Proceed with caution.
先完成此消息的编辑!
取消
想要评论请
注册
或
登录