/*!	@file
	共通設定ダイアログボックス、「マクロ」ページ

	@author genta
	@date Jun. 2, 2001 genta
*/
/*
	Copyright (C) 2001, genta, MIK
	Copyright (C) 2002, YAZAKI, MIK, genta, novice
	Copyright (C) 2003, Moca, KEITA
	Copyright (C) 2006, ryoji
	Copyright (C) 2007, ryoji
	Copyright (C) 2009, ryoji

	This software is provided 'as-is', without any express or implied
	warranty. In no event will the authors be held liable for any damages
	arising from the use of this software.

	Permission is granted to anyone to use this software for any purpose, 
	including commercial applications, and to alter it and redistribute it 
	freely, subject to the following restrictions:

		1. The origin of this software must not be misrepresented;
		   you must not claim that you wrote the original software.
		   If you use this software in a product, an acknowledgment
		   in the product documentation would be appreciated but is
		   not required.

		2. Altered source versions must be plainly marked as such, 
		   and must not be misrepresented as being the original software.

		3. This notice may not be removed or altered from any source
		   distribution.
*/


#include "StdAfx.h"
#include "prop/CPropCommon.h"
#include "env/DLLSHAREDATA.h"
#include "util/shell.h"
#include "util/string_ex2.h"
#include "util/module.h"
#include "sakura_rc.h"
#include "sakura.hh"

//! Popup Help用ID
//@@@ 2001.12.22 Start by MIK: Popup Help
static const DWORD p_helpids[] = {	//11700
	IDC_MACRODIRREF,	HIDC_MACRODIRREF,	//マクロディレクトリ参照
	IDC_MACRO_REG,		HIDC_MACRO_REG,		//マクロ設定
	IDC_COMBO_MACROID,	HIDC_COMBO_MACROID,	//ID
	IDC_MACROPATH,		HIDC_MACROPATH,		//File
	IDC_MACRONAME,		HIDC_MACRONAME,		//マクロ名
	IDC_MACROLIST,		HIDC_MACROLIST,		//マクロリスト
	IDC_MACRODIR,		HIDC_MACRODIR,		//マクロ一覧
	IDC_CHECK_RELOADWHENEXECUTE,	HIDC_CHECK_RELOADWHENEXECUTE,	//マクロを実行するたびにファイルを読み込みなおす	// 2006.08.06 ryoji
	IDC_CHECK_MacroOnOpened,		HIDC_CHECK_MacroOnOpened,		//オープン後自動実行マクロ	// 2006.09.01 ryoji
	IDC_CHECK_MacroOnTypeChanged,	HIDC_CHECK_MacroOnTypeChanged,	//タイプ変更後自動実行マクロ	// 2006.09.01 ryoji
	IDC_CHECK_MacroOnSave,			HIDC_CHECK_MacroOnSave,			//保存前自動実行マクロ	// 2006.09.01 ryoji
	IDC_MACROCANCELTIMER,			HIDC_MACROCANCELTIMER,			//マクロ停止ダイアログ表示待ち時間	// 2011.08.04 syat
//	IDC_STATIC,			-1,
	0, 0
};
//@@@ 2001.12.22 End

/*!
	@param hwndDlg ダイアログボックスのWindow Handle
	@param uMsg メッセージ
	@param wParam パラメータ1
	@param lParam パラメータ2
*/
INT_PTR CALLBACK CPropMacro::DlgProc_page(
	HWND hwndDlg, UINT uMsg, WPARAM wParam, LPARAM lParam )
{
	return DlgProc( reinterpret_cast<pDispatchPage>(&CPropMacro::DispatchEvent), hwndDlg, uMsg, wParam, lParam );
}

