[Closed] How To … Change Dialog's Icon?

try(destroyDialog test_rol)catch()
rollout test_rol "< - Custom Icon" height:20 width:200
(
	on test_rol open do
	(
		d = (windows.getChildHWND 0 test_rol.title)[1]
		WM_SETICON = 0x0080
		ICON_SMALL = 0
		icon = dotnetobject "System.Drawing.Icon" (getdir #ui + "/Icons/tvCutObj.ico")
		windows.SendMessage d WM_SETICON ICON_SMALL icon.handle
	)
)
createDialog test_rol