開発マイルストーン  Version 1.12

モジュール名：M21_CHA_ChartDispProc チャート図形表示のための処理 ■■■■■■■■■■■■■■■■■■■■■■■■■■■■ 【モジュール】:チャート表示処理モジュール 【 概 要 】:チャート図形表示のための処理 【 作 成 者 】: zudajijp 【 作 成 日 】: 2007/06/20 【 特記事項 】: ■■■■■■■■■■■■■■■■■■■■■■■■■■■■ 　　一覧へ  プロシジャー一覧 　プロシジャー名　 　概要　 CHA_ChartReDisp 【機能】チャート図形の再表示処理 CHA_ChartAllDel 【機能】：全てのチャート図形を削除 CHA_ChartAllDel_Area 【機能】：全てのチャート図形を削除(範囲指定) CHA_ShapeClear 【機能】：ターゲット行の図形をクリア CHA_SummaryFigureCheck 【機能】：工程図形かどうかのチェック CHA_PointFigureCheck 【機能】：ポイント図形かどうかのチェック CHA_NormalFigureMake 【機能】：通常図形の作成および表示属性変更 CHA_PointFigureMake 【機能】：ポイント図形の作成および表示属性変更 CHA_FigureDisp 【機能】：ターゲット行への図形表示 CHA_FigureCheck 【機能】：図形表示カラムの取得 CHA_BarChartFigureDisp 【機能】：バーチャート図形の作成および表示属性変更 CHA_BarChartFigureDisp_Jitu 【機能】：バーチャート図形(実績)の作成および表示属性変更 CHA_ChartPosColmnGet 【機能】：チャート位置(列)決定 CHA_ChartPosRowGet 【機能】：チャート位置(行)決定 CHA_ChartPosRowGet_Jitu 【機能】：チャート位置(行)決定(実績) CHA_StartDayFigureDisp 【機能】：開始日図形の作成および表示属性変更 CHA_EndDayFigureDisp 【機能】：終了日図形の作成および表示属性変更 CHA_CommentFigureDisp 【機能】：コメント図形の作成および表示属性変更 CHA_ConnectorDisp 【機能】：コネクタ図形の作成および表示属性変更  プロシジャー記述書 　関数名　 　CHA_ChartReDisp　 概要 【機能】チャート図形の再表示処理 処理 チャートを全て削除し、全行に対して「終了日」「遅れ」「進捗」「状態」の更新および「図形」を再作成する 「コネクタ」「イナズマ線」「現在日線」の作成と「工数統計処理」を行う 形式 Sub CHA_ChartReDisp(Optional st As Long = 0, Optional ed As Long = 0, Optional dsp As Long = 0) 可視性 パブリック 引数 st Long ed Long dsp Long [0]全実行,[1]再計算,[2]再表示 　関数名　 　CHA_ChartAllDel　 概要 【機能】：全てのチャート図形を削除 処理 全てのタスク行の図形を削除する 形式 Sub CHA_ChartAllDel() 可視性 パブリック 引数 なし 　関数名　 　CHA_ChartAllDel_Area　 概要 【機能】：全てのチャート図形を削除(範囲指定) 処理 全てのタスク行の図形を削除する 形式 Sub CHA_ChartAllDel_Area(st As Long, ed As Long, Optional dsp As Long) 可視性 パブリック 引数 st Long 開始行 ed Long 終了行 dsp Long [0]全て,[1]図形,[2]進捗,[3]開始日,[4]終了日,[5]先行線,[6]コメント 　関数名　 　CHA_ShapeClear　 概要 【機能】：ターゲット行の図形をクリア 処理 図形「グラフ/始点/終点/コネクタ/実績/コメント」を削除 形式 Sub CHA_ShapeClear(lngRow As Long, Optional dsp As Long = 0) 可視性 パブリック 引数 lngRow Long ターゲット行番号 dsp Long [0]全て,[1]図形,[2]進捗,[3]開始日,[4]終了日,[5]先行線,[6]コメント 　関数名　 　CHA_SummaryFigureCheck　 概要 【機能】：工程図形かどうかのチェック 処理 図形記号が["."][","]["_"]ならTrue 形式 Function CHA_SummaryFigureCheck(Mark As String) As Boolean 可視性 パブリック 引数 Mark String 図形記号 戻り値 Boolean True:工程図形、False:工程図形でない 　関数名　 　CHA_PointFigureCheck　 概要 【機能】：ポイント図形かどうかのチェック 処理 図形記号が[":"]ならTrue 形式 Function CHA_PointFigureCheck(Mark As String) As Boolean 可視性 パブリック 引数 Mark String 図形記号 戻り値 Boolean True:ポイント図形、False:ポイント図形でない 　関数名　 　CHA_NormalFigureMake　 概要 【機能】：通常図形の作成および表示属性変更 処理 図形オブジェクトを作成する ※工程図形かポイント図形の場合は作成しない 形式 Function CHA_NormalFigureMake(mark0 As String, ByVal l1 As Double, ByVal t1 As Double, ByVal w1 As Double, ByVal h1 As Double, ByRef sq As Shape, txt As String) As Boolean 可視性 パブリック 引数 mark0 String 図形記号 l1 Double 左位置 t1 Double 上位置 w1 Double 幅 h1 Double 高さ sq Shape オブジェクト txt String 表示文字列 戻り値 Boolean True:成功、False:失敗 　関数名　 　CHA_PointFigureMake　 概要 【機能】：ポイント図形の作成および表示属性変更 処理 ポイント図形["◇"]["○"]["☆"]["顔"]["ハート"]["⇒"]["右矢印2"]["△"]["▽"]["＞"]を作成する 形式 Function CHA_PointFigureMake(mark0 As String, ByVal left As Double, ByVal top As Double, ByRef sq As Shape) As Boolean 可視性 パブリック 引数 mark0 String 図形記号 left Double 左位置 top Double 上位置 sq Shape オブジェクト 戻り値 Boolean True:成功、False:失敗 　関数名　 　CHA_FigureDisp　 概要 【機能】：ターゲット行への図形表示 処理 図形表示位置決定、および図形表示 ※「CHA_ChartReDisp」「PLN_WorksheetChange」から呼び出される 形式 Sub CHA_FigureDisp(lngRow As Long, Optional dsp As Long = 0) 可視性 パブリック 引数 lngRow Long ターゲット行番号 dsp Long [0]全表示,[1]図形,[2]進捗,[3]開始日,[4]終了日,[6]コメント 　関数名　 　CHA_FigureCheck　 概要 【機能】：図形表示カラムの取得 処理 オブジェクト作成前の図形種類ごとの処理 ※「CHA_FigureDisp」「CHA_FigureDisp_Jitu」から呼び出される 形式 Function CHA_FigureCheck(w As Worksheet, lngRow As Long, startDay As Long, EndDay As Long, lngDateSpan As Long, lngDateDif As Long, kind As Integer) As Boolean 可視性 パブリック 引数 w Worksheet WorkSheetオブジェクト lngRow Long ターゲット行番号 startDay Long 開始日 EndDay Long 終了日 lngDateSpan Long 差分 lngDateDif Long 日数 kind Integer 種別(1:実績、1以外:予定) 戻り値 Boolean True:成功、False:失敗 　関数名　 　CHA_BarChartFigureDisp　 概要 【機能】：バーチャート図形の作成および表示属性変更 処理 オブジェクト作成時の図形種類ごとの処理 ※「CHA_FigureDisp」から呼び出される 形式 Function CHA_BarChartFigureDisp(w As Worksheet, lngRow As Long, startDay As Long, Square As Shape, SqrLeft As Double, SqrTop As Double, SqrWidth As Double, SqrHeight As Double, SqrRight As Double) As Boolean 可視性 パブリック 引数 w Worksheet WorkSheetオブジェクト lngRow Long ターゲット行番号 startDay Long 開始日 Square Shape オブジェクト SqrLeft Double 左位置 SqrTop Double 上位置 SqrWidth Double 幅 SqrHeight Double 高さ SqrRight Double 右位置 戻り値 Boolean [True]:図形作成、[False]:異常 　関数名　 　CHA_BarChartFigureDisp_Jitu　 概要 【機能】：バーチャート図形(実績)の作成および表示属性変更 処理 オブジェクト作成時の図形種類ごとの処理 ※「CHA_FigureDisp_Jitu」から呼び出される 形式 Function CHA_BarChartFigureDisp_Jitu(w As Worksheet, lngRow As Long, startDay As Long, Square As Shape, SqrLeft As Double, SqrTop As Double, SqrWidth As Double, SqrHeight As Double, SqrRight As Double) As Boolean 可視性 パブリック 引数 w Worksheet WorkSheetオブジェクト lngRow Long ターゲット行番号 startDay Long 開始日 Square Shape オブジェクト SqrLeft Double 左位置 SqrTop Double 上位置 SqrWidth Double 幅 SqrHeight Double 高さ SqrRight Double 右位置 戻り値 Boolean [True]:図形作成、[False]:異常 　関数名　 　CHA_ChartPosColmnGet　 概要 【機能】：チャート位置(列)決定 処理 オブジェクト作成前の図形位置決定処理 ※「CHA_FigureDisp」「CHA_FigureDisp_Jitu」から呼び出される 形式 Sub CHA_ChartPosColmnGet(w As Worksheet, lngRow As Long, startDay As Long, StartDay7 As Long, EndDay As Long, EndDay7 As Long, SqrLeft As Double, SqrWidth As Double, SqrRight As Double, kind As Integer, Optional x1 As Single = 0, Optional x2 As Single = 0) 可視性 パブリック 引数 w Worksheet WorkSheetオブジェクト lngRow Long ターゲット行番号 startDay Long 開始日 StartDay7 Long 開始日(週用) EndDay Long 終了日 EndDay7 Long 終了日(週用) SqrLeft Double 左位置 SqrWidth Double 幅 SqrRight Double 右位置 kind Integer 種別[0]:予定 [1]:実績 x1 Single x2 Single 　関数名　 　CHA_ChartPosRowGet　 概要 【機能】：チャート位置(行)決定 処理 オブジェクト作成前の図形位置決定処理 ※「CHA_FigureDisp」から呼び出される 形式 Sub CHA_ChartPosRowGet(w As Worksheet, lngRow As Long, startDay As Long, SqrTop As Double, SqrHeight As Double) 可視性 パブリック 引数 w Worksheet WorkSheetオブジェクト lngRow Long ターゲット行番号 startDay Long 開始日 SqrTop Double 上位置 SqrHeight Double 高さ 　関数名　 　CHA_ChartPosRowGet_Jitu　 概要 【機能】：チャート位置(行)決定(実績) 処理 オブジェクト作成前の図形位置決定処理 ※「CHA_FigureDisp_Jitu」から呼び出される 形式 Sub CHA_ChartPosRowGet_Jitu(w As Worksheet, lngRow As Long, startDay As Long, SqrTop As Double, SqrHeight As Double) 可視性 パブリック 引数 w Worksheet WorkSheetオブジェクト lngRow Long ターゲット行番号 startDay Long 開始日 SqrTop Double 上位置 SqrHeight Double 高さ 　関数名　 　CHA_StartDayFigureDisp　 概要 【機能】：開始日図形の作成および表示属性変更 処理 開始日図形作成処理 ※「CHA_FigureDisp」から呼び出される 形式 Sub CHA_StartDayFigureDisp(w As Worksheet, lngRow As Long, startDay As Long, StartDay7 As Long) 可視性 パブリック 引数 w Worksheet WorkSheetオブジェクト lngRow Long ターゲット行番号 startDay Long 開始日 StartDay7 Long 開始日(週用) 　関数名　 　CHA_EndDayFigureDisp　 概要 【機能】：終了日図形の作成および表示属性変更 処理 終了日図形作成処理 ※「CHA_FigureDisp」から呼び出される StartDay:開始日 形式 Sub CHA_EndDayFigureDisp(w As Worksheet, lngRow As Long, SqrRight As Double) 可視性 パブリック 引数 w Worksheet WorkSheetオブジェクト lngRow Long ターゲット行番号 SqrRight Double 右位置 　関数名　 　CHA_CommentFigureDisp　 概要 【機能】：コメント図形の作成および表示属性変更 処理 コメント図形作成処理 ※「CHA_FigureDisp」から呼び出される 形式 Sub CHA_CommentFigureDisp(w As Worksheet, lngRow As Long, cmtpos As Integer) 可視性 パブリック 引数 w Worksheet WorkSheetオブジェクト lngRow Long ターゲット行番号 cmtpos Integer コメント左位置 　関数名　 　CHA_ConnectorDisp　 概要 【機能】：コネクタ図形の作成および表示属性変更 処理 コネクタ図形作成処理 ※「CHA_ChartReDisp」「PLN_WorksheetChange」から呼び出される 形式 Sub CHA_ConnectorDisp(lngRow As Long) 可視性 パブリック 引数 lngRow Long ターゲット行番号

Copyright (c) 2007-2009 zudajijp. All Rights Reserved.