window get controls (indented to show hierarchy)

[jeeswg]

E.g. try this on the Notepad Font dialog or Internet Explorer.

Code: Select all

q:: ;window get control info with indentation to indicate hierarchy
hWnd := WinGetID("A")
MsgBox(Clipboard := JEE_WinGetDescendants(hWnd))
return

JEE_WinGetDescendants(hWnd)
{
	local
	DetectHiddenWindows("On")
	oCtlList := WinGetControls("ahk_id " hWnd)
	vOutput := ""
	Loop oCtlList.Length
	;Loop % oCtlList.Length() ;AHK v1
	{
		vCtlClassNN := oCtlList[A_Index]
		hCtl := ControlGetHwnd(vCtlClassNN, "ahk_id " hWnd)
		vPfx := ""
		Loop
		{
			hCtl := DllCall("user32\GetAncestor", "Ptr",hCtl, "UInt",1, "Ptr") ;GA_PARENT := 1
			if (hCtl = hWnd)
				break
			vPfx .= "`t"
		}
		vOutput .= vPfx vCtlClassNN "`r`n"
	}
	return vOutput
}

[guest3456]

not sure you need to force-local the function. am i missing something?

[jeeswg]

I force local in all of my functions to prevent #Warn errors.

[guest3456]

ahh ok