User Tools

Site Tools


userspace:wallpaper_logon

Differences

This shows you the differences between two versions of the page.

Link to this comparison view

Both sides previous revision Previous revision
Next revision
Previous revision
userspace:wallpaper_logon [2012/07/19 05:55]
bbz_edv
userspace:wallpaper_logon [2024/02/19 14:31] (current)
Thomas_H Link zur Zip-Datei entfernt, da er ungültig war.
Line 1: Line 1:
 ====== Anmelde und Desktophintergrund verteilen ====== ====== Anmelde und Desktophintergrund verteilen ======
 ====== .zip - Package with all needed Files ====== ====== .zip - Package with all needed Files ======
-[[http://www.techslave.de/uploads/wallpaper_logon.zip]]+[Link zur Zip-Datei entfernt, da er ungültig war. /th]
 <code> <code>
 ├ wallpaper ├ wallpaper
-│ └ <picturename>.bmp+│ └ <width>x<height>.bmp
 ├ logon ├ logon
-│ └ background<widthxheight>.jpg+│ └ background<width>x<height>.jpg
 ├ setup.ins ← Made by bbz_edv ├ setup.ins ← Made by bbz_edv
 ├ getmaxresolution.exe ← Made by bbz_edv (Written in C++) ├ getmaxresolution.exe ← Made by bbz_edv (Written in C++)
Line 31: Line 31:
 <code winst> <code winst>
 [Initial] [Initial]
-setLogLevel=7+SetLogLevel=7
 ;  Log Errors in Logfile but don't abort: ;  Log Errors in Logfile but don't abort:
 ExitOnError=false ExitOnError=false
Line 90: Line 90:
 Set $MSVersion$ = GetMsVersionInfo Set $MSVersion$ = GetMsVersionInfo
 ;; ;;
 +;;Check maximum Screen Resolution
 +DefVar $max_screen_resolution$
 +DefVar $max_screen_horizontal$
 +DefVar $max_screen_vertical$
 +;
 +DosInAnIcon_Get_Max_Resolution
 +Set $max_screen_resolution$ = Trim (takeString(0,getOutStreamFromSection ('DosInAnIcon_Get_Max_Resolution')))
 +Set $max_screen_horizontal$ = takeString(0, splitString($max_screen_resolution$, "x"))
 +Set $max_screen_vertical$ = takeString(1, splitString($max_screen_resolution$, "x"))
  
-If ( $MSVersion$ >= "6"+If ( $resolution$ = $max_screen_resolution$) 
- If FileExists($Wallpaper_Src$) + If ( $MSVersion$ >= "6"
- comment "Ihr Standard-Wallpaper wird nun aktualisiert" + If FileExists($Wallpaper_Src$) 
- Files_Wallpaper_Win7 /SysNative + comment "Ihr Standard-Wallpaper wird nun aktualisiert" 
- Registry_Wallpaper_Win7 /SysNative + Files_Wallpaper_Win7 /SysNative 
- set $ExitCode$ = "0"+ Registry_Wallpaper_Win7 /SysNative 
 + set $ExitCode$ = "0" 
 + Else 
 + comment "Ihr Betriebssystem oder ihre Auflösung wird nicht unterstützt" 
 + set $ExitCode$ = "1" 
 + EndIf
  Else  Else
- comment "Ihr Betriebssystem oder ihre Auflösung wird nicht unterstützt" + If ( $MSVersion$ = "5.1"
- set $ExitCode$ = "1"+ If FileExists($Wallpaper_Src$) 
 + comment "Ihr Standard-Wallpaper wird nun aktualisiert" 
 + Files_Wallpaper_WinXP /SysNative 
 + Registry_Wallpaper_WinXP /SysNative /AllNTUserDats 
 + set $ExitCode$ = "0" 
 + Else 
 + comment "Ihr Betriebssystem oder ihre Auflösung wird nicht unterstützt" 
 + set $ExitCode$ = "1" 
 + EndIf 
 + Else 
 + comment "Ihr Betriebssystem oder ihre Auflösung wird nicht unterstützt" 
 + set $ExitCode$ = "1"  
 + EndIf
  EndIf  EndIf
 Else Else
- If ( $MSVersion$ = "5.1" )+ DosInAnIcon_Set_Max_Resolution 
 + DosInAnIcon_Get_Horizontal 
 + DosInAnIcon_Get_Vertical 
 + Set $resolution$ = Trim (takeString(2,getOutStreamFromSection ('DosInAnIcon_Get_Horizontal'))) + "x" + Trim (takeString(2,getOutStreamFromSection ('DosInAnIcon_Get_Vertical'))) 
 + Set $Wallpaper_Src$ = $Wallpaper_Src_Dir$+$resolution$+".bmp" 
 + Set $Wallpaper_WinXP_Dst$ = $Wallpaper_WinXP_Dst_Dir$+$resolution$+".bmp" 
 + Set $Wallpaper_Win7_Dst$ = $Wallpaper_Win7_Dst_Dir$+$resolution$+".bmp" 
 +  
 + If ( $MSVersion$ >= "6" )
  If FileExists($Wallpaper_Src$)  If FileExists($Wallpaper_Src$)
  comment "Ihr Standard-Wallpaper wird nun aktualisiert"  comment "Ihr Standard-Wallpaper wird nun aktualisiert"
- Files_Wallpaper_WinXP /SysNative + Files_Wallpaper_Win7 /SysNative 
- Registry_Wallpaper_WinXP /SysNative /AllNTUserDats+ Registry_Wallpaper_Win7 /SysNative
  set $ExitCode$ = "0"  set $ExitCode$ = "0"
  Else  Else
Line 113: Line 147:
  EndIf  EndIf
  Else  Else
- comment "Ihr Betriebssystem oder ihre Auflösung wird nicht unterstützt" + If ( $MSVersion$ = "5.1"
- set $ExitCode$ = "1" + If FileExists($Wallpaper_Src$) 
 + comment "Ihr Standard-Wallpaper wird nun aktualisiert" 
 + Files_Wallpaper_WinXP /SysNative 
 + Registry_Wallpaper_WinXP /SysNative /AllNTUserDats 
 + set $ExitCode$ = "0" 
 + Else 
 + comment "Ihr Betriebssystem oder ihre Auflösung wird nicht unterstützt" 
 + set $ExitCode$ = "1" 
 + EndIf 
 + Else 
 + comment "Ihr Betriebssystem oder ihre Auflösung wird nicht unterstützt" 
 + set $ExitCode$ = "1"  
 + EndIf
  EndIf  EndIf
-EndIf 
-If ( $MSVersion$ >= "6" ) 
- comment "Es wird nun ihr Anmeldebildschirm modifiziert" 
- Files_Logon_Win7 /SysNative 
- Registry_Logon_Win7 /SysNative 
-Else 
- comment "Ihr Betriebssystem oder ihre Auflösung wird nicht unterstützt" 
 EndIf EndIf
 [DosInAnIcon_Get_Horizontal] [DosInAnIcon_Get_Horizontal]
Line 130: Line 169:
 @echo off @echo off
 wmic path win32_videocontroller get currentVerticalResolution wmic path win32_videocontroller get currentVerticalResolution
 +[DosInAnIcon_Get_Max_Resolution] 
 +@echo off 
 +"%scriptpath%\getmaxresolution.exe" 
 +[DosInAnIcon_Set_Max_Resolution] 
 +@echo off 
 +"%scriptpath%\ResSwitch.exe" /WIDTH:$max_screen_horizontal$ /HEIGHT:$max_screen_vertical$ /updateregistry
 [Files_Wallpaper_Win7] [Files_Wallpaper_Win7]
 delete -s -f "$Wallpaper_Win7_Dst_Dir$" delete -s -f "$Wallpaper_Win7_Dst_Dir$"
userspace/wallpaper_logon.1342677320.txt.gz · Last modified: 2021/08/23 08:37 (external edit)