/*! Macroページのメッセージ処理
	@param hwndDlg ダイアログボックスのWindow Handlw
	@param uMsg メッセージ
	@param wParam パラメータ1
	@param lParam パラメータ2
*/
INT_PTR CPropMacro::DispatchEvent( HWND hwndDlg, UINT uMsg, WPARAM wParam, LPARAM lParam )
{
	NMHDR*		pNMHDR;
	int			idCtrl;

	WORD		wNotifyCode;
	WORD		wID;

	switch( uMsg ){

	case WM_INITDIALOG:
		/* ダイアログデータの設定 Macro */
		InitDialog( hwndDlg );
		SetData( hwndDlg );
		// Modified by KEITA for WIN64 2003.9.6
		::SetWindowLongPtr( hwndDlg, DWLP_USER, lParam );

		//	Oct. 5, 2002 genta エディット コントロールに入力できるテキストの長さを制限する
		EditCtl_LimitText( ::GetDlgItem( hwndDlg, IDC_MACRONAME ), _countof( m_Common.m_sMacro.m_MacroTable[0].m_szName ) - 1 );
		Combo_LimitText( ::GetDlgItem( hwndDlg, IDC_MACROPATH ), _countof( m_Common.m_sMacro.m_MacroTable[0].m_szFile ) - 1 );
		// 2003.06.23 Moca
		EditCtl_LimitText( ::GetDlgItem( hwndDlg, IDC_MACRODIR ), _countof2( m_Common.m_sMacro.m_szMACROFOLDER ) - 1 );
		EditCtl_LimitText( ::GetDlgItem( hwndDlg, IDC_MACROCANCELTIMER ), 4 );

		return TRUE;
	case WM_NOTIFY:
		idCtrl = (int)wParam;
		pNMHDR = (NMHDR*)lParam;
		switch( idCtrl ){
		case IDC_MACROLIST:
			switch( pNMHDR->code ){
			case LVN_ITEMCHANGED:
				CheckListPosition_Macro( hwndDlg );
				break;
			}
			break;
		default:
			switch( pNMHDR->code ){
			case PSN_HELP:
				OnHelp( hwndDlg, IDD_PROP_MACRO );
				return TRUE;
			case PSN_KILLACTIVE:
				/* ダイアログデータの取得 Macro */
				GetData( hwndDlg );
				return TRUE;
//@@@ 2002.01.03 YAZAKI 最後に表示していたシートを正しく覚えていないバグ修正
			case PSN_SETACTIVE:
				m_nPageNum = ID_PROPCOM_PAGENUM_MACRO;
				return TRUE;
			}
			break;
		}
		break;

	case WM_COMMAND:
		wNotifyCode = HIWORD(wParam);	/* 通知コード */
		wID = LOWORD(wParam);			/* 項目ID､ コントロールID､ またはアクセラレータID */

		switch( wNotifyCode ){
		/* ボタン／チェックボックスがクリックされた */
		case BN_CLICKED:
			switch( wID ){
			case IDC_MACRODIRREF:	// マクロディレクトリ参照
				SelectBaseDir_Macro( hwndDlg );
				break;
			case IDC_MACRO_REG:		// マクロ設定
				SetMacro2List_Macro( hwndDlg );
				break;
			}
			break;
		case CBN_DROPDOWN:
			switch( wID ){
			case IDC_MACROPATH:
				OnFileDropdown_Macro( hwndDlg );
				break;
			}
			break;	/* CBN_DROPDOWN */
		// From Here 2003.06.23 Moca マクロフォルダの最後の\がなければ付ける
		case EN_KILLFOCUS:
			switch( wID ){
			case IDC_MACRODIR:
				{
					TCHAR szDir[_MAX_PATH];
					::DlgItem_GetText( hwndDlg, IDC_MACRODIR, szDir, _MAX_PATH );
					if( 1 == AddLastChar( szDir, _MAX_PATH, _T('\\') ) ){
						::DlgItem_SetText( hwndDlg, IDC_MACRODIR, szDir );
					}
				}
				break;
			}
			break;
		// To Here 2003.06.23 Moca
		}

		break;	/* WM_COMMAND */
//@@@ 2001.02.04 Start by MIK: Popup Help
	case WM_HELP:
		{
			HELPINFO *p = (HELPINFO *)lParam;
			MyWinHelp( (HWND)p->hItemHandle, HELP_WM_HELP, (ULONG_PTR)(LPVOID)p_helpids );	// 2006.10.10 ryoji MyWinHelpに変更に変更
		}
		return TRUE;
		/*NOTREACHED*/
		//break;
//@@@ 2001.02.04 End

//@@@ 2001.12.22 Start by MIK: Context Menu Help
	//Context Menu
	case WM_CONTEXTMENU:
		MyWinHelp( hwndDlg, HELP_CONTEXTMENU, (ULONG_PTR)(LPVOID)p_helpids );	// 2006.10.10 ryoji MyWinHelpに変更に変更
		return TRUE;
//@@@ 2001.12.22 End

	}
	return FALSE;
}


