｜目次｜前ﾍﾟｰｼﾞ｜次ﾍﾟｰｼﾞ｜
─────────────────────────────────────
１８．ﾗｼﾞｵﾎﾞﾀﾝ(TRadioButton)の使い方 
─────────────────────────────────────
 [1]ﾗｼﾞｵﾎﾞﾀﾝ(TRadioButton)ｵﾌﾞｼﾞｪｸﾄの作成
　　　   →共通ルーチン【ZVCMRAD】 
  �@予期しない値がｾｯﾄされていないようにローカル変数を削除します[D KILL^ZVCMSUB] 
  �Aｲﾍﾞﾝﾄﾏｽｸを設定します、例では[V2EVENT^ZVCMRAD]ですが-＞適切に設定 
  �Brectﾊﾟﾗﾒﾀを作成します。[D SETRECT^ZVCMRAD] 
     (x,y,w,h):位置サイズ情報(行桁サイズモードに設定後) 
     (color):ｴﾃﾞｯﾄｺﾝﾄﾛｰﾙの色番号(Colorﾌﾟﾛﾊﾟﾃｨ) 
     --＞指定なしの場合ﾃﾞﾌｫﾙﾄの色 
     (font):ｺﾝﾄﾛｰﾙのﾌｵﾝﾄ番号(Fontﾌﾟﾛﾊﾟﾃｨ) 
     --＞指定なしの場合(null)[font=498]のﾌｵﾝﾄをｾｯﾄ[SETRECTにおいて] 
     --＞0:指定の場合ﾃﾞﾌｫﾙﾄのﾌｵﾝﾄ 
     (keycode):ｷｰﾎﾞｰﾄﾞｲﾍﾞﾝﾄを発生させる終了ｷｰｺｰﾄﾞのｾｯﾄ 
     --＞0を指定した場合0番のｷｰｾｯﾄを指定した意味 
     ※ｲﾍﾞﾝﾄﾏｽｸ設定でｷｰﾎﾞｰﾄﾞｲﾍﾞﾝﾄを有効に設定しないとｷｰﾎﾞｰﾄﾞｲﾍﾞﾝﾄは発生しません 
     (その他のﾌﾟﾛﾊﾟﾃｨ):(zorder,TabOrder,TabStop)...は必要があれば設定します。 
     ※[D SETRECT^ZVCMRAD -＞ rectstrが作成される
  �Cﾗｼﾞｵﾎﾞﾀﾝｺﾝﾄﾛｰﾙに表示する文字列をeditﾊﾟﾗﾒﾀに設定します。[editstr] 
     ※[S editstr="ﾎﾞﾀﾝ表示する文字列"]
  �D[D CREATE^ZVCMRAD]で使用されるﾊﾟﾗﾒﾀを設定する 
     ※[S cid=(1〜1023の一意の番号)]
     ※[S form=(1〜1023の親ﾌｫｰﾑのﾌｫｰﾑ番号)]
     ※[S parent=(1〜1023の親ｺﾝﾄﾛｰﾙのcid番号)]
     ※[S group=(0〜32767のｸﾞﾙｰﾌﾟ番号)]
     ※[D CREATE^ZVCMRAD]ｺﾝﾄﾛｰﾙｵﾌﾞｼﾞｪｸﾄの作成
  �Eｲﾍﾞﾝﾄ応答ﾒｯｾｰｼﾞからﾗｼﾞｵﾎﾞﾀﾝﾎﾞﾀﾝが押されたことを感知する
     ※ｲﾍﾞﾝﾄ種別=ｸﾘｯｸイベントとフォーカスを失うｲﾍﾞﾝﾄで処理します
     ※ｲﾍﾞﾝﾄ応答ﾒｯｾｰｼﾞを読み込む[S RESP=$$ReadMsg^ZVCMSUB(Rtail)
     ※読み込んだ(受信)ｲﾍﾞﾝﾄ応答ﾒｯｾｰｼﾞを分解する[D VCMRESP^ZVCMSUB]
     ※(Revent2):ｲﾍﾞﾝﾄ種別
     ※(Rselcnt):0
     ※(Rselno):0 
     ※(Rmain):ﾎﾞﾀﾝの状態 -＞ 0:選択無し 1:選択有り
     ※【注】ﾎﾞﾀﾝの状態は、[フォーカスを失う時応答]では直前の状態です。
     ※【注】[クリック][フォーカスを得る時応答]が最新の状態です。
     ※(Rsub):ﾎﾞﾀﾝ文字列
     ※(Rkeycode):ｷｰﾎﾞｰﾄﾞｲﾍﾞﾝﾄ時仮想ｷｰｺｰﾄﾞ
     ※(Rshift):シフト状態 0:無し 1:シフト 2:ｺﾝﾄﾛｰﾙ 4:＜ALT＞の組み合わせ 
─────────────────────────────────────
 [2]ﾗｼﾞｵﾎﾞﾀﾝ(TRadioButton)ｵﾌﾞｼﾞｪｸﾄのｲﾍﾞﾝﾄ
　　　   →共通ルーチン【ZVCMEVENT】 
　　　   →共通ルーチン【ZVCMEVENT7】応答ｲﾍﾞﾝﾄｺｰﾄﾞ定数 
─────────────────────────────────────
◆ ｲﾍﾞﾝﾄﾏｽｸを設定(応答を可にする) 
　※ｲﾍﾞﾝﾄ設定変数を初期化→  D CLEAR^ZVCMEVENT 
  ※【注】ﾎﾞﾀﾝの状態は、[フォーカスを失う時応答]では直前の状態です。
  ※【注】[クリック][フォーカスを得る時応答]が最新の状態です。
─────────────────────────────────────
mask0= 2  : (1)マウス左クリックｲﾍﾞﾝﾄ応答(ﾋﾞｯﾄ1) 
　※ｲﾍﾞﾝﾄ設定変数を設定  →  D CLICK^ZVCMEVENT 
　※ﾘｽﾎﾟﾝｽ応答ﾒｯｾｰｼﾞ中のｲﾍﾞﾝﾄｺｰﾄﾞ→ [Revent2=EV2Click],[Revent1=EV1Click] 
─────────────────────────────────────
mask0= 4  : (2)マウス右クリック(ポップアップ)ｲﾍﾞﾝﾄ応答(ﾋﾞｯﾄ2) 
　※ｲﾍﾞﾝﾄ設定変数を設定  →  D POPUP^ZVCMEVENT 
　※ﾘｽﾎﾟﾝｽ応答ﾒｯｾｰｼﾞ中のｲﾍﾞﾝﾄｺｰﾄﾞ→ [Revent2=EV2RClick],[Revent1=EV1Popup] 
─────────────────────────────────────
mask0= 8  : (3)キーボードｲﾍﾞﾝﾄ応答(ﾋﾞｯﾄ3)  
　※ｲﾍﾞﾝﾄ設定変数を設定  →  D KEYBORD^ZVCMEVENT 
　※ﾘｽﾎﾟﾝｽ応答ﾒｯｾｰｼﾞ中のｲﾍﾞﾝﾄｺｰﾄﾞ→ [Revent2=EV2Keybord],[Revent1=EV1Keybord] 
─────────────────────────────────────
mask1= 8  : (11)フォーカスを失う時応答(ﾋﾞｯﾄ3) 
　※ｲﾍﾞﾝﾄ設定変数を設定  →  D KILLFOCUS^ZVCMEVENT 
　※ﾘｽﾎﾟﾝｽ応答ﾒｯｾｰｼﾞ中のｲﾍﾞﾝﾄｺｰﾄﾞ→ [Revent2=EV2Exit],[Revent1=EV1Exit] 
─────────────────────────────────────
mask1= 16 : (12)フォーカスを得る時応答(ﾋﾞｯﾄ4) 
　※ｲﾍﾞﾝﾄ設定変数を設定  →  D SETFOCUS^ZVCMEVENT 
　※ﾘｽﾎﾟﾝｽ応答ﾒｯｾｰｼﾞ中のｲﾍﾞﾝﾄｺｰﾄﾞ→ [Revent2=EV2Enter],[Revent1=EV1Enter] 
─────────────────────────────────────
　※ｲﾍﾞﾝﾄﾏｽｸを設定       →  D SETEVENT^ZVCMEVENT 
───────────────────────────────────
　　　　　　　　　　　　　  18-1
　　　　　｜目次｜前ﾍﾟｰｼﾞ｜次ﾍﾟｰｼﾞ｜