HSPポータル
サイトマップ お問い合わせ


HSPTV!掲示板


未解決 解決 停止 削除要請

2023
1227
ゆっくりXPキーボードだけでボタンを選択するには?5未解決


ゆっくりXP

リンク

2023/12/27(Wed) 19:17:16|NO.100926

マウスを使わずにキーボードだけでボタンを選択し、Enterキーで反応するようにしたいのですが、できないのでしょうか?
SetFocusで合わせてEnterキーを押しても反応しません。これはボタンのスタイルを変えないとできないのでしょうか?
dialogやWindows APIのMessageBoxのボタンでは、もちろんEnterキーでも反応します。
お恥ずかしい質問で申し訳ないのですが、いくらググっても見つからなかったので質問します。

#include "user32.as" button "A",*a SetFocus objinfo_hwnd(stat) *a dialog "テスト"



この記事に返信する


ゆっくりXP

リンク

2023/12/27(Wed) 19:19:35|NO.100927

ラベルの前にstop入れるの忘れてました、失礼。



窓月らら

リンク

2023/12/27(Wed) 19:54:46|NO.100928

Windows 10 ではどこにフォーカスがあたってるかよくわからないという問題はありますが
いちおう TAB でフォーカスの移動はできていて、SPACE キーで実行はできます。。



名無し

リンク

2023/12/27(Wed) 19:58:23|NO.100929

objsel命令で現在セレクトされているオブジェクトが分かるので、
onkeyなりgetkeyなりでEnterの入力判定後の処理でobjselを実行し、
選択されてるオブジェクトに合わせて処理をさせれば比較的簡単に、
HSP内臓命令のみで実装できるのではないでしょうか?



名無し

リンク

2023/12/27(Wed) 20:09:00|NO.100930

ささっと適当に書いたけど取り合えず希望通りの動作をすることは確認済み。
もうちょっとスマートな書き方があるような気がしないでもないような。
Enterに拘ってないなら窓月ららさんの仰ってる通りSpaceで動作はするので
それが一番楽ではあると思う。
ちなみに、こちらの環境もWin10ではあるけど、
フォーカスがどこに当たってるかは普通にわかる(ボタンの周りに点線が出ている)ので、
同じWin10でも環境によって違うのかもしれない。
	button gosub "a",*a
button gosub "b",*b repeat objsel -1 title ""+stat getkey k,13 if k=1 : gosub,*key wait 1 loop stop *a dialog "a" return stop *b dialog "b" return stop *key objsel -1 switch stat case 0 gosub,*a swbreak case 1 gosub,*b swbreak swend return stop



ゆっくりXP

リンク

2023/12/27(Wed) 22:44:58|NO.100932

自分の環境はWindows 11ですが、メッセージボックスのようにEnterキーを押したらボタンが押されるという処理をしたいのです。
ボタンのスタイルを変えればいけそうですかね?どこか見つけてたはずなんですけど、忘れてまして…。
そういえば、Windows 11ボタンって角丸が付いてあるのが違和感がありますね…。
Windows 11でも四角のボタンに変更することってできますかね?



記事削除

記事NO.パスワード
(質問が解決したスレッドは他の利用者に活用してもらうため、削除しないようお願いします)

NO.100926への返信

マスコット

好きなマスコットを選んでください。

名前

e-mail
HOME
  1. 初めて利用する方は、HSP3掲示板の使い方をお読みください。
  2. 不要部分の多い長いスクリプトの投稿は ご遠慮ください。
  3. 書き込みは自動改行されません。適度に改行を入れてください。
  4. スクリプトは小文字の<pre>〜</pre>で囲むと見やすく表示できます。

削除用パスワード

解決したら質問者本人がここをチェックしてください。

エラー発生時、再送信すると二重送信になることがあります。
回答が得られたら、お礼書き込み時に[解決]チェックしてください。
SPAM防止のためURLから始まる文章は投稿できません。
SPAM防止のため英文字のみの本文を投稿することはできません。

ONION software Copyright 1997-2023(c) All rights reserved.