ファイル処理の各種定義
'##############################################################################
' ファイル処理
'##############################################################################
' 参照設定 | Microsoft Scripting Runtime
' | Microsoft Office xx.x Object Library
'------------------------------------------------------------------------------
' 参照モジュール | M_String
'------------------------------------------------------------------------------
'==============================================================================
' 公開定義
'==============================================================================
' 定数定義
'------------------------------------------------------------------------------
Public Enum E_FILE_IDX_LIST_INF
E_FILE_IDX_LIST_INF_NONE = D_IDX_START - 1
E_FILE_IDX_LIST_INF_FULLPATH 'フルパス
E_FILE_IDX_LIST_INF_RLTPATH '相対パス
E_FILE_IDX_LIST_INF_NAME 'ファイル名
E_FILE_IDX_LIST_INF_MAX
E_FILE_IDX_LIST_INF_EEND = E_FILE_IDX_LIST_INF_MAX - 1
End Enum
Public Enum E_FILE_SPEC_TEXT
E_FILE_SPEC_TEXT_NONE = &H0
E_FILE_SPEC_TEXT_LINE = &H1
E_FILE_SPEC_TEXT_ALL = &H2
E_FILE_SPEC_TEXT_LINE_ALL = E_FILE_SPEC_TEXT_LINE Or E_FILE_SPEC_TEXT_ALL
End Enum
'==============================================================================
' 内部定義
'==============================================================================
' 構造体定義
'------------------------------------------------------------------------------
Private Type PT_FILE_LIST_INF
List As Dictionary
Path As String
ExtSpec As String
ExtSpecAry As Variant
End Type
'------------------------------------------------------------------------------
' 定数定義
'------------------------------------------------------------------------------
Private Enum PE_FILE_IDX_FILTER_INF
PE_FILE_IDX_FILTER_INF_NONE = D_IDX_START - 1
PE_FILE_IDX_FILTER_INF_NAME
PE_FILE_IDX_FILTER_INF_FILTER
PE_FILE_IDX_FILTER_INF_MAX
PE_FILE_IDX_FILTER_INF_EEND = PE_FILE_IDX_FILTER_INF_MAX - 1
End Enum
'------------------------------------------------------------------------------
' 変数定義
'------------------------------------------------------------------------------
Private pgInf As PT_FILE_LIST_INF