Browse Source

Added uxtheme bindings

JooperGH 2 years ago
parent
commit
5519749aa4
2 changed files with 12 additions and 3 deletions
  1. 0 3
      core/sys/windows/dwmapi.odin
  2. 12 0
      core/sys/windows/ux_theme.odin

+ 0 - 3
core/sys/windows/dwmapi.odin

@@ -3,9 +3,6 @@ package sys_windows
 
 foreign import dwmapi "system:Dwmapi.lib"
 
-MARGINS :: distinct [4]int
-PMARGINS :: ^MARGINS
-
 DWMWINDOWATTRIBUTE :: enum {
 	DWMWA_NCRENDERING_ENABLED,
 	DWMWA_NCRENDERING_POLICY,

+ 12 - 0
core/sys/windows/ux_theme.odin

@@ -0,0 +1,12 @@
+// +build windows
+package sys_windows
+
+foreign import uxtheme "system:UxTheme.lib"
+
+MARGINS :: distinct [4]int
+PMARGINS :: ^MARGINS
+
+@(default_calling_convention="stdcall")
+foreign uxtheme {
+    IsThemeActive :: proc() -> BOOL ---
+}