AIR/Windows10Debloater
1
0
Fork 0
mirror of https://github.com/Sycnex/Windows10Debloater.git synced 2025-03-21 13:05:30 +00:00
Code Issues Packages Projects Releases Wiki Activity

Added buttons to remove/restore '3D Objects' from Quick Access

Browse Source
This commit is contained in:
Christian Berkman 2021-02-14 22:33:31 +03:00
parent cbb7ff8d67
commit 52e6952e20
1 changed files with 224 additions and 183 deletions

43
Windows10DebloaterGUI.ps1
View File

@ -339,6 +339,21 @@ $InstallNet35.Height = 39
$InstallNet35.Location = New-Object System.Drawing.Point(169, 335)
$InstallNet35.Font = 'Microsoft Sans Serif,10'
$Remove3dObjects = New-Object System.Windows.Forms.Button
$Remove3dObjects.Text = "Remove 3D Objects"
$Remove3dObjects.Width = 152
$Remove3dObjects.Height = 39
$Remove3dObjects.Location = New-Object System.Drawing.Point(330, 335)
$Remove3dObjects.Font = 'Microsoft Sans Serif,10'
$Restore3dObjects = New-Object System.Windows.Forms.Button
$Restore3dObjects.Text = "Restore 3D Objects"
$Restore3dObjects.Width = 152
$Restore3dObjects.Height = 39
$Restore3dObjects.Location = New-Object System.Drawing.Point(330, 385)
$Restore3dObjects.Font = 'Microsoft Sans Serif,10'
$EnableDarkMode = New-Object System.Windows.Forms.Button
$EnableDarkMode.Text = "Enable Dark Mode"
$EnableDarkMode.Width = 152
@ -355,7 +370,7 @@ $DisableDarkMode.Font = 'Microsoft Sans Serif,10'
$Form.controls.AddRange(@($Debloat, $CustomizeBlacklists, $RemoveAllBloatware, $RemoveBlacklist, $Label1, $RevertChange, $Label2, $DisableCortana, $EnableCortana, $StopEdgePDFTakeover, $EnableEdgePDFTakeover, $DisableTelemetry, $RemoveRegkeys, $UnpinStartMenuTiles, $RemoveOnedrive, $FixWhitelist, $RemoveBloatNoBlacklist, $InstallNet35, $EnableDarkMode, $DisableDarkMode))
$Form.controls.AddRange(@($Debloat, $CustomizeBlacklists, $RemoveAllBloatware, $RemoveBlacklist, $Label1, $RevertChange, $Label2, $DisableCortana, $EnableCortana, $StopEdgePDFTakeover, $EnableEdgePDFTakeover, $DisableTelemetry, $RemoveRegkeys, $UnpinStartMenuTiles, $RemoveOnedrive, $FixWhitelist, $RemoveBloatNoBlacklist, $InstallNet35, $Remove3dObjects, $Restore3dObjects, $EnableDarkMode, $DisableDarkMode))
$DebloatFolder = "C:\Temp\Windows10Debloater"
If (Test-Path $DebloatFolder) {
@ -1289,6 +1304,32 @@ $InstallNet35.Add_Click( {
Write-Host ".NET 3.5 has been successfully installed!"
} )
$Remove3dObjects.Add_Click({
#Removes 3D Objects from the 'My Computer' submenu in explorer
Write-Host "Removing 3D Objects from explorer 'My Computer' submenu"
$Objects32 = "HKLM:\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\MyComputer\NameSpace\{0DB7E03F-FC29-4DC6-9020-FF41B59E513A}"
$Objects64 = "HKLM:\SOFTWARE\WOW6432Node\Microsoft\Windows\CurrentVersion\Explorer\MyComputer\NameSpace\{0DB7E03F-FC29-4DC6-9020-FF41B59E513A}"
If (Test-Path $Objects32) {
Remove-Item $Objects32 -Recurse
}
If (Test-Path $Objects64) {
Remove-Item $Objects64 -Recurse
}
})
$Restore3dObjects.Add_Click({
#Restores 3D Objects from the 'My Computer' submenu in explorer
Write-Host "Restoring 3D Objects from explorer 'My Computer' submenu"
$Objects32 = "HKLM:\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\MyComputer\NameSpace\{0DB7E03F-FC29-4DC6-9020-FF41B59E513A}"
$Objects64 = "HKLM:\SOFTWARE\WOW6432Node\Microsoft\Windows\CurrentVersion\Explorer\MyComputer\NameSpace\{0DB7E03F-FC29-4DC6-9020-FF41B59E513A}"
If (!(Test-Path $Objects32)) {
New-Item $Objects32
}
If (!(Test-Path $Objects64)) {
New-Item $Objects64
}
})
$EnableDarkMode.Add_Click( {
Write-Host "Enabling Dark Mode"
$Theme = "HKCU:\SOFTWARE\Microsoft\Windows\CurrentVersion\Themes\Personalize"