プロパティの参照と設定
| 参照
| 構文：＜変数＞＝＜コントロール名＞.＜プロパティ名＞();
|
| 用例：st=MyTextBox.text(); /*()は必須 */
|
| 設定
| 構文：CALL ＜コントロール名＞.＜プロパティ名＞ ＜設定値＞
|
| 用例：CALL MyTextBox.text "abc"; /* CALLが必要 */
|
【例題１】ボタンを押すと「いやん」と表示するダイアログを作る
要するに、ボタンをクリックするというイベントに対して、テキストボックスに文字を表示するというイベントハンドラを記述するということ。ビジュアルプログラミングの基本中の基本ですな。ポイントは、参照や設定をするコントロールには名前を付けることと、名前を付ける際に［Enter］キーを押すのを忘れないこと。
①Dr.Dialogを起動する。
②[Ctrl]＋[F2]を押してコントロールパレットを表示する。
③プッシュボタンとテキストボックスを一つずつダイアログ上に右ドラッグして配置する。
④配置したテキストボックスをダブルクリックする。
⑤[DrRexx]というダイアログが開くので、下の方にある［Name］タブをクリックする。
⑥[TEXTBOX]を選んで「TBOX1」という名前を付けて、必ず［Enter］キーを押して確定する。
⑦[DrRexx]ダイアログを閉じる。
⑧配置したプッシュボタンをダブルクリックする。
⑨再度[DrRexx]が開くので、次のようなコードを入力する。
Call TBOX1.text "いやん";
⑩[F5]を押してプログラムを実行する。
⑪プッシュボタンをクリックすると、テキストボックスの表示が変わる。
⑫プログラムを終了するときは、[Runtime monitor]の一番下の[STOP]ボタンを押す。
【例題２】ボタンを押すたびに、画面に「いやん」と「ばかん」を交互に表示する
さきほどの例題の改良版。プッシュボタンのイベントハンドラを次のように書き換えるだけでよい。今度はプロパティの設定だけでなく参照も行う。また、IF文による簡単な条件分岐も出てくる。すこ～しだけ、プログラムらしくなった。
st=TBOX1.text(); /* ここで設定値を参照している */
IF st="いやん" /* IF文による処理の分岐 */
THEN CALL TBOX1.text "ばかん"
ELSE CALL TBOX1.text "いやん"
【REXXのどろぬま目次】
【ホーム】