Add Window properties 'resizable', 'minWidth' and 'minHeight'

This allows to make windows not resizable and to set a minimum size.

Fixes #125 and #158.

Author: simonkrauter

src/nigui.nim

@@ -234,6 +234,8 @@ type
     fMinimized: bool
     fAlwaysOnTop: bool
     fWidth, fHeight: int
+    fMinWidth, fMinHeight: int
+    fResizable: bool
     fClientWidth, fClientHeight: int
     fX, fY: int
     fControl: Control
@@ -705,6 +707,15 @@ method `width=`*(window: Window, width: int) {.base, locks: "unknown".}
 method height*(window: Window): int {.base.}
 method `height=`*(window: Window, height: int) {.base, locks: "unknown".}
 
+method minWidth*(window: Window): int {.base.}
+method `minWidth=`*(window: Window, minWidth: int) {.base, locks: "unknown".}
+
+method minHeight*(window: Window): int {.base.}
+method `minHeight=`*(window: Window, minHeight: int) {.base, locks: "unknown".}
+
+method resizable*(window: Window): bool {.base.}
+method `resizable=`*(window: Window, resizable: bool) {.base, locks: "unknown".}
+
 method clientWidth*(window: Window): int {.base.}
 
 method clientHeight*(window: Window): int {.base.}
@@ -1443,6 +1454,7 @@ proc init(window: Window) =
   window.fVisible = false
   window.fWidth = 640 # do not trigger resize
   window.height = 480 # trigger resize
+  window.resizable = true
   window.fX = -1 # window will be centered on screen
   window.fY = -1
   window.title = getAppFilename().extractFilename().changeFileExt("")
@@ -1556,6 +1568,24 @@ method `height=`(window: Window, height: int) =
   window.fHeight = height
   # has to be extended by WindowImpl
 
+method minWidth(window: Window): int = window.fMinWidth
+
+method `minWidth=`(window: Window, minWidth: int) =
+  window.fMinWidth = minWidth
+  # has to be extended by WindowImpl
+
+method minHeight(window: Window): int = window.fMinHeight
+
+method `minHeight=`(window: Window, minHeight: int) =
+  window.fMinHeight = minHeight
+  # has to be extended by WindowImpl
+
+method resizable(window: Window): bool = window.fResizable
+
+method `resizable=`(window: Window, resizable: bool) =
+  window.fResizable = resizable
+  # has to be extended by WindowImpl
+
 method clientWidth(window: Window): int = window.fClientWidth
 
 method clientHeight(window: Window): int = window.fClientHeight

src/nigui/private/gtk3/gtk3.nim

@@ -103,6 +103,20 @@ type
     dummy13: cint
     dummy14: pointer
 
+  GdkGeometry* {.byCopy.} = object
+    min_width*: cint
+    min_height*: cint
+    max_width*: cint
+    max_height*: cint
+    base_width*: cint
+    base_height*: cint
+    width_inc*: cint
+    height_inc*: cint
+    min_aspect*: cdouble
+    max_aspect*: cdouble
+    win_gravity*: cint
+
+
 converter gbool*(val: bool): Gboolean = ord(val).Gboolean
 
 converter toBool*(val: Gboolean): bool = int(val) != 0
@@ -243,6 +257,9 @@ const
   GDK_WINDOW_TYPE_HINT_COMBO* = 12
   GDK_WINDOW_TYPE_HINT_DND* = 13
 
+  # GdkWindowHints
+  GDK_HINT_MIN_SIZE* = 2
+
 
 # ----------------------------------------------------------------------------------------
 #                                   General Gtk Procs
@@ -270,9 +287,11 @@ proc gtk_window_set_title*(window: pointer, title: cstring) {.importc, libgtk3.}
 proc gtk_window_set_transient_for*(window, parent: pointer) {.importc, libgtk3.}
 proc gtk_window_set_modal*(window: pointer, modal: cint) {.importc, libgtk3.}
 proc gtk_window_set_type_hint*(window: pointer, hint: cint) {.importc, libgtk3.}
-# proc gtk_window_set_default_size*(window: pointer, width, height: cint) {.importc, libgtk3.}
+proc gtk_window_set_default_size*(window: pointer, width, height: cint) {.importc, libgtk3.}
 proc gtk_window_resize*(window: pointer, width, height: cint) {.importc, libgtk3.}
 proc gtk_window_resize_to_geometry*(window: pointer, width, height: cint) {.importc, libgtk3.}
+proc gtk_window_set_resizable*(window: pointer, resizable: bool) {.importc, libgtk3.}
+proc gtk_window_set_geometry_hints*(window: pointer, geometry_widget: pointer, geometry: var GdkGeometry, geom_mask: cint) {.importc, libgtk3.}
 proc gtk_window_get_size*(window: pointer, width, height: var cint) {.importc, libgtk3.}
 proc gtk_window_get_position*(window: pointer, x, y: var cint) {.importc, libgtk3.}
 proc gtk_window_move*(window: pointer, x, y: cint) {.importc, libgtk3.}

src/nigui/private/gtk3/platform_impl.nim

@@ -881,14 +881,32 @@ method `alwaysOnTop=`(window: WindowImpl, alwaysOnTop: bool) =
 
 method `width=`*(window: WindowImpl, width: int) =
   procCall window.Window.`width=`(width)
