DOWN LOAD BBS

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

■348 / 親記事) 　193 クラシックUI_モダンUI_変換ユーティリティ
  ▼■
□投稿者/ ONnoji -(2020/08/23(Sun) 15:08:35)
    2020/08/23(Sun) 15:10:47 編集(投稿者)

    　■使い方

    　１．最初に、クラシックUI_モダンUI_変換ユーティリティを開きます。

    　２．次に、いずれかのコマンドボタンを実行してターゲットのフォームを選びます。

    　　［ウィンドウ一覧...］　　… 開いているフォームからターゲットのフォームを選びます

    　　［以前開いたファイル...］… 以前ターゲットにしたフォームの一覧からターゲットのフォームを選びます

    　　［開く...］　　　　　　　… ［開く］ダイアログでターゲットのフォームを選びます

    　３．最後にＵＩ変換をするコマンドボタンを実行します

    　　［モダンＵＩ］…　フラットなＵＩに変換します

    　　［クラシックＵＩ］…　立体的なＵＩに変換します

    　　＜　変換対象　＞

    　　○　１０　テキストボックス　※境界線モードが"囲み罫線"で［ソース］属性の値が編集可能なもののみ対象　表形式または伝票形式のフォーム明細部を除く
    　　○　１４　グループ項目　　　※［グループソース］属性の値が編集可能なもののみ対象
    　　○　３０　コマンドボタン　　※INF_Frameworkのファミリ：famCAPは対象外
    　　○　３５　トグルボタン
    　　○　３７　内部トグルボタン
    　　○　７０　リストボックス

    　　※数字は［領域種別］メソッドで取得できる領域種別番号です　
    　　※［透明なオブジェクト］は変換対象外です

    　■カスタマイズ（改造）に関して

    　　手続き：UIprcObjectPropertyModify を改造するとカスタマイズできます。

    　　手続きの引数の説明

    　　整数　 &hdl　　　　　　 …　ターゲットのハンドル番号
    　　文字列 &sectionName　　 …　セクション名
    　　文字列 &objectName　　　…　オブジェクト名
    　　整数　 &areaTypeNum　　 …　［領域種別］メソッドで取得できる領域種別番号
    　　文字列 &areaTypeName　　…　領域名
    　　整数　 &linkFlag 　　　 …　リンクしているオブジェクトならばイチ(1)、そうでなければゼロ(0)
    　　整数　 &isAssistButton　…　入力支援ボタンがあればイチ(1)、そうでなければゼロ(0)
    　　整数　 &modernUI　　　　…　変換モードがモダンUIであればイチ(1)、そうでなければゼロ(0)
    　　文字列 &familyName　　　…　ファミリ名
    　　整数　 &isFamily　　　　…　ファミリ名があればイチ(1)、そうでなければゼロ(0)
    　　文字列 &formStyle 　　　…　フォームの形式（カード形式　一覧表形式　伝票形式）

    　　　ケース開始
    　　　　ケース　( &noOperation =　 1 )
    ** nop　ケース　( &areaTypeNum =　 1 )　/*　 1 ﾗﾍﾞﾙ　　　　 */
    　　　　ケース　( &areaTypeNum =　10 .or &areaTypeNum =　14 )　/*　10 ﾃｷｽﾄﾎﾞｯｸｽ　14 ｸﾞﾙｰﾌﾟ項目　*/
    ** nop　ケース　( &areaTypeNum =　14 )　/*　14 ｸﾞﾙｰﾌﾟ項目 は ケース　( &areaTypeNum =　10 .or &areaTypeNum =　14 ) で処理する */
    ** nop　ケース　( &areaTypeNum =　20 )　/*　20 ｸﾞﾙｰﾌﾟﾎﾞｯｸｽ　*/
    　　　　ケース　( &areaTypeNum =　30 )　/*　30 ｺﾏﾝﾄﾞﾎﾞﾀﾝ　　*/
    　　　　ケース　( &areaTypeNum =　35 .or &areaTypeNum =　37 )　/*　35 ﾄｸﾞﾙﾎﾞﾀﾝ　　 ※ ﾍﾙﾌﾟでは ﾄｸﾞﾙﾎﾞﾀﾝ（ｸﾞﾙｰﾌﾟﾎﾞｯｸｽ外） */
    ** nop　ケース　( &areaTypeNum =　37 )　/*　37 内部ﾄｸﾞﾙﾎﾞﾀﾝ ※ ﾍﾙﾌﾟでは ﾄｸﾞﾙﾎﾞﾀﾝ（ｸﾞﾙｰﾌﾟﾎﾞｯｸｽ内） */
    ** nop　ケース　( &areaTypeNum =　60 )　/*　60 ｺﾝﾎﾞﾎﾞｯｸｽ　　*/
    　　　　ケース　( &areaTypeNum =　70 )　/*　70 ﾘｽﾄﾎﾞｯｸｽ　　 */
    ** nop　ケース　( &areaTypeNum =　75 )　/*　75 入力支援ﾎﾞﾀﾝ */
    ** nop　ケース　( &areaTypeNum =　80 )　/*　80 ﾋﾟｸﾁｬ　　　　*/
    ** nop　ケース　( &areaTypeNum =　90 )　/*　90 直線　　　　 */
    ** nop　ケース　( &areaTypeNum =　92 )　/*　92 楕円　　　　 */
    ** nop　ケース　( &areaTypeNum =　96 )　/*　96 扇形　　　　 */
    ** nop　ケース　( &areaTypeNum =　98 )　/*　98 角丸め矩形　 */
    ** nop　ケース　( &areaTypeNum = 110 )　/* 110 ｻﾌﾞﾌｫｰﾑ　　　*/
    ** nop　ケース　( &areaTypeNum = 120 )　/* 120 ｸﾞﾗﾌ　　　　 */
    　　　**ケース　( &areaTypeNum = 130 )　/* 130 ﾊﾞｰｺｰﾄﾞ　　　*/
    ** nop　ケース　( &areaTypeNum = 200 )　/* 200 行ｾﾚｸﾀ　または　ｾﾚｸﾀ　※名称が２種類あるので注意 */
    　　　ケース終了

