kazpgmの日記

『プログラム自動作成@自動生成』作成の日記

TOOL更新_Ver0.1の『バグ情報など』に13.改ページの文字(最初、前ページ、次ページ、最後)を図形に。を追加した。

TOOL更新_Ver0.1の『バグ情報など』に13.改ページの文字(最初、前ページ、次ページ、最後)を図形に。を追加した。
13.改ページの文字(最初、前ページ、次ページ、最後)を図形にすることもできるようにする。2011/03/09、03/12 本日、自PC内では修正しました、2011/03/29にver0.1(201103092038)がvectorに載りました。

1.201103092038のTOOL修正内容.txt

【0】『kaz_PHP自動作成◎自動生成お助けTOOL』に以下の修正を行いました。

a.『バグ情報など』(http://kazpgm.ddo.jp/bugInfo.html)の13.をツールに反映しました。
 改ページの文字(最初、前ページ、次ページ、最後)を図形にすることもできるようにする。

  ■201103092038_からの作成例\kaz_PHP自動作成◎自動生成お助けTOOL\
   hinagata\Model\PageNavi.class_OnImage.txt 追加
  ■kaz_PHP自動作成◎自動生成お助けTOOL\
   hinagata\Model\PageNavi.class_OnImage.txt 追加

  ■201103092038_からの作成例\kaz_PHP自動作成◎自動生成お助けTOOL\
   「テーブル項目一覧などの定義_★お助けTOOL_Sample_110309.xls」 修正
  ■kaz_PHP自動作成◎自動生成お助けTOOL\
   「テーブル項目一覧などの定義_★お助けTOOL_Sample_110309.xls」 修正
    「★TOOL用コンスタント★」のL19カラムに「C_PAGENAVI_IMG =」,M19カラムに「文字,IMAGE」を追加した。
     ・改ページの文字(最初、前ページ、次ページ、最後)を図形にするかしないかを設定する。
     補足)「★TOOL用コンスタント★」のM19カラムには”C_PAGENAVI_IMG”という名前を定義追加しました。
   ・「ReadMe」のF91カラムに「・C_PAGENAVI_IMG = "IMAGE" <=改ページの文字(最初、前ページ、次ページ、最後)を図形にすることもできる。」を1行追加した。

  ■201103092038_からの作成例\kaz_PHP自動作成◎自動生成お助けTOOL\
   「PHP作成マクロ(お助けTOOL).xls」 修正
  ■kaz_PHP自動作成◎自動生成お助けTOOL\
   「PHP作成マクロ(お助けTOOL).xls」 修正
    「ReadMe」のF91カラムに「・C_PAGENAVI_IMG = "IMAGE" <=改ページの文字(最初、前ページ、次ページ、最後)を図形にすることもできる。」を1行追加した。

  ■201103092038_からの作成例\kaz_PHP自動作成◎自動生成お助けTOOL\
   『kaz_PHP自動作成◎自動生成お助けTOOL』のVBA『module2』 修正
  ■kaz_PHP自動作成◎自動生成お助けTOOL\
   『kaz_PHP自動作成◎自動生成お助けTOOL』のVBA『module2』 修正
  38行目
  <<追加>>
    Public C_PAGENAVI_IMG

  ■201103092038_からの作成例\kaz_PHP自動作成◎自動生成お助けTOOL\
   『kaz_PHP自動作成◎自動生成お助けTOOL』のVBA『module1』 修正
  ■kaz_PHP自動作成◎自動生成お助けTOOL\
   『kaz_PHP自動作成◎自動生成お助けTOOL』のVBA『module1』 修正
    Private Function TOOL用コンスタント必須項目チェック()
    ・・・
    103行目
    <<追加 start>>
        If CHK_名前の定義("C_PAGENAVI_IMG") = True Then
            If "" = ActiveWorkbook.Sheets("★TOOL用コンスタント★").Range("C_PAGENAVI_IMG") Then
                TOOL用コンスタント必須項目チェック = False
                MsgBox ("「★TOOL用コンスタント★」シートの「C_PAGENAVI_IMG = 」項目が空白です。指定してください。")
            End If
        Else
            TOOL用コンスタント必須項目チェック = False
            MsgBox ("「★TOOL用コンスタント★」シートの「C_PAGENAVI_IMG = 」がありません。" & vbLf & "Ver0.1(201103092038)以降の定義ファイルやhinagataを使用してください。")
        End If
    <<追加 end>>

  Public Sub writeLbiなどOtaasuke()
  258行目
  <<追加 start>>
    C_PAGENAVI_IMG = ActiveWorkbook.Sheets("★TOOL用コンスタント★").Range("C_PAGENAVI_IMG")
  625行目
  <<修正前>>
    変換後data = hinagata変換("PageNavi.class.txt", 変更内容Array)
  <<修正後>>
    if C_PAGENAVI_IMG = "IMAGE" THEN
        変換後data = hinagata変換("PageNavi.class_OnImage.txt", 変更内容Array)
    ELSE
        変換後data = hinagata変換("PageNavi.class.txt", 変更内容Array)
    END iF
   <<追加 end>>

  <<追加 start>>
    5348行目
    '名前の定義があるか調べる
    Private Function CHK_名前の定義(定義名)
        Dim n, str
        CHK_名前の定義 = False
        For Each n In ActiveWorkbook.Names
            If n.Name = 定義名 Then
                CHK_名前の定義 = True
            End If
        Next
    End Function
   <<追加 end>>