/*!
	ダイアログ上のコントロールにデータを設定する

	@param hwndDlg ダイアログボックスのウィンドウハンドル
*/
void CPropMacro::SetData( HWND hwndDlg )
{
	int index;
	LVITEM sItem;

	//	マクロデータ
	HWND hListView = ::GetDlgItem( hwndDlg, IDC_MACROLIST );
	
	for( index = 0; index < MAX_CUSTMACRO; ++index ){
		memset_raw( &sItem, 0, sizeof( sItem ));
		sItem.iItem = index;
		sItem.mask = LVIF_TEXT;
		sItem.iSubItem = 1;
		sItem.pszText = m_pShareData->m_Common.m_sMacro.m_MacroTable[index].m_szName;
		ListView_SetItem( hListView, &sItem );

		memset_raw( &sItem, 0, sizeof( sItem ));
		sItem.iItem = index;
		sItem.mask = LVIF_TEXT;
		sItem.iSubItem = 2;
		sItem.pszText = m_pShareData->m_Common.m_sMacro.m_MacroTable[index].m_szFile;
		ListView_SetItem( hListView, &sItem );

		memset_raw( &sItem, 0, sizeof( sItem ));
		sItem.iItem = index;
		sItem.mask = LVIF_TEXT;
		sItem.iSubItem = 3;
		sItem.pszText = const_cast<TCHAR*>(m_pShareData->m_Common.m_sMacro.m_MacroTable[index].m_bReloadWhenExecute ? _T("on") : _T("off"));
		ListView_SetItem( hListView, &sItem );

		// 自動実行マクロ	// 2006.09.01 ryoji
		TCHAR szText[8];
		szText[0] = _T('\0');
		if( index == m_pShareData->m_Common.m_sMacro.m_nMacroOnOpened )
			::lstrcat(szText, _T("O"));
		if( index == m_pShareData->m_Common.m_sMacro.m_nMacroOnTypeChanged )
			::lstrcat(szText, _T("T"));
		if( index == m_pShareData->m_Common.m_sMacro.m_nMacroOnSave )
			::lstrcat(szText, _T("S"));
		memset_raw( &sItem, 0, sizeof( sItem ));
		sItem.iItem = index;
		sItem.mask = LVIF_TEXT;
		sItem.iSubItem = 4;
		sItem.pszText = szText;
		ListView_SetItem( hListView, &sItem );
	}
	
	//	マクロディレクトリ
	::DlgItem_SetText( hwndDlg, IDC_MACRODIR, /*m_pShareData->*/m_Common.m_sMacro.m_szMACROFOLDER );

	nLastPos_Macro = -1;
	
	//	リストビューの行選択を可能にする．
	//	IE 3.x以降が入っている場合のみ動作する．
	//	これが無くても，番号部分しか選択できないだけで操作自体は可能．
	DWORD dwStyle;
	dwStyle = ListView_GetExtendedListViewStyle( hListView );
	dwStyle |= LVS_EX_FULLROWSELECT;
	ListView_SetExtendedListViewStyle( hListView, dwStyle );
	
	//	マクロ停止ダイアログ表示待ち時間
	TCHAR szCancelTimer[16] = {0};
	::DlgItem_SetText( hwndDlg, IDC_MACROCANCELTIMER, _itot(m_Common.m_sMacro.m_nMacroCancelTimer, szCancelTimer, 10) );

	return;
}

/*!
	ダイアログ上のコントロールからデータを取得してメモリに格納する

	@param hwndDlg ダイアログボックスのウィンドウハンドル
*/

