AutoHotkey Community

Anchor("EdtComment", "wh")
Anchor("GrpMenuBorder", "w")
Anchor("ChkSig", "y")
Anchor("DDLSig", "y")
Anchor("BtnEditSig", "y")
Anchor("BtnDelSig", "y")
Anchor("BtnSend", "xy", true)
Anchor("BtnPreview", "xy", true)
Anchor("BtnReset", "xy", true)
Anchor("BtnPinned", "x")

a = EdtComment: wh, GrpMenuBorder: w, ChkSig: y, DDLSig: y, BtnEditSig: y
   , BtnDelSig: y, BtnSend: xy draw, BtnPreview: xy draw, BtnReset: xy draw
   , BtnPinned: x

Loop, Parse, a, `,, %A_Space%
{
   StringSplit, a, A_LoopField, :
   a3 := InStr(a2, "draw")
   Anchor(a1, a3 ? SubStr(a2, 1, a3 - 1) : a2, !!a3)
}

Gui, +Resize
Gui, Margin, 10, 10
Gui, Add, ListView, xm ym+20  w200 h100 Grid vlv_One, One|Two|Three
Gui, Add, ListView, xm ym+140 w200 h200 Grid vlv_Two , Four|Five|Six
Gui, Add, StatusBar
Gui, Show, Autosize Center
Return
; ------------------------------------------------------------------------

GuiEscape:
GuiClose:
ExitApp

; ------------------------------------------------------------------------

GuiSize:
{
    ; This works perfectly...
   
    Anchor( "lv_One", "w h0.2", 1 )
    Anchor( "lv_Two", "y0.2 w", 1 )
   
    ; ...but, I want the bottom listview to resize vertically as well so I
    ; add the 'h'. 
   
    ; Anchor( "lv_Two", "y0.2 w h", 1 )
   
    ; However, when I add the 'h', the bottom listview disappears (or is
    ; somewhere off the main form).
   
    ; Furthermore, if you take out the 'y' param, it does what it should
    ; (except, of course, that the bottom listview doesn't move up/down now).
   
    ; Anchor( "lv_Two", "w h", 1 )
}
Return

; ------------------------------------------------------------------------

Anchor( ctrl, a, draw = false ) { ; v3.4.1 - Titan
   static d
   GuiControlGet, p, Pos, %ctrl%
   If !A_Gui or ErrorLevel
      Return
   s = `n%A_Gui%:%ctrl%=
   c = x.w.y.h./.7.%A_GuiWidth%.%A_GuiHeight%
   StringSplit, c, c, .
   Loop, 4
      b%A_Index% += !RegExMatch(a, c%A_Index% . "(?P<" . A_Index . ">[\d.]+)", b)
   If !InStr(d, s)
      d := d . s . px - c7 * b1 . c5 . pw - c7 * b2
         . c5 . py - c8 * b3 . c5 . ph - c8 * b4 . c5
   Loop, 4
      If InStr(a, c%A_Index%) {
         i = %A_Index%
         c6 += i > 2
         RegExMatch(d, s . "(?:(-?[\d.]+)/){" . i . "}", p)
         m := m . c%i% . p1 + c%c6% * b%i%
      }
   If draw
      t = Draw
   GuiControl, Move%t%, %ctrl%, %m%
}

; ------------------------------------------------------------------------

Anchor( "lv_One", "w h0.2", 1 )
Anchor( "lv_Two", "y0.2 w h0.8", 1 )

Anchor(In_CtrlVar, In_Anchor, Draw = false)
  {
    ; Thanks to Titan for this function (v3.4.2)
    ; Details under http://www.autohotkey.com/forum/topic4348.html
   
    ; In_CtrlVar  : Controls associated variable (e.g. "MyEdit")
    ; In_Anchor   : Anchors (x, y, w, h)
    ; Draw        : true/1 to use MoveDraw otherwise leave blank for a normal Move 
 
    ; store control positions and sizes in an internally parsable table-like format
    static DataTbl
     
    ; Retrieve control's size and position
    GuiControlGet, CtrlPS, Pos, %In_CtrlVar%
    ; If control doesn't exist or this thread isn't called by a GUI event...
    If !A_Gui or ErrorLevel
      Return
     
    ; Create identifier for the control in the current window
    Signtre = `n%A_Gui%:%In_CtrlVar%=
    ; Period-delimited variable for parsing support
    PrsHlp = x.w.y.h./.7.%A_GuiWidth%.%A_GuiHeight%
    StringSplit, PrsHlp, PrsHlp, .
     
    ; Retrieve relative factors by RegEx and store them into "RelFact" array
    Loop, 4
      RelFact%A_Index% += !RegExMatch(In_Anchor, PrsHlp%A_Index% . "(?P<" . A_Index . ">[\d.]+)", RelFact)

    ; If current signature is not found in the data table, concatenate each value
    ; subtracted by the gui width for x/w or height for y/h and multiplied by it's factor.
    If !InStr(DataTbl, Signtre)
      DataTbl := DataTbl . Signtre . CtrlPSX - PrsHlp7 * RelFact1 . PrsHlp5 . CtrlPSW - PrsHlp7 * RelFact2
              .  PrsHlp5 . CtrlPSY - PrsHlp8 * RelFact3 . PrsHlp5 . CtrlPSH - PrsHlp8 * RelFact4 . PrsHlp5
     
    ; For each of the four possible anchors (again):
    Loop, 4
      If InStr(In_Anchor, PrsHlp%A_Index%)
        {
          ; Alias for the Loop index
          LoopIdx = %A_Index%
          ; For x/w, PrsHlp6 equals to the GUI width, otherwise height
           PrsHlp6 += !cx AND (cx := LoopIdx > 2)
          ; This regular expression assigns the variable CtrlPS1 to the absolute dimension
          ; stored in the data table:
           RegExMatch(DataTbl, Signtre . "(?:(-?[\d.]+)/){" . LoopIdx . "}", CtrlPS)
          ; Concatenate the new value and it's anchor to the variable 'NewVal':
           NewVal := NewVal . PrsHlp%LoopIdx% . CtrlPS1 + PrsHlp%PrsHlp6% * RelFact%LoopIdx%
        }
    ; If Draw is true use GuiControl, MoveDraw instead of normal GuiControl, Move
    If Draw
      GCtrlMv = Draw
    ; Update the positions of the control
    GuiControl, Move%GCtrlMv%, %In_CtrlVar%, %NewVal%
  }

c6 += !cx and (cx := i > 2)