RosettaCodeData/Task/Simulate-input-Mouse/Tcl/simulate-input-mouse-1.tcl

mirror of https://github.com/acmeism/RosettaCodeData.git
# Simulate a full click cycle: button down and up
event generate .okBtn <ButtonPress-1> -x 5 -y 5
event generate .okBtn <ButtonRelease-1> -x 5 -y 5
	`# Simulate a full click cycle: button down and up`
	`event generate .okBtn <ButtonPress-1> -x 5 -y 5`
	`event generate .okBtn <ButtonRelease-1> -x 5 -y 5`