int CPropMacro::GetData( HWND hwndDlg )
{
	int index;
	LVITEM sItem;

	// 自動実行マクロ変数初期化	// 2006.09.01 ryoji
	m_Common.m_sMacro.m_nMacroOnOpened = -1;
	m_Common.m_sMacro.m_nMacroOnTypeChanged = -1;
	m_Common.m_sMacro.m_nMacroOnSave = -1;

	//	マクロデータ
	HWND hListView = ::GetDlgItem( hwndDlg, IDC_MACROLIST );

	for( index = 0; index < MAX_CUSTMACRO; ++index ){
		memset_raw( &sItem, 0, sizeof( sItem ));
		sItem.iItem = index;
		sItem.mask = LVIF_TEXT;
		sItem.iSubItem = 1;
		sItem.cchTextMax = MACRONAME_MAX - 1;
//@@@ 2002.01.03 YAZAKI 共通設定『マクロ』がタブを切り替えるだけで設定が保存されないように。
		sItem.pszText = /*m_pShareData->*/m_Common.m_sMacro.m_MacroTable[index].m_szName;
		ListView_GetItem( hListView, &sItem );

		memset_raw( &sItem, 0, sizeof( sItem ));
		sItem.iItem = index;
		sItem.mask = LVIF_TEXT;
		sItem.iSubItem = 2;
		sItem.cchTextMax = _MAX_PATH;
//@@@ 2002.01.03 YAZAKI 共通設定『マクロ』がタブを切り替えるだけで設定が保存されないように。
		sItem.pszText = /*m_pShareData->*/m_Common.m_sMacro.m_MacroTable[index].m_szFile;
		ListView_GetItem( hListView, &sItem );

		memset_raw( &sItem, 0, sizeof( sItem ));
		sItem.iItem = index;
		sItem.mask = LVIF_TEXT;
		sItem.iSubItem = 3;
		TCHAR buf[MAX_PATH];
		sItem.pszText = buf;
		sItem.cchTextMax = MAX_PATH;
		ListView_GetItem( hListView, &sItem );
		if ( _tcscmp(buf, _T("on")) == 0){
			m_Common.m_sMacro.m_MacroTable[index].m_bReloadWhenExecute = true;
		}
		else {
			m_Common.m_sMacro.m_MacroTable[index].m_bReloadWhenExecute = false;
		}

		// 自動実行マクロ	// 2006.09.01 ryoji
		memset_raw( &sItem, 0, sizeof( sItem ));
		sItem.iItem = index;
		sItem.mask = LVIF_TEXT;
		sItem.iSubItem = 4;
		TCHAR szText[8];
		sItem.pszText = szText;
		sItem.cchTextMax = _countof(szText);
		ListView_GetItem( hListView, &sItem );
		int i;
		int nLen;
		nLen = ::lstrlen(szText);
		for( i = 0; i < nLen; i++)
		{
			if( szText[i] == _T('O') )
				m_Common.m_sMacro.m_nMacroOnOpened = index;
			if( szText[i] == _T('T') )
				m_Common.m_sMacro.m_nMacroOnTypeChanged = index;
			if( szText[i] == _T('S') )
				m_Common.m_sMacro.m_nMacroOnSave = index;
		}
	}

	//	マクロディレクトリ
//@@@ 2002.01.03 YAZAKI 共通設定『マクロ』がタブを切り替えるだけで設定が保存されないように。
	::DlgItem_GetText( hwndDlg, IDC_MACRODIR, m_Common.m_sMacro.m_szMACROFOLDER, _MAX_PATH );
	// 2003.06.23 Moca マクロフォルダの最後の\がなければ付ける
	AddLastChar( m_Common.m_sMacro.m_szMACROFOLDER, _MAX_PATH, _T('\\') );
	
	//	マクロ停止ダイアログ表示待ち時間
	TCHAR szCancelTimer[16] = {0};
	::DlgItem_GetText( hwndDlg, IDC_MACROCANCELTIMER, szCancelTimer, _countof(szCancelTimer) );
	m_Common.m_sMacro.m_nMacroCancelTimer = _ttoi(szCancelTimer);

	return TRUE;
}

struct ColumnData_CPropMacro_Init {
	int titleId;
	int width;
};

