Code: Select all
[mDWMCOLORFromRegistry]
Measure=Registry
RegHKey=HKEY_CURRENT_USER
RegKey=Software\Microsoft\Windows\DWM
RegValue=AccentColor
DynamicVariables=1
I found this code by JelleDekkers but it is returning these numbers : mColorR = 66, mColorG = 132, mColorB = 22 which do not match the color code from the SysColor plugin which is 26,56,91,196.
Note: The color returned by the SysColor plugin matches my current accent color.
Code: Select all
[Variables]
Color=
; Either RRGGBB or RRR, GGG, BBB.
ColorFormulaPrefixDec=
ColorFormulaPrefixHex=0x
; Don't touch these two! They're needed for the hexadecimal to decimal conversion.
; ================================================
[mColorInputType]
Measure=String
String=#Color#
RegExpSubstitute=1
Substitute="\d+ *, *\d+ *, *\d+.*":"Dec", "[[:xdigit:]]{6}.*":"Hex"
UpdateDivider=-1
[mColorRRAW]
Measure=String
String=#Color#
RegExpSubstitute=1
Substitute="(\d+) *, *(\d+) *, *(\d+).*":"\1", "([[:xdigit:]]{2})([[:xdigit:]]{2})([[:xdigit:]]{2}).*":"\1"
UpdateDivider=-1
[mColorR]
Measure=Calc
Formula=[#ColorFormulaPrefix[&mColorInputType]][#CurrentSection#RAW]
UpdateDivider=-1
DynamicVariables=1
[mColorGRAW]
Measure=String
String=#Color#
RegExpSubstitute=1
Substitute="(\d+) *, *(\d+) *, *(\d+).*":"\2", "([[:xdigit:]]{2})([[:xdigit:]]{2})([[:xdigit:]]{2}).*":"\2"
UpdateDivider=-1
[mColorG]
Measure=Calc
Formula=[#ColorFormulaPrefix[&mColorInputType]][#CurrentSection#RAW]
UpdateDivider=-1
DynamicVariables=1
[mColorBRAW]
Measure=String
String=#Color#
RegExpSubstitute=1
Substitute="(\d+) *, *(\d+) *, *(\d+).*":"\3", "([[:xdigit:]]{2})([[:xdigit:]]{2})([[:xdigit:]]{2}).*":"\3"
UpdateDivider=-1
[mColorB]
Measure=Calc
Formula=[#ColorFormulaPrefix[&mColorInputType]][#CurrentSection#RAW]
UpdateDivider=-1
DynamicVariables=1