[Closed] getDisplayMesh Set key button flashing

Another disgusting UI hack:

fn enableSetKeyButton state =
(
	local aPanel = (for w in windows.getChildrenHWnd #max parent:#max where w[4] == "AnimatePanel" collect w[1])[1]
	local bHwnd = (windows.getChildrenHWnd aPanel parent:aPanel)[4][1]
	local WM_SETREDRAW = 0xB
	windows.sendMessage bHwnd WM_SETREDRAW (if state then 1 else 0) 0
)

tool create (
		
		on start do enableSetKeyButton off
		on stop do enableSetKeyButton on

		on mousePoint click do (
			nodeTM.translation = gridPoint;
			#stop
		)
	)