键位不够用之 Toolbar

https://www.cnblogs.com/yeungchie/

• code

act1 = hiCreateAction(
	?name		‘act1
	?iconText	"Act1"
	?callback	"println(\"Act 1\")"
)

cob1 = hiCreateToolbarComboBox(
	?name		‘cob1
	?items		list("T1" "T2" "T3")
	?value		"T1"
)

tpin1 = hiCreateToolbarTypein(
	?name		‘tpin1
	?value		"MET1"
	?width		
)

tbar = hiCreateToolbar(
	?name	‘tbar
	?title	"Test bar"
	?items	list(act1 cob1 tpin1)
)

hiPlaceToolbar(win() tbar ‘top)

• show
  

键位不够用之 Toolbar

原文：https://www.cnblogs.com/yeungchie/p/13636259.html