void CPropMacro::InitDialog( HWND hwndDlg )
{
	struct ColumnData_CPropMacro_Init ColumnList[] = {
		{ STR_PROPCOMMACR_LIST1, 40 },
		{ STR_PROPCOMMACR_LIST2, 200 },
		{ STR_PROPCOMMACR_LIST3, 150 },
		{ STR_PROPCOMMACR_LIST4, 40 },
		{ STR_PROPCOMMACR_LIST5, 40 },
	};

	//	ListViewの初期化
	HWND hListView = ::GetDlgItem( hwndDlg, IDC_MACROLIST );
	if( hListView == NULL ){
		PleaseReportToAuthor( hwndDlg, _T("PropComMacro::InitDlg::NoListView") );
		return;	//	よくわからんけど失敗した	
	}

	LVCOLUMN sColumn;
	int pos;
	RECT rc;
	::GetWindowRect( hListView, &rc );
	int width = rc.right - rc.left - ::GetSystemMetrics(SM_CXHSCROLL);
	
	for( pos = 0; pos < _countof( ColumnList ); ++pos ){
		
		memset_raw( &sColumn, 0, sizeof( sColumn ));
		sColumn.mask = LVCF_TEXT | LVCF_WIDTH | LVCF_SUBITEM | LVCF_FMT;
		sColumn.pszText = const_cast<TCHAR*>(LS(ColumnList[pos].titleId));
		sColumn.cx = ColumnList[pos].width * width / (499 - 17);
		sColumn.iSubItem = pos;
		sColumn.fmt = LVCFMT_LEFT;
		
		if( ListView_InsertColumn( hListView, pos, &sColumn ) < 0 ){
			PleaseReportToAuthor( hwndDlg, _T("PropComMacro::InitDlg::ColumnRegistrationFail") );
			return;	//	よくわからんけど失敗した
		}
	}

	//	メモリの確保
	//	必要な数だけ先に確保する．
	ListView_SetItemCount( hListView, MAX_CUSTMACRO );

	//	Index部分の登録
	for( pos = 0; pos < MAX_CUSTMACRO ; ++pos ){
		LVITEM sItem;
		TCHAR buf[4];
		memset_raw( &sItem, 0, sizeof( sItem ));
		sItem.mask = LVIF_TEXT | LVIF_PARAM;
		sItem.iItem = pos;
		sItem.iSubItem = 0;
		_itot( pos, buf, 10 );
		sItem.pszText = buf;
		sItem.lParam = pos;
		ListView_InsertItem( hListView, &sItem );
	}
	
	// 登録先指定 ComboBoxの初期化
	HWND hNumCombo = ::GetDlgItem( hwndDlg, IDC_COMBO_MACROID );
	for( pos = 0; pos < MAX_CUSTMACRO ; ++pos ){
		wchar_t buf[10];
		auto_sprintf( buf, L"%d", pos );
		int result = Combo_AddString( hNumCombo, buf );
		if( result == CB_ERR ){
			PleaseReportToAuthor( hwndDlg, _T("PropComMacro::InitDlg::AddMacroId") );
			return;	//	よくわからんけど失敗した
		}
		else if( result == CB_ERRSPACE ){
			PleaseReportToAuthor( hwndDlg, _T("PropComMacro::InitDlg::AddMacroId/InsufficientSpace") );
			return;	//	よくわからんけど失敗した
		}
	}
	Combo_SetCurSel( hNumCombo, 0 );
}

