【已解决】关于状态栏颜色的小问题

anythinging

遇到个小问题，背景色和状态栏用的是同样的代码，但显示 的颜色却不一样，系统是win10帮助文件中的这句不是很理解 ，返回 RGB COLORREF 颜色, 传递颜色值必须是 16 位 BGR 颜色值, 或 RGB COLORREF 值.
感谢指点！

1. #include <ColorConstants.au3>
   
2. #include <GUIConstantsEx.au3>
   
3. #include <GuiStatusBar.au3>
   
4. #include <WinAPITheme.au3>
   
5. 
   
6. Example()
   
7. 
   
8. Func Example()
   
9.     Local $hGUI, $hStatus
   
10.     Local $aParts[3] = [75, 150, -1]
    
11.     ; 创建 GUI
    
12.     $hGUI = GUICreate("设置状态栏背景颜色", 400, 300)
    
13.    GUISetBkColor(0x0000FF)
    
14. 
    
15.         $hStatus = _GUICtrlStatusBar_Create($hGUI)
    
16.     GUISetState(@SW_SHOW)
    
17. 
    
18.     ; to allow the setting of Bk Color at least under Windows 10
    
19.     _WinAPI_SetWindowTheme($hStatus, "", "")
    
20. 
    
21.     ; 设置部件
    
22.     _GUICtrlStatusBar_SetParts($hStatus, $aParts)
    
23.     _GUICtrlStatusBar_SetText($hStatus, "部件 1")
    
24.     _GUICtrlStatusBar_SetText($hStatus, "部件 2", 1)
    
25.     _GUICtrlStatusBar_SetText($hStatus, "部件 3", 2)
    
26. 
    
27.     ; 设置背景颜色
    
28. ;~     _GUICtrlStatusBar_SetBkColor($hStatus, $CLR_MONEYGREEN)
    
29.         _GUICtrlStatusBar_SetBkColor($hStatus, 0x0000FF)
    
30. 
    
31.     ; 循环到用户退出.
    
32.     Do
    
33.     Until GUIGetMsg() = $GUI_EVENT_CLOSE
    
34.     GUIDelete()
    
35. EndFunc   ;==>Example
    

复制代码

afan

一个是 RGB 一个是 BGR，顾名思义，需要替换下前两位后两位的位置，可以 Bit 位操作，也可以纯字符串操作

1.         ; 设置背景颜色
   
2.         _GUICtrlStatusBar_SetBkColor($hStatus, _sRGB2BGR('0x0000FF'))
   
3. 
   
4. Func _sRGB2BGR($sRGB)
   
5.         Return StringRegExpReplace(StringFormat('%06s', StringRegExpReplace($sRGB, '(?i)^0x', '')), '(?i)^(..)(..)(..)', '0x${3}${2}${1}')
   
6. EndFunc   ;==>_sRGB2BGR

复制代码

anythinging

之前设置gui，button一直用的是0x16进制颜色代码都是正常的，直到这次用在状态栏上不一样了。

anythinging

感谢指点，已解决。
就算知道原因也没撤，不会写A版的那个表达式。

chzj589