トップ 差分 一覧 Farm ソース 検索 ヘルプ PDF RSS ログイン

listbox

*disclaimer
247044

HSP

listbox

Reference

http://lhsp.s206.xrea.com/command/listbox.html


使用サンプル

fontcheck.hsp(5)

mes "listboxを使ったフォントの確認"
mes "copyleft 2022-06-22 sugiura@nagoya-u.jp"

	; 選択肢文字列を事前に変数に入れておくのがコツ
	fontlist = "UDデジタル教科書体 R\nMS 明朝\nMS ゴシック\nmsgothic\nmsmincho\nMS P明朝\nMS Pゴシック\nHG行書体\nCourier"

	; リストの各項目の文字列をnotegetで取得する準備
	notesel fontlist

	; listboxでは、選択された項目名ではなく、番号が取得される点に注意

*go

	pos 30, 120

	dore = ""						;具体的なフォント名
	f = 0							;listboxで選ばれた番号が入る
	objsize 160, 100
	listbox f,100,fontlist			;listbox 変数, 縦幅, 選択肢文字列

	objsize
	button goto "Check", *change

	stop
;-----------------------sub----------------

*change
	cls
	noteget dore, f		;noteselした変数fontlistのf番目の値をdoreに入れる
	
	pos 190, 120
	font dore, 36		;doreの中に具体的なフォント名が入る
	mes dore
	mes ""
	mes "あいちけんなごやし\n愛知県名古屋市\nThis is Nagoya."

	goto *go