Added Files

2021-07-06 13:13:13 +10:00
parent b42ccc43b6
commit f2475a3bdd
256 changed files with 1216534 additions and 0 deletions
--- a/Powershell/Scripts/set-wallpaper.ps1
+++ b/Powershell/Scripts/set-wallpaper.ps1
@@ -0,0 +1,62 @@
+<#
+.SYNTAX       set-wallpaper.ps1 [<image-file>] [<style>]
+.DESCRIPTION  sets the given image file as wallpaper
+              (style is either Fill, Fit, Stretch, Tile, Center, or Span)
+.LINK         https://github.com/fleschutz/PowerShell
+.NOTES        Author: Markus Fleschutz / License: CC0
+#>
+
+param($ImageFile = "", $Style = "Fit")
+
+function SetWallPaper {
+	param([string]$Image, [ValidateSet('Fill', 'Fit', 'Stretch', 'Tile', 'Center', 'Span')][string]$Style)
+ 
+	$WallpaperStyle = switch($Style) {
+	"Fill"    {"10"}
+	"Fit"     {"6"}
+	"Stretch" {"2"}
+	"Tile"    {"0"}
+	"Center"  {"0"}
+	"Span"    {"22"}
+	}
+ 
+	if ($Style -eq "Tile") {
+		New-ItemProperty -Path "HKCU:\Control Panel\Desktop" -Name WallpaperStyle -PropertyType String -Value $WallpaperStyle -Force
+		New-ItemProperty -Path "HKCU:\Control Panel\Desktop" -Name TileWallpaper -PropertyType String -Value 1 -Force
+	} else {
+		New-ItemProperty -Path "HKCU:\Control Panel\Desktop" -Name WallpaperStyle -PropertyType String -Value $WallpaperStyle -Force
+		New-ItemProperty -Path "HKCU:\Control Panel\Desktop" -Name TileWallpaper -PropertyType String -Value 0 -Force
+	}
+	Add-Type -TypeDefinition @" 
+	using System; 
+	using System.Runtime.InteropServices;
+  
+	public class Params
+	{ 
+	    [DllImport("User32.dll",CharSet=CharSet.Unicode)] 
+	    public static extern int SystemParametersInfo (Int32 uAction, 
+							   Int32 uParam, 
+							   String lpvParam, 
+							   Int32 fuWinIni);
+	}
+	"@ 
+  
+	$SPI_SETDESKWALLPAPER = 0x0014
+	$UpdateIniFile = 0x01
+	$SendChangeEvent = 0x02
+  
+	$fWinIni = $UpdateIniFile -bor $SendChangeEvent
+  
+	$ret = [Params]::SystemParametersInfo($SPI_SETDESKWALLPAPER, 0, $Image, $fWinIni)
+}
+ 
+try {
+	if ($ImageFile -eq "" ) {
+		$ImageFile = read-host "Enter path to image file"
+	}
+	SetWallPaper -Image $ImageFile -Style $Style
+	exit 0
+} catch {
+	write-error "⚠️ Error in line $($_.InvocationInfo.ScriptLineNumber): $($Error[0])"
+	exit 1
+}