2.すでに作成済みの「PageNavi.class.php」の改ページの文字(最初、前ページ、次ページ、最後)を図形にすることもできます。

  function PageNavi($options = array(), $eleIdx = '0')
・・・
<<修正前 : 改ページの文字は”最初、前ページ、次ページ、最後”になるパターン>>
    $defaultOptions = array(
      'mode'             => 'Jumping',   // PEAR::Pagerの動作モード [変更不可]
      'perPage'          => 10,          // Pageあたりのアイテム数
      'delta'            => 10,          // PageNaviに表示するページ数

      'prevPageNaviText'  => '',    // 「前のPageNavigator」へのリンク文字
      'prevPageNaviTextDisable'  => '<<',    // 「前のPageNavigator」へのリンク文字
      'prevPageNaviSpace' => '  ', // 「前のPageNavigator」の後ろの空白
      'firstPagePre'      => '',             // 「先頭ページ」へのリンクの前に付加する文字
      'firstPageText'     => $eleIdx == '0'? '最初':'firstPage',         // 「先頭ページ」へのリンク文字
      'firstPagePost'     => '',             // 「先頭ページ」へのリンクの後ろに付加する文字
      'firstPageSpace'    => ' ',       // 「先頭ページ」の後ろの空白
      'prevImgPre'        => ' ',            // 「前ページ」の前に付加する文字
      'prevImg'           => $eleIdx == '0'? '前ページ':'prev',     // 「前ページ」へのリンク文字
      'prevImgPost'       => ' ',            // 「前ページ」の後ろに付加する文字
      'prevImgSpace'      => '  ', // 「前ページ」の後ろの空白
      'pagePre'           => '【',            // 「ページ番号」の前に付加する文字
      'currentPagePre'    => '<strong><font color="#FF6600">【', // 「現在のページ番号」の前に付加する文字
      'currentPagePost'   => '】</font></strong>', // 「現在のページ番号」の後ろに付加する文字
      'pagePost'          => '】',            // 「ページ番号」の後ろに付加する文字
      'nextImgSpace'      => '&nbsp;&nbsp;', // 「次ページ」の前の空白
      'nextImgPre'        => '&nbsp;',            // 「次ページ」の前に付加する文字
      'nextImg'           => $eleIdx == '0'? '次ページ':'next',     // 「次ページ」へのリンク文字
      'nextImgPost'       => '&nbsp;',             // 「次ページ」の後ろに付加する文字
      'lastPageSpace'     => '&nbsp;',       // 「最終ページ」の前の空白
      'lastPagePre'       => '',             // 「最終ページ」へのリンクの前に付加する文字
      'lastPageText'      => $eleIdx == '0'? '最後':'lastPage',         // 「最終ページ」へのリンク文字
      'lastPagePost'      => '',             // 「最終ページ」へのリンクの後ろに付加する文字
      'nextPageNaviSpace' => '&nbsp;&nbsp;', // 「次のPageNavigator」の前の空白
      'nextPageNaviText'  => '',    // 「次のPageNavigator」へのリンク文字
      'nextPageNaviTextDisable'  => '&gt;&gt;',    // 「次のPageNavigator」へのリンク文字

<<修正後 : 改ページは図形になるパターン>>
    $defaultOptions = array(
      'mode'             => 'Jumping',   // PEAR::Pagerの動作モード [変更不可]
      'perPage'          => 10,          // Pageあたりのアイテム数
      'delta'            => 10,          // PageNaviに表示するページ数

      'prevPageNaviText'  => '',    // 「前のPageNavigator」へのリンク文字
      'prevPageNaviTextDisable'  => '',    // 「前のPageNavigator」へのリンク文字
      'prevPageNaviSpace' => '&nbsp;&nbsp;', // 「前のPageNavigator」の後ろの空白
      'firstPagePre'      => '',             // 「先頭ページ」へのリンクの前に付加する文字
//      'firstPageText'     => $eleIdx == '0'? '最初':'firstPage',         // 「先頭ページ」へのリンク文字
      'firstPageText'     => '<img src="/kaz01u/img/icon_page_1.gif" alt="" width="8" height="10" />',         // 「先頭ページ」へのリンク文字
      'firstPageTextDisable'     => '<img src="/kaz01u/img/icon_page_1_disable.gif" alt="" width="8" height="10" />',         // 「先頭ページ」へのリンク文字
      'firstPagePost'     => '',             // 「先頭ページ」へのリンクの後ろに付加する文字
      'firstPageSpace'    => '&nbsp;',       // 「先頭ページ」の後ろの空白
      'prevImgPre'        => '&nbsp;',            // 「前ページ」の前に付加する文字
//      'prevImg'           => $eleIdx == '0'? '前ページ':'prev',     // 「前ページ」へのリンク文字
      'prevImg'           => '<img src="/kaz01u/img/icon_page_2.gif" alt=" width="7" height="10" />',     // 「前ページ」へのリンク文字
      'prevImgDisable'           => '<img src="/kaz01u/img/icon_page_2_disable.gif" alt=" width="7" height="10" />',     // 「前ページ」へのリンク文字
      'prevImgPost'       => '&nbsp;',            // 「前ページ」の後ろに付加する文字
      'prevImgSpace'      => '&nbsp;&nbsp;', // 「前ページ」の後ろの空白
      'pagePre'           => '【',            // 「ページ番号」の前に付加する文字
      'currentPagePre'    => '<strong><font color="#FF6600">【', // 「現在のページ番号」の前に付加する文字
      'currentPagePost'   => '】</font></strong>', // 「現在のページ番号」の後ろに付加する文字
      'pagePost'          => '】',            // 「ページ番号」の後ろに付加する文字
      'nextImgSpace'      => '&nbsp;&nbsp;', // 「次ページ」の前の空白
      'nextImgPre'        => '&nbsp;',            // 「次ページ」の前に付加する文字
//      'nextImg'           => $eleIdx == '0'? '次ページ':'next',     // 「次ページ」へのリンク文字
      'nextImg'           => '<img src="/kaz01u/img/icon_page_3.gif" alt="" width="7" height="10" />',     // 「次ページ」へのリンク文字
      'nextImgDisable'           => '<img src="/kaz01u/img/icon_page_3_disable.gif" alt="" width="7" height="10" />',     // 「次ページ」へのリンク文字
      'nextImgPost'       => '&nbsp;',             // 「次ページ」の後ろに付加する文字
      'lastPageSpace'     => '&nbsp;',       // 「最終ページ」の前の空白
      'lastPagePre'       => '',             // 「最終ページ」へのリンクの前に付加する文字
//      'lastPageText'      => $eleIdx == '0'? '最後':'lastPage',         // 「最終ページ」へのリンク文字
      'lastPageText'      => '<img src="/kaz01u/img/icon_page_4.gif" alt="" width="8" height="10" />',         // 「最終ページ」へのリンク文字
      'lastPageTextDisable'      => '<img src="/kaz01u/img/icon_page_4_disable.gif" alt="" width="8" height="10" />',         // 「最終ページ」へのリンク文字
      'lastPagePost'      => '',             // 「最終ページ」へのリンクの後ろに付加する文字
      'nextPageNaviSpace' => '&nbsp;&nbsp;', // 「次のPageNavigator」の前の空白
      'nextPageNaviText'  => '',    // 「次のPageNavigator」へのリンク文字
      'nextPageNaviTextDisable'  => '',    // 「次のPageNavigator」へのリンク文字


2011/03/09 21:40-24:00 3月7日のプログでVer0.1Zdで改ページの文字(最初、前ページ、次ページ、最後)を図形にしたので、Ver0.1も同じにしないと互換性が保てないだろうという思いで、ロジックを追加した。、、、ついでなので、懸案だったSUB画面なんかもやってからVectorに載せよう。と考えている。

2011/03/12 15:00-17:00 "C_PAGENAVI_IMG"が定義されていない場合(Function CHK_名前の定義を追加してチェックしてる。)、エラーメッセージを出すようにした。以下がイメージ図です。
・過去の定義ファイル

・PageNavi.class.php」自動作成◎自動生成マクロ実行

・エラーを出すようにした。

2011/03/24 22:00-23:00 Vectorに登録依頼しましたver0.1(201103092038)です5日ぐらいしたら見れます。
2011/03/29 0:30 ver0.1(201103092038)がvectorに載りました。