void CPropMacro::SetMacro2List_Macro( HWND hwndDlg )
{
	int index;
	LVITEM sItem;
	
	HWND hListView = ::GetDlgItem( hwndDlg, IDC_MACROLIST );
	HWND hNum = ::GetDlgItem( hwndDlg, IDC_COMBO_MACROID );

	//	設定先取得
	index = Combo_GetCurSel( hNum );
	if( index == CB_ERR ){
		PleaseReportToAuthor( hwndDlg, _T("PropComMacro::SetMacro2List::GetCurSel") );
		return;	//	よくわからんけど失敗した
	}

	// マクロ名
	memset_raw( &sItem, 0, sizeof( sItem ));
	sItem.iItem = index;
	sItem.mask = LVIF_TEXT;
	sItem.iSubItem = 1;
	
	TCHAR buf[256];
	::DlgItem_GetText( hwndDlg, IDC_MACRONAME, buf, MACRONAME_MAX );
	sItem.pszText = buf;
	ListView_SetItem( hListView, &sItem );

	// ファイル名
	memset_raw( &sItem, 0, sizeof( sItem ));
	sItem.iItem = index;
	sItem.mask = LVIF_TEXT;
	sItem.iSubItem = 2;

	::DlgItem_GetText( hwndDlg, IDC_MACROPATH, buf, _MAX_PATH );
	sItem.pszText = buf;
	ListView_SetItem( hListView, &sItem );

	// チェック
	memset_raw( &sItem, 0, sizeof( sItem ));
	sItem.iItem = index;
	sItem.mask = LVIF_TEXT;
	sItem.iSubItem = 3;
	sItem.pszText = const_cast<TCHAR*>(::IsDlgButtonChecked( hwndDlg, IDC_CHECK_RELOADWHENEXECUTE ) ? _T("on") : _T("off"));
	ListView_SetItem( hListView, &sItem );

	// 自動実行マクロ	// 2006.09.01 ryoji
	int nMacroOnOpened = -1;
	int nMacroOnTypeChanged = -1;
	int nMacroOnSave = -1;
	TCHAR szText[8];
	int iItem;
	for( iItem = 0; iItem < MAX_CUSTMACRO; iItem++){
		memset_raw( &sItem, 0, sizeof( sItem ));
		sItem.iItem = iItem;
		sItem.mask = LVIF_TEXT;
		sItem.iSubItem = 4;
		sItem.pszText = szText;
		sItem.cchTextMax = _countof(szText);
		ListView_GetItem( hListView, &sItem );
		int i;
		int nLen;
		nLen = ::lstrlen(szText);
		for( i = 0; i < nLen; i++)
		{
			if( szText[i] == _T('O') )
				nMacroOnOpened = iItem;
			if( szText[i] == _T('T') )
				nMacroOnTypeChanged = iItem;
			if( szText[i] == _T('S') )
				nMacroOnSave = iItem;
		}
	}
	if( ::IsDlgButtonChecked( hwndDlg, IDC_CHECK_MacroOnOpened ) )
		nMacroOnOpened = index;
	else if( nMacroOnOpened == index )
		nMacroOnOpened = -1;
	if( ::IsDlgButtonChecked( hwndDlg, IDC_CHECK_MacroOnTypeChanged ) )
		nMacroOnTypeChanged = index;
	else if( nMacroOnTypeChanged == index )
		nMacroOnTypeChanged = -1;
	if( ::IsDlgButtonChecked( hwndDlg, IDC_CHECK_MacroOnSave ) )
		nMacroOnSave = index;
	else if( nMacroOnSave == index )
		nMacroOnSave = -1;
	for( iItem = 0; iItem < MAX_CUSTMACRO; iItem++){
		szText[0] = _T('\0');
		if( iItem == nMacroOnOpened )
			::lstrcat(szText, _T("O"));
		if( iItem == nMacroOnTypeChanged )
			::lstrcat(szText, _T("T"));
		if( iItem == nMacroOnSave )
			::lstrcat(szText, _T("S"));
		memset_raw( &sItem, 0, sizeof( sItem ));
		sItem.iItem = iItem;
		sItem.mask = LVIF_TEXT;
		sItem.iSubItem = 4;
		sItem.pszText = szText;
		ListView_SetItem( hListView, &sItem );
	}
}

/*!
	Macro格納用ディレクトリを選択する

	@param hwndDlg [in] ダイアログボックスのウィンドウハンドル
*/
void CPropMacro::SelectBaseDir_Macro( HWND hwndDlg )
{
	TCHAR szDir[_MAX_PATH];

	/* 検索フォルダ */
	::DlgItem_GetText( hwndDlg, IDC_MACRODIR, szDir, _countof(szDir) );

	// 2003.06.23 Moca 相対パスは実行ファイルからのパス
	// 2007.05.19 ryoji 相対パスは設定ファイルからのパスを優先
	if( _IS_REL_PATH( szDir ) ){
		TCHAR folder[_MAX_PATH];
		_tcscpy( folder, szDir );
		GetInidirOrExedir( szDir, folder );
	}

	if( SelectDir( hwndDlg, LS(STR_PROPCOMMACR_SEL_DIR), szDir, szDir ) ){
		//	末尾に\\マークを追加する．
		AddLastChar( szDir, _countof(szDir), _T('\\') );
		::DlgItem_SetText( hwndDlg, IDC_MACRODIR, GetRelPath(szDir) ); // 2015.03.03 可能なら相対パスにする
	}
}


/*!
	マクロファイル指定用コンボボックスのドロップダウンリストが開かれるときに，
	指定ディレクトリのファイル一覧から候補を生成する．

	@param hwndDlg [in] ダイアログボックスのウィンドウハンドル
*/
void CPropMacro::OnFileDropdown_Macro( HWND hwndDlg )
{
	HANDLE hFind;
	HWND hCombo = ::GetDlgItem( hwndDlg, IDC_MACROPATH );

	TCHAR path[_MAX_PATH * 2];
	::DlgItem_GetText( hwndDlg, IDC_MACRODIR, path, _countof(path) );

	// 2003.06.23 Moca 相対パスは実行ファイルからのパス
	// 2007.05.19 ryoji 相対パスは設定ファイルからのパスを優先
	if( _IS_REL_PATH( path ) ){
		TCHAR folder[_MAX_PATH * 2];
		_tcscpy( folder, path );
		GetInidirOrExedir( path, folder );
	}
	_tcscat( path, _T("*.*") );	//	2002/05/01 YAZAKI どんなファイルもどんと来い。

	//	候補の初期化
	Combo_ResetContent( hCombo );

	//	ファイルの検索
	WIN32_FIND_DATA wf;
	hFind = FindFirstFile(path, &wf);

	if (hFind == INVALID_HANDLE_VALUE) {
		return;
	}

	do {
		//	コンボボックスに設定
		//	でも.と..は勘弁。
		//if (_tcscmp( wf.cFileName, _T(".") ) != 0 && _tcscmp( wf.cFileName, _T("..") ) != 0){
		if( (wf.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) == 0 ){	// 2009.02.12 ryoji フォルダを除外
			int result = Combo_AddString( hCombo, wf.cFileName );
			if( result == CB_ERR || result == CB_ERRSPACE )
				break;
		}
	} while( FindNextFile( hFind, &wf ));

    FindClose(hFind);
}

