Tyleo-Dev-AutoIT-Oldies/IODD Manager Pack/WinAccent.au3
2024-02-18 22:17:39 +01:00

17 lines
No EOL
672 B
AutoIt
Executable file

#cs ----------------------------------------------------------------------------
AutoIt Version : 3.3.14.5
Auteur: Tyleo
Fonction du Script :
Modèle de Script AutoIt.
#ce ----------------------------------------------------------------------------
; Début du script - Ajouter votre code ci-dessous.
$theMWTitleBarColor = Hex(RegRead("HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM", "AccentColor"))
$theMWTitleBarColor = StringRight($theMWTitleBarColor, 6)
$theMWTitleBarColor = "0x" & StringRight($theMWTitleBarColor, 2) & StringMid($theMWTitleBarColor, 3, 2) & StringLeft($theMWTitleBarColor, 2)
$CurrentAccent = $theMWTitleBarColor