Add Rounded Corner Support

rcmaehl · Nov 8, 2023 · 0aae348 · 0aae348
1 parent a710b21
commit 0aae348
Showing 1 changed file with 17 additions and 1 deletion.
diff --git a/Includes/_Theming.au3 b/Includes/_Theming.au3
@@ -145,4 +145,20 @@ Func _SetBkSelfIcon($ControlID, $iForeground, $iBackground, $sIcon, $iIndex, $iW
     _WinAPI_DeleteObject($hBkIcon)
     _GDIPlus_ImageDispose($hImage)
     Return SetError(0, 0, 1)
-EndFunc   ;==>_SetBkSelfIcon
+EndFunc   ;==>_SetBkSelfIcon
+
+Func _WinAPI_DwmSetWindowAttributeExt($hWnd, $iAttribute, $iData)
+    Switch $iAttribute
+        Case 2, 3, 4, 6, 7, 8, 10, 11, 12, 33
+
+        Case Else
+            Return SetError(1, 0, 0)
+    EndSwitch
+
+    Local $aCall = DllCall('dwmapi.dll', 'long', 'DwmSetWindowAttribute', 'hwnd', $hWnd, 'dword', $iAttribute, _
+            'dword*', $iData, 'dword', 4)
+    If @error Then Return SetError(@error, @extended, 0)
+    If $aCall[0] Then Return SetError(10, $aCall[0], 0)
+
+    Return 1
+EndFunc   ;==>_WinAPI_DwmSetWindowAttributeExt