summaryrefslogtreecommitdiff
path: root/src/nigui/private/windows
diff options
context:
space:
mode:
Diffstat (limited to 'src/nigui/private/windows')
-rwxr-xr-xsrc/nigui/private/windows/platform_impl.nim17
-rwxr-xr-xsrc/nigui/private/windows/platform_types2.nim2
-rwxr-xr-xsrc/nigui/private/windows/windows.nim2
3 files changed, 21 insertions, 0 deletions
diff --git a/src/nigui/private/windows/platform_impl.nim b/src/nigui/private/windows/platform_impl.nim
index c1f9790..2876448 100755
--- a/src/nigui/private/windows/platform_impl.nim
+++ b/src/nigui/private/windows/platform_impl.nim
@@ -1476,6 +1476,23 @@ method `text=`(label: NativeLabel, text: string) =
# ----------------------------------------------------------------------------------------
+# ProgressBar
+# ----------------------------------------------------------------------------------------
+
+const pProgressBarMaxValue = 10_000
+
+proc init(progressBar: NativeProgressBar) =
+ progressBar.fHandle = pCreateWindowExWithUserdata("msctls_progress32", WS_CHILD, 0, pDefaultParentWindow, cast[pointer](progressBar))
+ discard SendMessageA(progressBar.fHandle, PBM_SETRANGE32, cast[pointer](0), cast[pointer](pProgressBarMaxValue))
+ progressBar.ProgressBar.init()
+
+method `value=`(progressBar: NativeProgressBar, value: float) =
+ procCall progressBar.ProgressBar.`value=`(value)
+ discard SendMessageA(progressBar.fHandle, PBM_SETPOS, cast[pointer]((value * pProgressBarMaxValue).int32), nil)
+ app.processEvents()
+
+
+# ----------------------------------------------------------------------------------------
# TextBox
# ----------------------------------------------------------------------------------------
diff --git a/src/nigui/private/windows/platform_types2.nim b/src/nigui/private/windows/platform_types2.nim
index 0dfe32b..986b847 100755
--- a/src/nigui/private/windows/platform_types2.nim
+++ b/src/nigui/private/windows/platform_types2.nim
@@ -15,4 +15,6 @@ type
NativeLabel* = ref object of Label
+ NativeProgressBar* = ref object of ProgressBar
+
NativeTextBox* = ref object of TextBox
diff --git a/src/nigui/private/windows/windows.nim b/src/nigui/private/windows/windows.nim
index c3a8845..5defd80 100755
--- a/src/nigui/private/windows/windows.nim
+++ b/src/nigui/private/windows/windows.nim
@@ -76,6 +76,8 @@ const
IMAGE_ICON* = 1
# LR_LOADFROMFILE* = 16
OBJ_BRUSH* = 2
+ PBM_SETPOS* = 1026
+ PBM_SETRANGE32* = 1030
PM_REMOVE* = 1
SB_HORZ* = 0
SB_THUMBPOSITION* = 4