// ExcelTab.cpp
//
// (c)1998-2025 Codejock Software, All Rights Reserved.
//
// THIS SOURCE FILE IS THE PROPERTY OF CODEJOCK SOFTWARE AND IS NOT TO BE
// RE-DISTRIBUTED BY ANY MEANS WHATSOEVER WITHOUT THE EXPRESSED WRITTEN
// CONSENT OF CODEJOCK SOFTWARE.
//
// THIS SOURCE CODE CAN ONLY BE USED UNDER THE TERMS AND CONDITIONS OUTLINED
// IN THE XTREME TOOLKIT PRO LICENSE AGREEMENT. CODEJOCK SOFTWARE GRANTS TO
// YOU (ONE SOFTWARE DEVELOPER) THE LIMITED RIGHT TO USE THIS SOFTWARE ON A
// SINGLE COMPUTER.
//
// CONTACT INFORMATION:
// support@codejock.com
// http://www.codejock.com
//
/////////////////////////////////////////////////////////////////////////////

#include "stdafx.h"
#include "ExcelTab.h"
#include "ExcelTabDlg.h"

#include <Shlwapi.h>
#pragma comment(lib, "Shlwapi")

#ifdef _DEBUG
#	define new DEBUG_NEW
#	undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

/////////////////////////////////////////////////////////////////////////////
// CExcelTabApp

BEGIN_MESSAGE_MAP(CExcelTabApp, CWinApp)
	//{{AFX_MSG_MAP(CExcelTabApp)
	// NOTE - the ClassWizard will add and remove mapping macros here.
	//    DO NOT EDIT what you see in these blocks of generated code!
	//}}AFX_MSG
	ON_COMMAND(ID_HELP, CWinApp::OnHelp)
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CExcelTabApp construction

CExcelTabApp::CExcelTabApp()
	: m_clrText(COLORREF_NULL)
	, m_clrBack(COLORREF_NULL)
	, m_clrEdge(COLORREF_NULL)
{
	// TODO: add construction code here,
	// Place all significant initialization in InitInstance
}

/////////////////////////////////////////////////////////////////////////////
// The one and only CExcelTabApp object

CExcelTabApp theApp;

/////////////////////////////////////////////////////////////////////////////
// CExcelTabApp initialization

BOOL CExcelTabApp::InitInstance()
{
	AfxEnableControlContainer();

	// Standard initialization
	// If you are not using these features and wish to reduce the size
	//  of your final executable, you should remove from the following
	//  the specific initialization routines you do not need.

#if _MSC_VER <= 1200 // MFC 6.0 or earlier
#	ifdef _AFXDLL
	Enable3dControls(); // Call this when using MFC in a shared DLL
#	else
	Enable3dControlsStatic(); // Call this when linking to MFC statically
#	endif
#endif // MFC 6.0 or earlier

	// Change the registry key under which our settings are stored.
	// TODO: You should modify this string to be something appropriate
	// such as the name of your company or organization.
	CString ver;
	ver.Format(_T("Codejock %s v%d.%d.%d"), _XTP_PACKAGE_NAME, _XTPLIB_VERSION_MAJOR,
			   _XTPLIB_VERSION_MINOR, _XTPLIB_VERSION_REVISION);
	SetRegistryKey(ver);

	LoadStdProfileSettings(); // Load standard INI file options (including MRU)

	InitVisualStyles();

	CExcelTabDlg dlg;
	m_pMainWnd	= &dlg;
	int nResponse = (int)dlg.DoModal();
	if (nResponse == IDOK)
	{
		// TODO: Place code here to handle when the dialog is
		//  dismissed with OK
	}
	else if (nResponse == IDCANCEL)
	{
		// TODO: Place code here to handle when the dialog is
		//  dismissed with Cancel
	}

	// Since the dialog has been closed, return FALSE so that we exit the
	//  application, rather than start the application's message pump.
	return FALSE;
}

XTPPaintTheme CExcelTabApp::GetAppTheme(XTPPaintTheme nDefaultTheme /*= xtpThemeNone*/) const
{
	UINT nTheme = const_cast<CExcelTabApp*>(this)->GetProfileInt(_T(""), _T("Theme"),
																 nDefaultTheme);
	return static_cast<XTPPaintTheme>(nTheme);
}

CString CExcelTabApp::GetAppThemeSettings(LPCTSTR lpDefaultSettings /*= NULL*/)
{
	CString strThemeSettings = const_cast<CExcelTabApp*>(this)->GetProfileString(
		_T(""), _T("ThemeSettings"), lpDefaultSettings);
	strThemeSettings.MakeUpper();
	return strThemeSettings;
}

