AutoHotkey Community

Gui, +lastfound
h := WInExist()

GuiAddIPAddress(h, 0, 0, 100, 100)
Gui,  Show, w200 h200

#SingleInstance force

Gui, +LastFound
Gui, Add, Tab2, w170 h90 gTabChange AltSubmit vctab, tab 1|tab 2
hIPA := IPAddress_CreateControl(WinExist(), "w150 h20")
Gui Add, Text, , o hai thar, I am a text control
Gui Show, , %A_Space%
return

GuiClose:
   ExitApp

TabChange:
   Gui, Submit, NoHide
   IPAddress_Show(hIPA, ctab = 1)
   return
IPAddress_Show(hwnd, show) {
   Control, % show ? "Show" : "Hide", , , ahk_id %hwnd%
   }

IPAddress_CreateControl(guiHwnd, options) {
   static ctext

   Gui, Add, Text, hidden vctext %options%
   GuiControlGet, _, Pos, ctext
   GuiControl, -v, ctext

   ipaHwnd := DLLCall("CreateWindowEx"
         , "UInt", 0               ; Style, can be WS_EX_CLIENTEDGE = 0x200
         , "Str", "SysIPAddress32" ; Class Name
         , "UInt", 0               ; Window name
         , "UInt", 0x50010000      ; Window style:  WS_CHILD | WS_VISIBLE | WS_TABSTOP
         , "Int", _x               ; X position
         , "Int", _y               ; Y position
         , "Int", _w               ; Width
         , "Int", _h               ; Height
         , "UInt", guiHwnd         ; Handle of parent
         , "UInt", 0               ; Menu
         , "UInt", 0               ; hInstance, unneeded with User32 components
         , "UInt", 0)              ; User defined style

   return ipaHwnd
   }

/**
 * Enable and Disable the control. _ipaFlag must be 1 (Enable) or 0 (Disable)
 */
IPAddress_EnableDisable(_ipaHwnd, _ipaFlag)
{
   ; WM_ENABLE := 0x0A
   PostMessage 10, %_ipaFlag%, 0, , ahk_id %_ipaHwnd%
}