| 過去の桐井戸端ＢＢＳ （桐ver.９） |
| 21376 | キーダウンイベントで２桁を使うのは無理なのでしょうか | 若葉マークン | 2003/07/11-11:12 |
| いつも、困った時の『桐井戸端BBS』ばかりですみません。 どなたかヒントください。 メニュウ代わりのフォームを作っています。 ①入力 ②訂正 ③検索 … … … ⑨印刷 上記のような標題のコマンドボタンを配置し キーダウンイベントで実行させます。 メニュー番号９までは問題なく作成実行できるのですが… メニュー番号が２桁になって困ってしまいました。 いろいろ考えたのですが… どなたかヒント下さい。 | |||
| 21379 | キーダウン（キー入力）イベントで２桁を扱う | 悲しげ | 2003/07/11-12:23 |
| 記事番号21376へのコメント メニュー番号として０～９を使い切ったら、 次は（キーダウンまたはキー入力イベントを使っているのなら）Ａ～Ｚを使う手もあります。 私は棚番（必ず２桁）を指定する時に、次例のような処理をさせていたりします。 手続き定義開始 フォーム::キー入力(長整数 &文字キー) ＊確認 #STR(&文字キー) /*&文字キーの値が48なら０、以降57なら９となる*/ cond(&文字キー<48 .or 57<&文字キー) return method @フォーム.変数変更() if(&回<1) &棚=#str(&文字キー-48) &回=1 else if(&回=1) &棚=&棚+#str(&文字キー-48) method @フォーム.変数変更() 検索 [棚]{&棚},終了状態=&終了 if(&終了<1) 確認 "棚番"+&棚+"は存在してません！" &棚="",&回=0 else method @b閉じる.実行() end end 手続き定義終了 | |||
| 21380 | Re:キーダウン（キー入力）イベントで２桁を扱う | 悲しげ | 2003/07/11-13:44 |
| 記事番号21379へのコメント 一部訂正(^^;) else if(&回=1) &棚=&棚+#str(&文字キー-48) ＊method @フォーム.変数変更() /*←×*/ method @フォーム.描画更新() /*←○*/ 検索 [棚]{&棚},終了状態=&終了 | |||
| 21401 | Re:キーダウン（キー入力）イベントで２桁を扱う | 若葉マークン | 2003/07/14-09:14 |
| 記事番号21380へのコメント 悲しげ殿 おはようございます。いつもいつもアドバイスありがとうございます。 一読しただけでは、理解できていませんが…やってみます。 また、結果報告いたします。 | |||