iterateButtonScope.ms

myDialog
(
	try(destroyDialog myDialog)catch()
	rollout myDialog "My Dialog"
	(
		button btn1 "Button1" across:5
		button btn2 "Button2"
		button btn3 "Button3"
		button btn4 "Button4"
		button btn5 "Button5"
		button btn6 "Button6" across:5
		button btn7 "Button7"
		button btn8 "Button8"
		button btn9 "Button9"
		button btn10 "Button10"
		fn btnPress num=
		(
			for i = 1 to 10 do
			(
				execute("myDialog.btn"+i as string+".text = \"Button"+i as string+"\"")
			)
			execute("myDialog.btn"+num as string+".text = \"PRESSED!\"")
		)
		on btn1 pressed do btnPress 1
		on btn2 pressed do btnPress 2
		on btn3 pressed do btnPress 3
		on btn4 pressed do btnPress 4
		on btn5 pressed do btnPress 5
		on btn6 pressed do btnPress 6
		on btn7 pressed do btnPress 7
		on btn8 pressed do btnPress 8
		on btn9 pressed do btnPress 9
		on btn10 pressed do btnPress 10
	)
	createDialog myDialog width:300 height:60 pos:[10,240]
)