표준 Windows 사용자와의 제거 프로그램 문제

Question

this post에서 논의 된 Windows 10에서 같은 버그가 발생하는지 궁금합니다.

권한이없는 표준 사용자가 설치 한 프로그램을 제거하는 데 문제가 있습니다.

INNO 설치 프로그램을 사용하고 있으므로 PrivilegesRequired = 최저이며 INNO가 상승 된 권한을 묻지 않으며 현재 사용자 용으로 설치하고 제거 프로그램을 만듭니다. 내 응용 프로그램 폴더에 uninst000.exe가 있고 INNO는 내 응용 프로그램의 시작 메뉴 그룹에 제거 프로그램 아이콘을 표시합니다 (이 모든 것이 현재 사용자에 대해 완료되었습니다). 또한 INNO는 Windows 10의 설정/응용 프로그램 & 기능 애플릿에 항목을 추가합니다 (문제가있는 곳입니다).

시작 메뉴 아이콘에서 제거 프로그램을 실행하면 상승 된 권한에 대한 프롬프트가 표시되지 않고 프로그램이 문제없이 제거됩니다.

기능 & 기능에서 제거 프로그램을 시작한 경우 승격 된 권한에 대한 프롬프트가 표시되고 관리자 자격 증명을 입력하면 앱이 올바르게 제거되지 않습니다. 어떤 것은 제거되지만 모든 것이 제거되지는 않습니다. 응용 프로그램 파일이 제거되고 시작 메뉴 그룹이 제거되지만 INNO의 [UninstallRun] 섹션에있는 추가 정리 작업이 완료되지 않습니다. 또한 제거 항목은 Apps & 기능의 목록에서 제거되지 않습니다.

제 질문은 이전 게시물에서 언급 한 Windows 10 버그 때문입니까?

Answer 1

@MartinPrikryl 제안에 따라 제거 프로그램 (즉, InitializeUninstall)이 실행중인 권한을 확인하고 제거 키가 레지스트리의 HKLM 또는 HKCU 영역에 있는지 확인합니다. 지금까지 내 테스트에 따르면이 방법이 잘 작동하는 것으로 나타났습니다.

function IsRegularUser(): Boolean; 
begin 
    Result := not (IsAdminLoggedOn or IsPowerUserLoggedOn); 
end; 

function WasInstalledAsStandardUser(): Boolean; //return true if uninstall key is in Current User area of registry 
var 
    sUnInstPath: String; 
    sUnInstallString: String; 
begin 
    sUnInstPath := ExpandConstant('Software\Microsoft\Windows\CurrentVersion\Uninstall\{#emit SetupSetting("AppName")}_is1'); 
    sUnInstallString := ''; 
    Result := True; 
    //only one of these keys should be present, but if both are, return True for nonadmin 
    if RegQueryStringValue(HKLM, sUnInstPath, 'UninstallString', sUnInstallString) then Result:=False; 
    if RegQueryStringValue(HKCU, sUnInstPath, 'UninstallString', sUnInstallString) then Result:=True; 
end; 

function InitializeUninstall: Boolean; 
begin 
    if WasInstalledAsStandardUser() and (Not IsRegularUser) then begin 
     MsgBox(MyApp was installed with standard user rights, so it must be uninstalled with stardard user rights.'#13' So use Start/All Programs/MyApp/Uninstall.', mbInformation, MB_OK); 
     Result:=False; exit; 
    end; 
    Result := True; 
end;