void CPropMacro::CheckListPosition_Macro( HWND hwndDlg )
{
	HWND hListView = ::GetDlgItem( hwndDlg, IDC_MACROLIST );
	HWND hNum = ::GetDlgItem( hwndDlg, IDC_COMBO_MACROID );
	
	//	現在のFocus取得
	int current = ListView_GetNextItem( hListView, -1, LVNI_SELECTED);

	if( current == -1 || current == nLastPos_Macro )
		return;

	nLastPos_Macro = current;
	
	//	初期値の設定
	Combo_SetCurSel( hNum, nLastPos_Macro );
	
	TCHAR buf[MAX_PATH + MACRONAME_MAX];	// MAX_PATHとMACRONAME_MAXの両方より大きい値
	LVITEM sItem;

	memset_raw( &sItem, 0, sizeof( sItem ));
	sItem.iItem = current;
	sItem.mask = LVIF_TEXT;
	sItem.iSubItem = 1;
	sItem.pszText = buf;
	sItem.cchTextMax = MACRONAME_MAX;

	ListView_GetItem( hListView, &sItem );
	::DlgItem_SetText( hwndDlg, IDC_MACRONAME, buf );

	memset_raw( &sItem, 0, sizeof( sItem ));
	sItem.iItem = current;
	sItem.mask = LVIF_TEXT;
	sItem.iSubItem = 2;
	sItem.pszText = buf;
	sItem.cchTextMax = MAX_PATH;

	ListView_GetItem( hListView, &sItem );
	::DlgItem_SetText( hwndDlg, IDC_MACROPATH, buf );

	memset_raw( &sItem, 0, sizeof( sItem ));
	sItem.iItem = current;
	sItem.mask = LVIF_TEXT;
	sItem.iSubItem = 3;
	sItem.pszText = buf;
	sItem.cchTextMax = MAX_PATH;
	ListView_GetItem( hListView, &sItem );
	if ( _tcscmp(buf, _T("on")) == 0){
		::CheckDlgButton( hwndDlg, IDC_CHECK_RELOADWHENEXECUTE, true );
	}
	else {
		::CheckDlgButton( hwndDlg, IDC_CHECK_RELOADWHENEXECUTE, false );
	}

	// 自動実行マクロ	// 2006.09.01 ryoji
	memset_raw( &sItem, 0, sizeof( sItem ));
	sItem.iItem = current;
	sItem.mask = LVIF_TEXT;
	sItem.iSubItem = 4;
	TCHAR szText[8];
	sItem.pszText = szText;
	sItem.cchTextMax = _countof(szText);
	ListView_GetItem( hListView, &sItem );
	int i;
	int nLen;
	nLen = ::lstrlen(szText);
	::CheckDlgButton( hwndDlg, IDC_CHECK_MacroOnOpened, false );
	::CheckDlgButton( hwndDlg, IDC_CHECK_MacroOnTypeChanged, false );
	::CheckDlgButton( hwndDlg, IDC_CHECK_MacroOnSave, false );
	for( i = 0; i < nLen; i++)
	{
		if( szText[i] == _T('O') )
			::CheckDlgButton( hwndDlg, IDC_CHECK_MacroOnOpened, true );
		if( szText[i] == _T('T') )
			::CheckDlgButton( hwndDlg, IDC_CHECK_MacroOnTypeChanged, true );
		if( szText[i] == _T('S') )
			::CheckDlgButton( hwndDlg, IDC_CHECK_MacroOnSave, true );
	}
}