wrap webui_set_high_contrast_support and `webui_user_prefers_high_c…

…ontrast`

webui.nim

@@ -105,6 +105,13 @@ proc setTlsCertificate*(certificate_pem, private_key_pem: string): bool =
 
   bindings.setTlsCertificate(cstring certificate_pem, cstring private_key_pem)
 
+proc userPrefersHighContrast*(): bool =
+  ## Get the user's high contrast preference.
+  ##
+  ## Returns `true` if the user is prefers the high contrast theme
+
+  bindings.userPrefersHighContrast()
+
 # ------- Impl funcs --------
 
 # --- Event ---
@@ -407,6 +414,14 @@ proc `hidden=`*(window: Window; status: bool) =
 
   bindings.setHide(csize_t window, status)
 
+proc `highContrastSupport`*(window: Window; status: bool) = 
+  ##  Set the window's high contrast support. This is useful when thedefault high
+  ##  contrast support of the browser is not operating correctly or you want to build better
+  ##  high contrast theme by CSS.
+  ## 
+  ## :window: The window to set the high contrast theme support for
+  ## :status: Whether or not to support high contrast themes.
+
 proc setSize*(window: Window; width, height: int) =
   ## Set the window size.
   ## 

webui/bindings.nim

@@ -206,6 +206,14 @@ proc showWv*(window: csize_t; content: cstring): bool {.webui, importc: "webui_s
 proc setKiosk*(window: csize_t; status: bool) {.webui, importc: "webui_set_kiosk".}
   ##  Set the window in Kiosk mode (Full screen)
 
+proc setHighContrastSupport*(window: csize_t; status: bool) {.webui, importc: "webui_set_high_contrast_support".}
+  ##  Set the window's high contrast support. This is useful when thedefault high
+  ##  contrast support of the browser is not operating correctly or you want to build better
+  ##  high contrast theme by CSS.
+
+proc userPrefersHighContrast*(): bool {.webui, importc: "webui_user_prefers_high_contrast".}
+  ##  Get the user's high contrast preference.
+
 proc wait*() {.webui, importc: "webui_wait".}
   ##  Wait until all opened windows get closed.