void CExcelTabApp::SetAppTheme(XTPPaintTheme nTheme, LPCTSTR lpThemeSettings /*= NULL*/,
							   BOOL bUpdateResources /*= TRUE*/)
{
	UNREFERENCED_PARAMETER(bUpdateResources);

	if (NULL != lpThemeSettings)
	{
		XTPThemeDLL()->SetHandle(lpThemeSettings);
	}
	else
	{
		XTPThemeDLL()->Reset();
	}

	XTPPaintManager()->SetTheme(nTheme);

	WriteProfileInt(_T(""), _T("Theme"), nTheme);

	CString strThemeSettings;
	if (NULL != lpThemeSettings)
	{
		strThemeSettings = lpThemeSettings;
		strThemeSettings.MakeUpper();
	}

	WriteProfileString(_T(""), _T("ThemeSettings"), strThemeSettings);
}

void CExcelTabApp::InitVisualStyles()
{
	XTPPaintTheme nTheme	 = GetAppTheme(xtpThemeVisualStudio2022);
	CString strThemeSettings = GetAppThemeSettings(xtpIniVisualStudio2022Blue);
	SetAppTheme(nTheme, strThemeSettings);
}

BOOL CExcelTabApp::GetStylesPath(CString& strPath, LPCTSTR lpFileName /*= NULL*/)
{
	TCHAR szPath[MAX_PATH + 1] = { _T('\0') };
	if (0 == ::GetModuleFileName(AfxGetApp()->m_hInstance, szPath, MAX_PATH + 1))
	{
		TRACE(_T("ERROR: Unable to obtain module file name.\n"));
		return FALSE;
	}

	::PathRemoveFileSpec(szPath);

	SIZE_T cchAdditional = 1 + _tcslen(_T("Styles"))
						   + (NULL != lpFileName ? 1 + _tcslen(lpFileName) : 0) + 1;
	if (_countof(szPath) < (_tcslen(szPath) + cchAdditional))
	{
		TRACE(_T("ERROR: Style path is too long.\n"));
		return FALSE;
	}

	if (!::PathAppend(szPath, _T("Styles")))
	{
		TRACE(_T("ERROR: Unable to append path.\n"));
		return FALSE;
	}

	if (NULL != lpFileName)
	{
		if (!::PathAppend(szPath, lpFileName))
		{
			TRACE(_T("ERROR: Unable to append path.\n"));
			return FALSE;
		}
	}

	strPath = szPath;

	return TRUE;
}

XTPControlTheme CExcelTabApp::GetControlTheme()
{
	XTPPaintTheme appTheme		 = GetAppTheme();
	XTPControlTheme controlTheme = xtpControlThemeDefault;

	switch (appTheme)
	{
		case xtpThemeNone: ASSERT(FALSE); break;
		case xtpThemeOffice2000: controlTheme = xtpControlThemeOffice2000; break;
		case xtpThemeOfficeXP: controlTheme = xtpControlThemeOfficeXP; break;
		case xtpThemeOffice2003: controlTheme = xtpControlThemeOffice2003; break;
		case xtpThemeOffice2013: controlTheme = xtpControlThemeOffice2013; break;
		// case xtpThemeOffice2016: controlTheme =  xtpControlThemeOffice2016; break;
		case xtpThemeCustom: controlTheme = xtpControlThemeCustom; break;
		case xtpThemeRibbon: controlTheme = xtpControlThemeResource; break;
		case xtpThemeResource: controlTheme = xtpControlThemeResource; break;
		case xtpThemeOffice2007System: controlTheme = xtpControlThemeResource; break;
		case xtpThemeNativeWinXP: controlTheme = xtpControlThemeNativeWinXP; break;
		case xtpThemeNativeWindows10: controlTheme = xtpControlThemeNativeWindows10; break;
		case xtpThemeNativeWindows11: controlTheme = xtpControlThemeNativeWindows11; break;
		case xtpThemeVisualStudio6: ASSERT(FALSE); break;
		case xtpThemeVisualStudio2005: controlTheme = xtpControlThemeVisualStudio2005; break;
		case xtpThemeVisualStudio2008: controlTheme = xtpControlThemeVisualStudio2008; break;
		case xtpThemeVisualStudio2010: controlTheme = xtpControlThemeVisualStudio2010; break;
		case xtpThemeVisualStudio2012: controlTheme = xtpControlThemeVisualStudio2012; break;
		case xtpThemeVisualStudio2012Light:
			controlTheme = xtpControlThemeVisualStudio2012Light;
			break;
		case xtpThemeVisualStudio2012Dark:
			controlTheme = xtpControlThemeVisualStudio2012Dark;
			break;
		case xtpThemeVisualStudio2015: controlTheme = xtpControlThemeVisualStudio2015; break;
		case xtpThemeVisualStudio2017: controlTheme = xtpControlThemeVisualStudio2017; break;
		case xtpThemeVisualStudio2019: controlTheme = xtpControlThemeVisualStudio2019; break;
		case xtpThemeVisualStudio2022: controlTheme = xtpControlThemeVisualStudio2022; break;
		default: controlTheme = xtpControlThemeDefault; break;
	}

	return controlTheme;
}