引用返信 [メール受信/OFF] 削除キー/
■349 / ResNo.1) 　Re[1]: 193 クラシックUI_モダンUI_変換ユーティリティ
□投稿者/ ONnoji -(2020/08/23(Sun) 16:21:50)

    さっそく虫が見つかってしまった。(^^ゞ

    ×　if ( #バージョン番号 >= 1.1 ) 　※ゼロ(0) が抜けていた

    ○　if ( #バージョン番号 >= 10.1 )　※桐１０ｓ のバージョン

    差し替えるほどの虫では無いので、差し替えはしません。

    気になる人はお手数ですが修正願います。m(__)m

    　◇　◇　◇　◇　◇　◇　◇　◇　◇　◇　◇

    手続き定義開始　UIprcStart( )
    　変数宣言　自動，文字列｛ &icon, &title = "UIprcStart( )", &msg ｝

    　&msg = "#バージョン番号 = " + #str( #バージョン番号 )
    　&icon = "i"
    　**手続き実行　INFprcMsgPause( &icon, &title, &msg )
    ┌if ( #バージョン番号 >= 10.1 )　←←←←←←←←←←← ここ！
    │
    │┌if ( #ウィンドウハンドル( &mTargetHdl ) )
    ││
    ││　手続き実行　UIprcFormObjectSeekOnHdl( )
    │├else
    ││
    ││　&msg = "ウィンドウハンドルが見つかりません"
    ││　&msg = &msg + "\n\n&mTargetHdl = " + #str( &mTargetHdl )
    ││　&msg = &msg + "\n\n次のボタンでフォームを開いてから実行してください。"
    ││　&msg = &msg + "\n\n・［ウィンドウ一覧...］"
    ││　&msg = &msg + "\n\n・［以前開いたファイル...］"
    ││　&msg = &msg + "\n\n・［開く...］"
    ││　&icon = "e"
    ││　手続き実行　INFprcMsgPause( &icon, &title, &msg )
    │└end
    │
    ├else
    │
    │　&msg = "モダンUI は 桐10s 以降でサポートされています"
    │　&msg = &msg + "\n\n実行中の桐では実行できません"
    │　&msg = &msg + "\n\n#バージョン番号 = " + #str( #バージョン番号 )
    │　&icon = "e"
    │　手続き実行　INFprcMsgPause( &icon, &title, &msg )
    └end

    手続き定義終了



引用返信 [メール受信/OFF] 削除キー/


スレッド内ページ移動 / << 0 >>

このスレッドに書きこむ
Mode/　 Pass/

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

- Child Tree -
- Antispam Version -