(現在 過去ログ23 を表示中)

HOME HELP 新規作成 新着記事 トピック表示 ファイル一覧 検索 過去ログ

[ 最新記事及び返信フォームをトピックトップへ ]

■3413 / inTopicNo.1) 　お世話になります。フォーム上で
  ▼■
□投稿者/ 竜 -(2008/02/13(Wed) 01:11:08)
    またまた、お世話になります。
    皆様、風邪は大丈夫でしょうか？


    早速です。
    また、初歩的な質問ですが、ご勘弁を。
    フォーム上でグループを選択したいのですがどの様にしたらいいのでしょうか？
    添付の仮データですが、プルダウンメニュー化をしたいを考えてます。
    後一つは、チェックボタンで、「ドラマ」のチェックボタンを作って
    それを押したらドラマだけ表示させたいのですが。
    グループ選択の桐メニューもあるのですが、使いづらくて楽に使わせたく思いまして。
    皆様の協力お願いいたします。

111.zip/91KB
引用返信 [メール受信/ON] 削除キー/
■3421 / inTopicNo.2) 　Re[1]: お世話になります。フォーム上で
□投稿者/ 今村　誠 -(2008/02/13(Wed) 22:35:10)
    竜さんこんにちは、桐用語ではドロップダウンメニューが
    正しいのではないでしょうか。
    入寮支援ボタンが一番の近いように思います。
    ヘルプを見てリストを自分で書くか、イベントで配列変数に
    好きな順番で格納すれば希望の動作になると思います。
    イベントを使えるように、ヘルプ→目次→一括処理履歴イベント
    →入門→イベント処理
    を勉強することをお勧めします。

    名札 メイン

    var 局所,Str{&Sjtbl="ジャンル.tbl"},Long{&Lcount}
    表　&Sjtbl
    絞り込み　単一化={[種類]}
    var Local,Str{&Sjlist[#総件数]}
    for &Lcount=1,#総件数
    　&Sjlist[&Lcount]=[種類]
    　ジャンプ　行番号=次行
    end
    &Sjtbl="ジャンルを選択して下さい"
    終了　表　編集対象表
    ＊


    手続き定義開始　ﾃｷｽﾄ_24::ｿｰｽ値更新()
    　メソッド呼び出し　 @ﾎﾞﾀﾝ_27.実行()
    　if ( &Sjtbl<>"ジャンルを選択して下さい")
    　　絞り込み　[種類]_&Sjtbl
    　else
    　　&Sjtbl="ジャンルを選択して下さい"
    　　絞り込み解除　1
    　end
    手続き定義終了


引用返信 [メール受信/OFF] 削除キー/
■3423 / inTopicNo.3) 　ドロップダウンリスト・チェックボックス
□投稿者/ アックン -(2008/02/14(Thu) 14:00:37)
    竜さんの見本を一部変更してアップします。Ver９−2006(V９-2004 sp3)です。
    ドロップダウンでドラマ以外を選んでも、チェックボタンのチェックが入ったままですから、ちょっとこのままではおかしいと思いますけど、やりたいことはおよそこんな感じでいいんでしょうか（？）。

    主な変更箇所
    ・分類.wfm
    オブジェクトの属性（分類　フォーム）画面
    イベント（タブ）のイベントファイル名：分類

    ヘッダ部のグループオブジェクトをテキストオブジェクトに変更
    このテキストオブジェクトのソース：&種類
    イベント（タブ）のイベント：ソース値更新をチェック

    入力支援ボタンの選択値リスト：&分類
    リストの種別：ドロップダウンリスト

    ・分類.kev（イベントファイル）
    名札 メイン
    　var 文字列 { &種類 , &トグル }
    　表 "ジャンル.tbl"
    　解除 *
    　絞り込み　[種類]<>""
    　絞り込み　単一化={ [種類] }
    　var 文字列 { &分類[&選択件数] }
    　検索 [種類]{ #progn( #setvar( "分類", #行番号, [種類] ) , #行番号 ) = &選択件数 }
    　終了　表　編集対象表
    ＊

    手続き定義開始　tジャンル::ｿｰｽ値更新()
    　method @ﾌｫｰﾑ.更新モード設定( 0 )
    　絞り込み解除 *
    　絞り込み　[種類]=&種類
    手続き定義終了

    手続き定義開始　ﾄｸﾞﾙﾎﾞﾀﾝ_1::ｿｰｽ値更新()
    　method @ﾌｫｰﾑ.更新モード設定( 0 )
    　if( &トグル="ドラマ" )
    　　　絞り込み解除 *
    　　　絞り込み　[種類]=&トグル
    　else
    　　　絞り込み解除 *
    　end
    手続き定義終了

    試してみてください。アックン(=^･^=)

1202965237.lzh/13KB
引用返信 [メール受信/OFF] 削除キー/
■3431 / inTopicNo.4) 　Re[1]: お世話になります。フォーム上で
□投稿者/ 竜 -(2008/02/17(Sun) 07:28:01)

    今村様
    アックン様

    ありがとうございました
    返事遅れて申し訳ありません。

    自分なりにまた勉強して改造してみます、


解決済み!
引用返信 [メール受信/OFF] 削除キー/


トピック内ページ移動 / << 0 >>

このトピックに書きこむ

過去ログには書き込み不可

Mode/　 Pass/

HOME HELP 新規作成 新着記事 トピック表示 ファイル一覧 検索 過去ログ

- Child Tree -
- Antispam Version -