■14611 / inTopicNo.2) |
Re[1]: イベントでフォームをまとめて開く
|
□投稿者/ ONnoji -(2024/10/11(Fri) 13:41:06)
| 2024/10/11(Fri) 14:02:46 編集(投稿者)
> モーダルフォームにしたりとかではなく、コマンドボタンを押したら > 複数のフォームを開きたいです。
コマンドボタンの[機能名:開く]では、4行しかありませんから、4個のフォームが限界ですね。
コマンドボタンの[機能名:手続き実行]で手続きを呼び出し、
その手続き内で、フォームを開く仕掛けを用意するしかないと思いますよ。 ・・・・・・・・・・
例えば、手続き内で
メソッド呼び出し @フォームを開くコマンドボタン1.実行() メソッド呼び出し @フォームを開くコマンドボタン2.実行() : :
とメソッドを複数実行すればOKですが、実行するためのコマンドボタンを何個も作るのが面倒ですよね。 ・・・・・・・・・・・・・・・・・・・・・・・・ ◇ ◇ ◇ ◇ ◇
そこで、[機能名:開く]をセットしたコマンドボタンを作らずに、プログラミングだけでフォームが開けると便利ですよね。 ・・・・・・・・・・・・・・・・・・・・・
以下はその例です。
例えば次のようなコマンドボタン:
オブジェクト名: cmdテスト 標題 : テスト
機能名 機能パラメータリスト 1 表示 2 手続き実行 cmdテストClick 3 なし 4 なし
があったとします。
[機能名:手続き実行]で実行する手続きは次の通りです。
手続き定義開始 cmdテストClick( ) 変数宣言 自動,文字列{ &icon, &title = "cmdテストClick( )", &msg } 変数宣言 自動,文字列{ &wfm, &tbl } 変数宣言 自動,整数 { &hdl, &openStatus }
&wfm = #一括パス名 + "transaction_A.wfx" &tbl = #一括パス名 + "transaction_A.tbx" 手続き実行 HDLLNCprcWindowAppear( &wfm, &tbl, &hdl, &openStatus )
&wfm = #一括パス名 + "transaction_B.wfx" &tbl = #一括パス名 + "transaction_B.tbx" 手続き実行 HDLLNCprcWindowAppear( &wfm, &tbl, &hdl, &openStatus )
&wfm = #一括パス名 + "transaction_C.wfx" &tbl = #一括パス名 + "transaction_C.tbx" 手続き実行 HDLLNCprcWindowAppear( &wfm, &tbl, &hdl, &openStatus )
&wfm = #一括パス名 + "transaction_D.wfx" &tbl = #一括パス名 + "transaction_D.tbx" 手続き実行 HDLLNCprcWindowAppear( &wfm, &tbl, &hdl, &openStatus )
&wfm = #一括パス名 + "transaction_E.wfx" &tbl = #一括パス名 + "transaction_E.tbx" 手続き実行 HDLLNCprcWindowAppear( &wfm, &tbl, &hdl, &openStatus )
&wfm = #一括パス名 + "transaction_F.wfx" &tbl = #一括パス名 + "transaction_F.tbx" 手続き実行 HDLLNCprcWindowAppear( &wfm, &tbl, &hdl, &openStatus )
手続き定義終了
以上の例は、拙作:INF_Framework のランチャー機能を利用しています。
例では、6個のフォームを連続して開きます。
◇ ◇ ◇ ◇ ◇
詳しくは、【多遊】さんホームページの DOWN LOAD BBS をご覧ください。
こちら ↓ DOWN LOAD BBS ■446 / 親階層) Thin_INF_Framework のご案内 https://tayu.o0o0.jp/bbs/kiri/cbbs.cgi?mode=one&namber=446&type=0&space=0&no=2
Thin_INF_Framework のご案内 ツリー https://tayu.o0o0.jp/bbs/kiri/cbbs.cgi?mode=all&namber=446&type=0&space=0&no=2
p.s.
なお、DOWN LOAD BBS でダウンロード出来る Thin INF_Framework はベータ版です。
Thin INF_Framework のご質問は、DOWN LOAD BBS の方へお願いいたします。
p.p.s.
もしも、ランチャーだけを利用するだけでよければ、 標準のコマンドボタンは無くてOKです。
│ ├ EZWcmdズームイン ┐ │ ├ EZWcmdズームアウト │ │ ├ EZWtxtMagnification │ │ ├ INFcmdWhoAreYou ├─ 標準のコマンドボタン ※ヘッダ部左上に配置することを推奨します │ ├ HDLVARcmdWhoAreYou │ │ ├ cmdAlt_I_ズームイン │ ※ cmdAlt_I_ズームイン と cmdAlt_O_ズームアウト は[画面表示]= しない │ └ cmdAlt_O_ズームアウト ┘
|
|