Mugen

Yes, they stop documenting. But reverse engineers found UI_PKEY_DarkModeRibbon witch properly replace UI_PKEY_GlobalBackgroundColor.

Yeah, I noticed this. At the time MS added dark mode to Windows 10 the color option no longer works. You limited to light or dark theme.

Thanks Andreik, this make things much easier. Can you give an example about what's wrong on Windows 11?

Found RibbonFramework requires Delphi, but can create a dll that will work with AutoIt.

I can't get this VRC program to build a dll on Windows 7 + VS 2010.

For the disk names you can read the stdout of "WinNTSetup_x64.exe disks"

Does anyone still have VRC or know another tool to edit UIFILE resource?

@LarsJ Thanks for these information about GUICtrlSendMsg() and especially for this CUSTOMDRAW example. I'll play with this with some more windows themes, maybe even draw it all with NM_CUSTOMDRAW and DrawThemeBackground().

Hi, I wonder how to create a list view like windows explorer. It seems SetWindowTheme() is need to get selection and hover items displayed correctly. But this now causes a thin vertical border between all columns. Any idea on how to remove it? #include <GUIConstantsEx.au3> #include <GuiListView.au3> #include <GuiImageList.au3> #include <WindowsConstants.au3> Global $hListView _Main() Func _Main() Local $GUI, $hImage $GUI = GUICreate("(UDF Created) ListView Create", 400, 300) $hListView = _GUICtrlListView_Create($GUI, "", 2, 2, 394, 268) _GUICtrlListView_SetExtendedListViewStyle($hListView, BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_DOUBLEBUFFER )) DllCall("UxTheme.dll", "int", "SetWindowTheme", "hwnd", $hListView, "wstr", "Explorer", "ptr", 0) ; Set "Vista" Style GUISetState() ; Load images $hImage = _GUIImageList_Create() _GUIImageList_Add($hImage, _GUICtrlListView_CreateSolidBitMap($hListView, 0xFF0000, 16, 16)) _GUIImageList_Add($hImage, _GUICtrlListView_CreateSolidBitMap($hListView, 0x00FF00, 16, 16)) _GUIImageList_Add($hImage, _GUICtrlListView_CreateSolidBitMap($hListView, 0x0000FF, 16, 16)) _GUICtrlListView_SetImageList($hListView, $hImage, 1) ; Add columns _GUICtrlListView_InsertColumn($hListView, 0, "Column 1", 100) _GUICtrlListView_InsertColumn($hListView, 1, "Column 2", 100) _GUICtrlListView_InsertColumn($hListView, 2, "Column 3", 100) ; Add items _GUICtrlListView_AddItem($hListView, "Row 1: Col 1", 0) _GUICtrlListView_AddSubItem($hListView, 0, "Row 1: Col 2", 1) _GUICtrlListView_AddSubItem($hListView, 0, "Row 1: Col 3", 2) _GUICtrlListView_AddItem($hListView, "Row 2: Col 1", 1) _GUICtrlListView_AddSubItem($hListView, 1, "Row 2: Col 2", 1) _GUICtrlListView_AddItem($hListView, "Row 3: Col 1", 2) ; Loop until user exits Do Until GUIGetMsg() = $GUI_EVENT_CLOSE GUIDelete() EndFunc ;==>_Main

Thanks. That child window trick is perfect for my need.

Hi, I wonder if there is a way to change the backgound color of a Listview in it's disabled state. #include <GUIConstantsEx.au3> #include <MsgBoxConstants.au3> #include <WindowsConstants.au3> Example() Func Example() GUICreate("listview items", 220, 250, 100, 200, -1) GUISetBkColor(0x00151515) Local $idListview = GUICtrlCreateListView("col1 |col2|col3 ", 10, 10, 200, 150) Local $idButton = GUICtrlCreateButton("Disable /enable", 45, 170, 120, 20) Local $idItem1 = GUICtrlCreateListViewItem("item2|col22|col23", $idListview) Local $idItem2 = GUICtrlCreateListViewItem("item1|col12|col13", $idListview) Local $idItem3 = GUICtrlCreateListViewItem("item3|col32|col33", $idListview) Local $iState GUICtrlSetColor($idListview, 0x0000FF00) GUICtrlSetBkColor($idListview, 0x00151515) GUISetState(@SW_SHOW) GUICtrlSetData($idItem2, "ITEM1") GUICtrlSetData($idItem3, "||COL33") $iState = 0 GUICtrlSetState($idListview, 128) ; Loop until the user exits. While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE ExitLoop Case $idButton IF $iState = 0 Then GUICtrlSetState($idListview, 64) $iState = 1 Else GUICtrlSetState($idListview, 128) $iState = 0 EndIf EndSwitch WEnd EndFunc

Perfect, thank you UEZ

Thanks, for the link, but It's all about systray animation.

Hi, does anyone have an idea on how to make an animation like this in GDIPlus using 2 Icons? #include <GUIConstantsEx.au3> Example() Func Example() ; Create a GUI with various controls. Local $hGUI = GUICreate("Example", 300, 200) ; Create an animation control. Local $idAnimation = GUICtrlCreateAvi(@SystemDir & "\srchadmin.dll", 1301, 120, 50, 300) Local $idStart = GUICtrlCreateButton("Start", 60, 150, 85, 25) Local $idStop = GUICtrlCreateButton("Stop", 160, 150, 85, 25) ; Display the GUI. GUISetState(@SW_SHOW, $hGUI) ; Loop until the user exits. While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE ExitLoop Case $idStart ; Start the animation. GUICtrlSetState($idAnimation, $GUI_AVISTART) Case $idStop ; Stop the animation. GUICtrlSetState($idAnimation, $GUI_AVISTOP) EndSwitch WEnd ; Delete the previous GUI and all controls. GUIDelete($hGUI) EndFunc ;==>Example

where is the result parameter in your call?