-  gtk_window_resize(window.fHandle, window.width.cint, window.height.cint)
+  gtk_window_set_default_size(window.fHandle, window.width.cint, window.height.cint)
   window.fClientWidth = window.width
 
 method `height=`*(window: WindowImpl, height: int) =
   procCall window.Window.`height=`(height)
-  gtk_window_resize(window.fHandle, window.width.cint, window.height.cint)
+  gtk_window_set_default_size(window.fHandle, window.width.cint, window.height.cint)
   window.fClientHeight = window.height
 
+proc pUpdateMinSize(window: WindowImpl) =
+  var geometry: GdkGeometry
+  geometry.min_width = window.minWidth.cint
+  geometry.min_height = window.minHeight.cint
+  gtk_window_set_geometry_hints(window.fHandle, nil, geometry, GDK_HINT_MIN_SIZE)
+
+method `minWidth=`(window: WindowImpl, minWidth: int) =
+  procCall window.Window.`minWidth=`(minWidth)
+  pUpdateMinSize(window)
+
+method `minHeight=`(window: WindowImpl, minHeight: int) =
+  procCall window.Window.`minHeight=`(minHeight)
+  pUpdateMinSize(window)
+
+method `resizable=`(window: WindowImpl, resizable: bool) =
+  procCall window.Window.`resizable=`(resizable)
+  gtk_window_set_resizable(window.fHandle, resizable)
+
 proc pUpdatePosition(window: WindowImpl) = gtk_window_move(window.fHandle, window.x.cint, window.y.cint)
 
 method `x=`(window: WindowImpl, x: int) =

src/nigui/private/windows/platform_impl.nim

@@ -353,6 +353,12 @@ proc pWindowWndProc(hWnd: pointer, uMsg: int32, wParam, lParam: pointer): pointe
     fn[]()
     freeShared(fn)
     dec pQueue
+  of WM_GETMINMAXINFO:
+    let window = cast[Window](pGetWindowLongPtr(hWnd, GWLP_USERDATA))
+    if window != nil:
+      let minMaxInfo = cast[ptr MinMaxInfo](lParam)
+      minMaxInfo.ptMinTrackSize.x = window.minWidth.int32
+      minMaxInfo.ptMinTrackSize.y = window.minHeight.int32
   else:
     discard
   result = pCommonWndProc(hWnd, uMsg, wParam, lParam)
@@ -888,7 +894,7 @@ method endPixelDataAccess(image: Image) =
 proc init(window: WindowImpl) =
   if pDefaultParentWindow == nil:
     raiseError("'app.init()' needs to be called before creating a Window.")
-  var dwStyle: int32 = WS_OVERLAPPEDWINDOW
+  var dwStyle: int32 = WS_CAPTION or WS_SYSMENU or WS_THICKFRAME or WS_MINIMIZEBOX or WS_MAXIMIZEBOX
   window.fHandle = pCreateWindowExWithUserdata(pTopLevelWindowClass, dwStyle, 0, nil, cast[pointer](window))
   DragAcceptFiles(window.fHandle, true)
   window.Window.init()
@@ -968,6 +974,22 @@ method `height=`*(window: WindowImpl, height: int) =
   procCall window.Window.`height=`(height)
   window.pUpdateSize()
 
+method `minWidth=`(window: WindowImpl, minWidth: int) =
+  procCall window.Window.`minWidth=`(minWidth)
+  #pUpdateMinSize(window)
+
+method `minHeight=`(window: WindowImpl, minHeight: int) =
+  procCall window.Window.`minHeight=`(minHeight)
+  #pUpdateMinSize(window)
+
+method `resizable=`(window: WindowImpl, resizable: bool) =
+  procCall window.Window.`resizable=`(resizable)
+  if resizable:
+    pSetWindowLong(window.fHandle, GWL_STYLE, WS_CAPTION or WS_SYSMENU or WS_THICKFRAME)
+  else:
+    pSetWindowLong(window.fHandle, GWL_STYLE, WS_CAPTION or WS_SYSMENU)
+  window.pUpdatePosition()
+
 method `title=`(window: WindowImpl, title: string) =
   procCall window.Window.`title=`(title)
   pSetWindowText(window.fHandle, window.title)

src/nigui/private/windows/windows.nim

@@ -187,6 +187,7 @@ const
   WM_CUT* = 0x0300
   WM_COPY* = 0x0301
   WM_PASTE* = 0x0302
+  WM_GETMINMAXINFO* = 0x0024
   WS_CLIPCHILDREN* = 0x02000000
   WS_CAPTION* = 0x00C00000
   WS_CHILD* = 0x40000000
@@ -195,6 +196,8 @@ const
   WS_HSCROLL* = 0x00100000
   WS_OVERLAPPEDWINDOW* = 0x00CF0000
   WS_SYSMENU* = 0x00080000
+  WS_MINIMIZEBOX* = 0x00020000
+  WS_MAXIMIZEBOX* = 0x00010000
   WS_TABSTOP* = 0x00010000
   WS_THICKFRAME* = 0x00040000
   WS_VSCROLL* = 0x00200000
@@ -385,6 +388,13 @@ type
     lParam*: pointer
     iImage*: int32
 
+  MinMaxInfo* = object
+    ptReserved*: Point
+    ptMaxSize*: Point
+    ptMaxPosition*: Point
+    ptMinTrackSize*: Point
+    ptMaxTrackSize*: Point
+
 
 
 # ----------------------------------------------------------------------------------------