HSPTV!掲示板

選択されたボタンをエンタ―で処理に飛ばしたいんです。

いくつかのボタンがあって、選択されたボタンがエンタ―された時にボタンに応じた処理に飛ばすにはどうすればいいですか？

因みに、ボタンはTABで選択している時です。
よろしくお願いします。

これも変な日本語に成っていますが、取りあえずボタンのヘルプや
サンプルを見て下さい。

KAさん
buttonのヘルプは読んだのですが、enterを押した時どのbuttonを押しているのかを知る方法がわかりませんでした。

変な日本語ごめんなさい。
日本に住んで8年になりますが、外国人なのでまだ日本語がヘタです。
申し訳ないです。

buttonはgosub/returnで利用するのが便利です。
どうしても押されたボタンを取得したければ
gosubで飛んだ先に変数に何か値を入れる等して判定は出来ますが、
「どのボタンが押されたか」で考えるのではなく
「このボタンが押された場合の処理を書く」と考えたほうが良いかと思います。

HSP Document Libraryにかいてあります。

ボタンが押された時にジャンプして実行されるプログラムでは、システム変数statの初期値としてオブジェクトIDが代入されます。

せっかくなのでソースもはっておきます。

repeat 10
	button "button "+cnt,*test
	//if (cnt==0) : clrobj 0 //コメントアウトを外すと・・・？
loop
stop
*test
dialog "button "+stat+"が押されました！"

エンターが押された時にアクティブになっているオブジョクトを調べる。でいいのかな。
「アクティブなオブジェクト」がキーワード

> HSPのたまごさん
外国人のHSPユ−ザー少ないっぽいんで　頑張ってくださいね
英語でＨＳＰの情報発信とか
反響多そうですね

Enterが押された時に選択されてるオブジェクトIDを取得して
ボタンのジャンプ先に行く

onkey goto *key

button gosub "button "+0,*test0
test_label(stat)=*test0	//ラベルを配列に代入
button gosub "button "+1,*test1
test_label(stat)=*test1	//ラベルを配列に代入
button gosub "button "+2,*test2
test_label(stat)=*test2	//ラベルを配列に代入

stop

*key
	if iparam = 13 {//13=Enterの文字コード 
		objsel -1	//現在選択中のボタンオブジェクトのIDをstatに取得
		if stat>=0 {gosub test_label(stat)}
	}

stop

*test0
mes "button 0が押されました！"
return

*test1
mes "button 1が押されました！"
return

*test2
mes "button 2が押されました！"
return

つまり
> 因みに、ボタンはTABで選択している時です。
ボタンにフォーカスを当てた状態で…

> 選択されたボタンをエンタ―で処理に飛ばしたいんです。
…キーボードのエンターキーを押して、押されたボタンに対応したサブルーチンにジャンプしたい。
という事でしょうか？

この操作方法なら特別な処理は必要ありません。普通にボタン作ればいいだけです。
HSPのボタンはごく普通のGUIボタンなので、フォーカス当ててればエンターキーでクリックできます。

もしかして、複数あるボタンのジャンプ先がどれも同じにしている、とかでしょうか？

>HSPのボタンはごく普通のGUIボタンなので、フォーカス当ててればエンターキーでクリックできます。
試したらわかるけどできない。
スペースにしか反応しない。

> 試したらわかるけどできない。
> スペースにしか反応しない。

ごめんなさい。
どうやら思い込みで回答してしまっていました。確認不足でした。
暇人さんのonkeyを使った方法がベストだと思います。

暇人さんのサンプルで問題は解決しました。

みなさんありがとう！！！

外人といっても英語圏内じゃないんですよー。

感謝。