アドレス帳④ 『HSP3』
前回は簡単な「都道府県プルダウン」を作成しました。今回は登録画面をつくっていきます。
| 項目 | オブジェクト | 格納変数 | 最大文字数 | 初期値 |
| 名前 | input | name | 20 | |
| ふりかな | input | kana | 20 | |
| 郵便番号 | input | zip | 10 | |
| 都道府県 | combox | ken_id | 0 | |
| 住所 | input | address | 100 | |
| ﾏﾝﾝｼｮﾝ等 | input | address2 | 100 | |
| 備考 | mesbox | biko | 100 |
アドレス帳の項目とオブジェクトは上記のようにしました。都道府県は前回作成した「都道府県モジュール」を使います。性別をラジオボタンで選択させて登録したかったのですが、HSP3はラジオボタンは標準ではないようです。ラジオボタンは応用として後々しようと思うので今回は省きます。
| 1. 2. 3. 4. 5. 6. 7. 8. 9. 10. 11. 12. 13. 14. 15. 16. 17. 18. 19. 20. 21. 22. 23. 24. 25. 26. 27. 28. 29. 30. 31. 32. 33. 34. 35. 36. 37. 38. 39. 40. 41. 42. 43. 44. 45. 46. 47. 48. 49. 50. 51. 52. 53. 54. 55. 56. 57. 58. 59. |
#include "lib_address.hsp" screen 0,600,400 //windowサイズ title "住所録" //windowタイトル //********************************************* // 初期設定 //********************************************* kenString = fun_KenString() //********************************************* // メニュー画面 //********************************************* *menu cls : gosub *init objsize 200,50 pos 200,70 :button "新規登録",*inputData pos 200,170 :button "一覧",*menu pos 200,270 :button "終了",*appEnd stop //********************************************* // 初期化 //********************************************* *init name = "" //名前 kana = "" //ふりかな zip = "" //郵便番号 ken_id = 0 //都道府県 address = "" //住所 address2 = "" //マンション等 biko = "" //備考 return //********************************************* // 登録編修画面 //********************************************* *inputData cls pos 50,20 :mes "■登録" objsize 300,150 pos 50,50 :mes "名前" pos 150,50 :input name, 200, 20,20 pos 50,80 :mes "ふりかな" pos 150,80 :input kana, 200, 20,20 pos 50,110 :mes "郵便番号" pos 150,110 :input zip, 80, 20,10 pos 50,170 :mes "住所" pos 150,170 :input address, 350, 20,100 pos 50,200 :mes "ﾏﾝｼｮﾝ等" pos 150,200 :input address2, 350, 20,100 pos 50,230 :mes "備考" pos 150,230 :mesbox biko, 350,50,,100 objsize 100,150 pos 50,140 :mes "都道府県" pos 150,140 :combox ken_id,100,kenString stop //********************************************* // 終了処理 //********************************************* *appEnd end stop |
今回は入力フォームを表示しただけです。まだ「登録ボタン」をつけていません。次回、「登録ボタン」によるファイルへの書き込みを行いたいと思います。
初期値(初期化）の設定は、ラベル「*init」で行います。入力画面の表示は、ラベル「*inputData」で行います。トップメニューを表示すると13行目：データの初期化を行います。「新規登録」ボタンの飛び先をラベル「*inputData」に変更したので、「新規登録」ボタンをクリックすると入力画面が表示されます。
都道府県プルダウン作成用のモジュールは「lib_address.hsp」と別ファイルにしました。1行目でファイルを取り込んでいます。
サンプルファイル：
lib_address.hsp
address_sample.hsp
2009 年 4 月 12 日 6:22 PM
[...] アドレス帳④ 『HSP3』 [...]