开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Windows编程 > 界面编程 > 对话框与窗口 > 查看源码
wordpad.cpp
资源名称：Xtreme.ToolkitPro.v12.0.0.rar　[点击查看]
上传用户：szled88
上传日期：2015-04-09
资源大小：43957k
文件大小：27k
源码类别：

对话框与窗口

开发平台：

Visual C++

wordpad.cpp：源码内容
  1. // wordpad.cpp : Defines the class behaviors for the application.
  2. //
  3. // This file is a part of the XTREME TOOLKIT PRO MFC class library.
  4. // (c)1998-2008 Codejock Software, All Rights Reserved.
  5. //
  6. // THIS SOURCE FILE IS THE PROPERTY OF CODEJOCK SOFTWARE AND IS NOT TO BE
  7. // RE-DISTRIBUTED BY ANY MEANS WHATSOEVER WITHOUT THE EXPRESSED WRITTEN
  8. // CONSENT OF CODEJOCK SOFTWARE.
  9. //
  10. // THIS SOURCE CODE CAN ONLY BE USED UNDER THE TERMS AND CONDITIONS OUTLINED
  11. // IN THE XTREME TOOLKIT PRO LICENSE AGREEMENT. CODEJOCK SOFTWARE GRANTS TO
  12. // YOU (ONE SOFTWARE DEVELOPER) THE LIMITED RIGHT TO USE THIS SOFTWARE ON A
  13. // SINGLE COMPUTER.
  14. //
  15. // CONTACT INFORMATION:
  16. // support@codejock.com
  17. // http://www.codejock.com
  18. //
  19. /////////////////////////////////////////////////////////////////////////////
  21. #include "stdafx.h"
  23. #include "wordpad.h"
  24. #include "mainfrm.h"
  25. #include "wordpdoc.h"
  26. #include "wordpvw.h"
  27. #include "strings.h"
  28. #include "key.h"
  29. #include "filenewd.h"
  30. #include <locale.h>
  31. #include <winnls.h>
  32. #include <winreg.h>
  34. #include "AboutDlg.h"
  37. extern BOOL AFXAPI AfxFullPath(LPTSTR lpszPathOut, LPCTSTR lpszFileIn);
  38. static BOOL RegisterHelper(LPCTSTR* rglpszRegister, LPCTSTR* rglpszSymbols,
  39. BOOL bReplace);
  41. #ifdef _DEBUG
  42. #undef THIS_FILE
  43. static char BASED_CODE THIS_FILE[] = __FILE__;
  44. #endif
  46. CLIPFORMAT cfEmbeddedObject;
  47. CLIPFORMAT cfRTF;
  48. CLIPFORMAT cfRTO;
  50. int CWordPadApp::m_nOpenMsg = RegisterWindowMessage(_T("WordPadOpenMessage"));
  51. int CWordPadApp::m_nPrinterChangedMsg = RegisterWindowMessage(_T("WordPadPrinterChanged"));
  53. const int CWordPadApp::m_nPrimaryNumUnits = 4;
  54. const int CWordPadApp::m_nNumUnits = 7;
  56. CUnit CWordPadApp::m_units[7] =
  57. {
  58. //  TPU,    SmallDiv,   MedDiv, LargeDiv,   MinMove,    szAbbrev,           bSpace
  59. CUnit(1440, 180,        720,    1440,       90,         IDS_INCH1_ABBREV,   FALSE),//inches
  60. CUnit(568,  142,        284,    568,        142,        IDS_CM_ABBREV,      TRUE),//centimeters
  61. CUnit(20,   120,        720,    720,        100,        IDS_POINT_ABBREV,   TRUE),//points
  62. CUnit(240,  240,        1440,   1440,       120,        IDS_PICA_ABBREV,    TRUE),//picas
  63. CUnit(1440, 180,        720,    1440,       90,         IDS_INCH2_ABBREV,   FALSE),//in
  64. CUnit(1440, 180,        720,    1440,       90,         IDS_INCH3_ABBREV,   FALSE),//inch
  65. CUnit(1440, 180,        720,    1440,       90,         IDS_INCH4_ABBREV,   FALSE)//inches
  66. };
  68. static UINT _cdecl DoRegistry(LPVOID lpv)
  69. {
  70. ASSERT(lpv != NULL);
  71. ((CWordPadApp*)lpv)->UpdateRegistry();
  72. return 0;
  73. }
  75. /////////////////////////////////////////////////////////////////////////////
  76. // CWordPadApp
  78. BEGIN_MESSAGE_MAP(CWordPadApp, CWinApp)
  79. //{{AFX_MSG_MAP(CWordPadApp)
  80. ON_COMMAND(ID_APP_ABOUT, OnAppAbout)
  81. ON_COMMAND(ID_FILE_NEW, OnFileNew)
  82. ON_COMMAND(ID_FILE_OPEN, OnFileOpen)
  83. //}}AFX_MSG_MAP
  84. END_MESSAGE_MAP()
  86. void CWordPadCommandLineInfo::ParseParam(const char* pszParam,BOOL bFlag,BOOL bLast)
  87. {
  88. if (bFlag)
  89. {
  90. if (lstrcmpA(pszParam, "t") == 0)
  91. {
  92. m_bForceTextMode = TRUE;
  93. return;
  94. }
  95. }
  96. CCommandLineInfo::ParseParam(pszParam, bFlag, bLast);
  97. }
  99. /////////////////////////////////////////////////////////////////////////////
  100. // CWordPadApp construction
  102. CWordPadApp::CWordPadApp() : m_optionsText(0), m_optionsRTF(1),
  103. m_optionsWord(2), m_optionsWrite(2), m_optionsIP(2), m_optionsNull(0)  //
  104. {
  105. _tsetlocale(LC_ALL, _T(""));
  107. m_nFilterIndex = 1;
  108. DWORD dwVersion = ::GetVersion();
  109. m_bWin4 = (BYTE)dwVersion >= 4;
  110. #ifndef _UNICODE
  111. m_bWin31 = (dwVersion > 0x80000000 && !m_bWin4);
  112. #endif
  113. m_nDefFont = (m_bWin4) ? DEFAULT_GUI_FONT : ANSI_VAR_FONT;
  114. m_dcScreen.Attach(::GetDC(NULL));
  115. m_bLargeIcons = m_dcScreen.GetDeviceCaps(LOGPIXELSX) >= 120;
  116. m_bForceOEM = FALSE;
  117. }
  119. CWordPadApp::~CWordPadApp()
  120. {
  121. if (m_dcScreen.m_hDC != NULL)
  122. ::ReleaseDC(NULL, m_dcScreen.Detach());
  123. }
  125. /////////////////////////////////////////////////////////////////////////////
  126. // The one and only CWordPadApp object
  128. CWordPadApp theApp;
  130. // Register the application's document templates.  Document templates
  131. //  serve as the connection between documents, frame windows and views.
  132. static CSingleDocTemplate DocTemplate(
  133. IDR_MAINFRAME,
  134. RUNTIME_CLASS(CWordPadDoc),
  135. RUNTIME_CLASS(CMainFrame),       // main SDI frame window
  136. RUNTIME_CLASS(CWordPadView));
  138. // This identifier was generated to be statistically unique for your app.
  139. // You may change it if you prefer to choose a specific identifier.
  140. static const CLSID BASED_CODE clsid =
  141. { 0x73FDDC80L, 0xAEA9, 0x101A, { 0x98, 0xA7, 0x00, 0xAA, 0x00, 0x37, 0x49, 0x59} };
  143. /////////////////////////////////////////////////////////////////////////////
  144. // CWordPadApp initialization
  146. BOOL CWordPadApp::InitInstance()
  147. {
  148. ParseCommandLine(cmdInfo);
  150. if (::FindWindow(szWordPadClass, NULL) && IsDocOpen(cmdInfo.m_strFileName))
  151. return FALSE;
  153. SetRegistryKey(_T("Codejock Software Sample Applications"));
  154. LoadOptions();
  156. #if _MSC_VER <= 1200 // MFC 6.0 or earlier
  157. Enable3dControls();
  158. #endif
  159. CSplashWnd splash;
  160. BOOL bSplash = cmdInfo.m_bShowSplash;
  161. if (!cmdInfo.m_bRunEmbedded)
  162. {
  163. switch (m_nCmdShow)
  164. {
  165. case SW_HIDE:
  166. case SW_SHOWMINIMIZED:
  167. case SW_MINIMIZE:
  168. case SW_SHOWMINNOACTIVE:
  169. bSplash = FALSE;
  170. break;
  171. case SW_RESTORE:
  172. case SW_SHOW:
  173. case SW_SHOWDEFAULT:
  174. case SW_SHOWNA:
  175. case SW_SHOWNOACTIVATE:
  176. case SW_SHOWNORMAL:
  177. case SW_SHOWMAXIMIZED:
  178. if (m_bMaximized)
  179. m_nCmdShow = SW_SHOWMAXIMIZED;
  180. break;
  181. }
  182. }
  183. else
  184. {
  185. //Excel 4 will start OLE servers minimized
  186. m_nCmdShow = SW_SHOWNORMAL;
  187. }
  188. int nCmdShow = m_nCmdShow;
  190. if (bSplash)
  191. {
  192. // only show splash if not embedded
  193. splash.Create(NULL);
  194. splash.ShowWindow(SW_SHOW);
  195. splash.UpdateWindow();
  196. }
  198. LoadAbbrevStrings();
  200. m_hDevNames = CreateDevNames();
  201. NotifyPrinterChanged((m_hDevNames == NULL));
  203. free((void*)m_pszHelpFilePath);
  204. m_pszHelpFilePath = _T("WORDPAD.HLP");
  206. // Initialize OLE libraries
  207. if (!AfxOleInit())
  208. {
  209. AfxMessageBox(IDP_OLE_INIT_FAILED);
  210. return FALSE;
  211. }
  212. RegisterFormats();
  214. // Initialize RichEdit control
  215. if (LoadLibrary(_T("RICHED32.DLL")) == NULL)
  216. {
  217. AfxMessageBox(IDS_RICHED_LOAD_FAIL, MB_OK|MB_ICONEXCLAMATION);
  218. return FALSE;
  219. }
  221. // Standard initialization
  222. // If you are not using these features and wish to reduce the size
  223. //  of your final executable, you should remove from the following
  224. //  the specific initialization routines you do not need.
  226. LoadStdProfileSettings();  // Load standard INI file options (including MRU)
  228. // Register the application's document templates.  Document templates
  229. //  serve as the connection between documents, frame windows and views.
  231. DocTemplate.SetContainerInfo(IDR_CNTR_INPLACE);
  232. /*DocTemplate.SetServerInfo(
  233. IDR_SRVR_EMBEDDED, IDR_SRVR_INPLACE,
  234. RUNTIME_CLASS(CInPlaceFrame));*/
  236. // Connect the COleTemplateServer to the document template.
  237. //  The COleTemplateServer creates new documents on behalf
  238. //  of requesting OLE containers by using information
  239. //  specified in the document template.
  240. m_server.ConnectTemplate(clsid, &DocTemplate, TRUE);
  241. // Note: SDI applications register server objects only if /Embedding
  242. //   or /Automation is present on the command line.
  244. // Check to see if launched as OLE server
  245. if (cmdInfo.m_bRunEmbedded || cmdInfo.m_bRunAutomated)
  246. {
  247. // Register all OLE server (factories) as running.  This enables the
  248. //  OLE libraries to create objects from other applications.
  249. COleTemplateServer::RegisterAll();
  250. AfxOleSetUserCtrl(FALSE);
  252. // Application was run with /Embedding or /Automation.  Don't show the
  253. //  main window in this case.
  254. return TRUE;
  255. }
  257. // make sure the main window is showing
  258. m_bPromptForType = FALSE;
  259. OnFileNew();
  260. m_bPromptForType = TRUE;
  261. // destroy splash window
  262. if (cmdInfo.m_bShowSplash)
  263. splash.DestroyWindow();
  264. m_nCmdShow = -1;
  265. if (m_pMainWnd == NULL) // i.e. OnFileNew failed
  266. return FALSE;
  268. if (!cmdInfo.m_strFileName.IsEmpty())   // open an existing document
  269. m_nCmdShow = nCmdShow;
  270. // Dispatch commands specified on the command line
  271. if (cmdInfo.m_nShellCommand != CCommandLineInfo::FileNew &&
  272. !ProcessShellCommand(cmdInfo))
  273. {
  274. return FALSE;
  275. }
  277. // Enable File Manager drag/drop open
  278. m_pMainWnd->DragAcceptFiles();
  280. // When a server application is launched stand-alone, it is a good idea
  281. //  to update the system registry in case it has been damaged.
  282. // do registry stuff in separate thread
  283. #ifndef _UNICODE
  284. if (m_bWin31) // no threads on Win32s
  285. UpdateRegistry();
  286. else
  287. #endif
  288. AfxBeginThread(DoRegistry, this, THREAD_PRIORITY_IDLE);
  290. return TRUE;
  291. }
  293. BOOL CWordPadApp::IsDocOpen(LPCTSTR lpszFileName)
  294. {
  295. if (lpszFileName[0] == NULL)
  296. return FALSE;
  297. TCHAR szPath[_MAX_PATH];
  298. AfxFullPath(szPath, lpszFileName);
  299. ATOM atom = GlobalAddAtom(szPath);
  300. ASSERT(atom != NULL);
  301. if (atom == NULL)
  302. return FALSE;
  303. EnumWindows(StaticEnumProc, (LPARAM)&atom);
  304. if (atom == NULL)
  305. return TRUE;
  306. DeleteAtom(atom);
  307. return FALSE;
  308. }
  310. BOOL CALLBACK CWordPadApp::StaticEnumProc(HWND hWnd, LPARAM lParam)
  311. {
  312. TCHAR szClassName[30];
  313. GetClassName(hWnd, szClassName, 30);
  314. if (lstrcmp(szClassName, szWordPadClass) != 0)
  315. return TRUE;
  317. ATOM* pAtom = (ATOM*)lParam;
  318. ASSERT(pAtom != NULL);
  319. DWORD_PTR dw = NULL;
  320. ::SendMessageTimeout(hWnd, m_nOpenMsg, NULL, (LPARAM)*pAtom,
  321. SMTO_ABORTIFHUNG, 500, &dw);
  322. if (dw)
  323. {
  324. ::SetForegroundWindow(hWnd);
  325. DeleteAtom(*pAtom);
  326. *pAtom = NULL;
  327. return FALSE;
  328. }
  329. return TRUE;
  330. }
  332. void CWordPadApp::RegisterFormats()
  333. {
  334. cfEmbeddedObject = (CLIPFORMAT)::RegisterClipboardFormat(_T("Embedded Object"));
  335. cfRTF = (CLIPFORMAT)::RegisterClipboardFormat(CF_RTF);
  336. cfRTO = (CLIPFORMAT)::RegisterClipboardFormat(CF_RETEXTOBJ);
  337. }
  339. CDocOptions& CWordPadApp::GetDocOptions(int nDocType)
  340. {
  341. switch (nDocType)
  342. {
  343. case RD_WINWORD6:
  344. case RD_WORDPAD:
  345. return m_optionsWord;
  346. case RD_RICHTEXT:
  347. return m_optionsRTF;
  348. case RD_TEXT:
  349. case RD_OEMTEXT:
  350. return m_optionsText;
  351. case RD_WRITE:
  352. return m_optionsWrite;
  353. case RD_EMBEDDED:
  354. return m_optionsIP;
  355. }
  356. ASSERT(FALSE);
  357. return m_optionsNull;
  358. }
  360. CDockState& CWordPadApp::GetDockState(int nDocType, BOOL bPrimary)
  361. {
  362. return GetDocOptions(nDocType).GetDockState(bPrimary);
  363. }
  365. void CWordPadApp::SaveOptions()
  366. {
  367. WriteProfileInt(szSection, szWordSel, m_bWordSel);
  368. WriteProfileInt(szSection, szUnits, GetUnits());
  369. WriteProfileInt(szSection, szMaximized, m_bMaximized);
  370. WriteProfileBinary(szSection, szFrameRect, (BYTE*)&m_rectInitialFrame,
  371. sizeof(CRect));
  372. WriteProfileBinary(szSection, szPageMargin, (BYTE*)&m_rectPageMargin,
  373. sizeof(CRect));
  374. m_optionsText.SaveOptions(szTextSection);
  375. m_optionsRTF.SaveOptions(szRTFSection);
  376. m_optionsWord.SaveOptions(szWordSection);
  377. m_optionsWrite.SaveOptions(szWriteSection);
  378. m_optionsIP.SaveOptions(szIPSection);
  379. }
  381. void CWordPadApp::LoadOptions()
  382. {
  383. BYTE* pb = NULL;
  384. UINT nLen = 0;
  386. HFONT hFont = (HFONT)GetStockObject(DEFAULT_GUI_FONT);
  387. if (hFont == NULL)
  388. hFont = (HFONT)GetStockObject(ANSI_VAR_FONT);
  389. VERIFY(GetObject(hFont, sizeof(LOGFONT), &m_lf));
  391. m_bWordSel = GetProfileInt(szSection, szWordSel, TRUE);
  392. TCHAR buf[2];
  393. buf[0] = NULL;
  394. GetLocaleInfo(GetUserDefaultLCID(), LOCALE_IMEASURE, buf, 2);
  395. int nDefUnits = buf[0] == '1' ? 0 : 1;
  396. SetUnits(GetProfileInt(szSection, szUnits, nDefUnits));
  397. m_bMaximized = GetProfileInt(szSection, szMaximized, (int)FALSE);
  399. if (GetProfileBinary(szSection, szFrameRect, &pb, &nLen))
  400. {
  401. ASSERT(nLen == sizeof(CRect));
  402. MEMCPY_S(&m_rectInitialFrame, pb, sizeof(CRect));
  403. delete pb;
  404. }
  405. else
  406. m_rectInitialFrame.SetRect(0,0,0,0);
  408. CRect rectScreen(0, 0, GetSystemMetrics(SM_CXSCREEN),
  409. GetSystemMetrics(SM_CYSCREEN));
  410. CRect rectInt;
  411. rectInt.IntersectRect(&rectScreen, &m_rectInitialFrame);
  412. if (rectInt.Width() < 10 || rectInt.Height() < 10)
  413. m_rectInitialFrame.SetRect(0, 0, 0, 0);
  415. if (GetProfileBinary(szSection, szPageMargin, &pb, &nLen))
  416. {
  417. ASSERT(nLen == sizeof(CRect));
  418. MEMCPY_S(&m_rectPageMargin, pb, sizeof(CRect));
  419. delete pb;
  420. }
  421. else
  422. m_rectPageMargin.SetRect(1800, 1440, 1800, 1440);
  424. m_optionsText.LoadOptions(szTextSection);
  425. m_optionsRTF.LoadOptions(szRTFSection);
  426. m_optionsWord.LoadOptions(szWordSection);
  427. m_optionsWrite.LoadOptions(szWriteSection);
  428. m_optionsIP.LoadOptions(szIPSection);
  429. }
  431. void CWordPadApp::LoadAbbrevStrings()
  432. {
  433. for (int i=0;i<m_nNumUnits;i++)
  434. m_units[i].m_strAbbrev.LoadString(m_units[i].m_nAbbrevID);
  435. }
  437. BOOL CWordPadApp::ParseMeasurement(LPTSTR buf, int& lVal)
  438. {
  439. TCHAR* pch;
  440. if (buf[0] == NULL)
  441. return FALSE;
  442. float f = (float)_tcstod(buf,&pch);
  444. // eat white space, if any
  445. while (isspace(*pch))
  446. pch++;
  448. if (pch[0] == NULL) // default
  449. {
  450. lVal = (f < 0.f) ? (int)(f*GetTPU()-0.5f) : (int)(f*GetTPU()+0.5f);
  451. return TRUE;
  452. }
  453. for (int i=0;i<m_nNumUnits;i++)
  454. {
  455. if (lstrcmpi(pch, GetAbbrev(i)) == 0)
  456. {
  457. lVal = (f < 0.f) ? (int)(f*GetTPU(i)-0.5f) : (int)(f*GetTPU(i)+0.5f);
  458. return TRUE;
  459. }
  460. }
  461. return FALSE;
  462. }
  464. void CWordPadApp::PrintTwips(TCHAR* buf, int nValue, int nDec)
  465. {
  466. ASSERT(nDec == 2);
  467. int div = GetTPU();
  468. int lval = nValue;
  469. BOOL bNeg = FALSE;
  471. int* pVal = new int[nDec+1];
  473. if (lval < 0)
  474. {
  475. bNeg = TRUE;
  476. lval = -lval;
  477. }
  478. int i;
  479. for (i=0;i<=nDec;i++)
  480. {
  481. pVal[i] = lval/div; //integer number
  482. lval -= pVal[i]*div;
  483. lval *= 10;
  484. }
  485. i--;
  486. if (lval >= div/2)
  487. pVal[i]++;
  489. while ((pVal[i] == 10) && (i != 0))
  490. {
  491. pVal[i] = 0;
  492. pVal[--i]++;
  493. }
  495. while (nDec && pVal[nDec] == 0)
  496. nDec--;
  498. #if (_MSC_VER > 1310) // VS2005
  499. _stprintf_s(buf, 64, _T("%.*f"), nDec, (float)nValue/(float)div);
  500. #else
  501. _stprintf(buf, _T("%.*f"), nDec, (float)nValue/(float)div);
  502. #endif
  504. if (m_units[m_nUnits].m_bSpaceAbbrev)
  505. lstrcat(buf, _T(" "));
  506. lstrcat(buf, GetAbbrev());
  507. delete []pVal;
  508. }
  510. /////////////////////////////////////////////////////////////////////////////
  511. // CWordPadApp commands
  513. void CWordPadApp::OnAppAbout()
  514. {
  515. CAboutDlg dlgAbout;
  516. dlgAbout.DoModal();
  517. }
  519. int CWordPadApp::ExitInstance()
  520. {
  521. m_pszHelpFilePath = NULL;
  523. FreeLibrary(GetModuleHandle(_T("RICHED32.DLL")));
  524. SaveOptions();
  526. return CWinApp::ExitInstance();
  527. }
  529. void CWordPadApp::OnFileNew()
  530. {
  531. int nDocType = -1;
  532. if (!m_bPromptForType)
  533. {
  534. if (cmdInfo.m_bForceTextMode)
  535. nDocType = RD_TEXT;
  536. else if (!cmdInfo.m_strFileName.IsEmpty())
  537. {
  538. CFileException fe;
  539. nDocType = GetDocTypeFromName(cmdInfo.m_strFileName, fe);
  540. }
  541. if (nDocType == -1)
  542. nDocType = RD_DEFAULT;
  543. }
  544. else
  545. {
  546. CFileNewDialog dlg;
  547. if (dlg.DoModal() == IDCANCEL)
  548. return;
  550. nDocType = (dlg.m_nSel == 0) ? RD_DEFAULT:  //Word 6
  551. (dlg.m_nSel == 1) ? RD_RICHTEXT :   //RTF
  552. RD_TEXT ;                   //text
  554. if (nDocType != RD_TEXT)
  555. cmdInfo.m_bForceTextMode = FALSE;
  556. }
  557. m_nNewDocType = nDocType;
  558. DocTemplate.OpenDocumentFile(NULL);
  559. // if returns NULL, the user has already been alerted
  560. }
  562. // prompt for file name - used for open and save as
  563. // static function called from app
  564. BOOL CWordPadApp::PromptForFileName(CString& fileName, UINT nIDSTitle,
  565. DWORD dwFlags, BOOL bOpenFileDialog, int* pType)
  566. {
  567. ScanForConverters();
  568. CFileDialog dlgFile(bOpenFileDialog);
  569. CString title;
  571. VERIFY(title.LoadString(nIDSTitle));
  573. dlgFile.m_ofn.Flags |= dwFlags;
  574. //  dlgFile.m_ofn.Flags &= ~OFN_SHOWHELP;
  576. int nIndex = m_nFilterIndex;
  577. if (!bOpenFileDialog)
  578. {
  579. int nDocType = (pType != NULL) ? *pType : RD_DEFAULT;
  580. nIndex = GetIndexFromType(nDocType, bOpenFileDialog);
  581. if (nIndex == -1)
  582. nIndex = GetIndexFromType(RD_DEFAULT, bOpenFileDialog);
  583. if (nIndex == -1)
  584. nIndex = GetIndexFromType(RD_NATIVE, bOpenFileDialog);
  585. ASSERT(nIndex != -1);
  586. nIndex++;
  587. }
  588. dlgFile.m_ofn.nFilterIndex = nIndex;
  589. // strDefExt is necessary to hold onto the memory from GetExtFromType
  590. CString strDefExt = GetExtFromType(GetTypeFromIndex(nIndex-1, bOpenFileDialog));
  591. dlgFile.m_ofn.lpstrDefExt = strDefExt;
  594. CString strFilter = GetFileTypes(bOpenFileDialog);
  595. dlgFile.m_ofn.lpstrFilter = strFilter;
  596. dlgFile.m_ofn.lpstrTitle = title;
  597. dlgFile.m_ofn.lpstrFile = fileName.GetBuffer(_MAX_PATH);
  599. BOOL bRet = (dlgFile.DoModal() == IDOK) ? TRUE : FALSE;
  600. fileName.ReleaseBuffer();
  601. if (bRet)
  602. {
  603. if (bOpenFileDialog)
  604. m_nFilterIndex = dlgFile.m_ofn.nFilterIndex;
  605. if (pType != NULL)
  606. {
  607. int nIndex = (int)dlgFile.m_ofn.nFilterIndex - 1;
  608. ASSERT(nIndex >= 0);
  609. *pType = GetTypeFromIndex(nIndex, bOpenFileDialog);
  610. }
  611. }
  612. return bRet;
  613. }
  615. void CWordPadApp::OnFileOpen()
  616. {
  617. // prompt the user (with all document templates)
  618. CString newName;
  619. int nType = RD_DEFAULT;
  620. if (!PromptForFileName(newName, AFX_IDS_OPENFILE,
  621. OFN_HIDEREADONLY | OFN_FILEMUSTEXIST, TRUE, &nType))
  622. return; // open cancelled
  624. if (nType == RD_OEMTEXT)
  625. m_bForceOEM = TRUE;
  626. OpenDocumentFile(newName);
  627. m_bForceOEM = FALSE;
  628. // if returns NULL, the user has already been alerted
  629. }
  631. BOOL CWordPadApp::OnDDECommand(LPTSTR /*lpszCommand*/)
  632. {
  633. return FALSE;
  634. }
  636. /////////////////////////////////////////////////////////////////////////////
  637. // DDE and ShellExecute support
  639. //HKEY_CLASSES_ROOT.RTF = rtffile
  640. //HKEY_CLASSES_ROOTrtffile =
  641. //HKEY_CLASSES_ROOTrtffileCLSID = {73FDDC80-AEA9-101A-98A7-00AA00374959}
  642. //HKEY_CLASSES_ROOTrtffileprotocolStdFileEditingserver = WORDPAD.EXE
  643. //HKEY_CLASSES_ROOTrtffileprotocolStdFileEditingverb = &Edit
  644. //HKEY_CLASSES_ROOTrtffileshellopencommand = WORDPAD.EXE %1
  645. //HKEY_CLASSES_ROOTrtffileshellprintcommand = WORDPAD.EXE /p %1
  647. #define REGENTRY(key, value) _T(key) _T("") _T(value)
  648. #define REGENTRYX(key, valuename, value) _T(key) _T("") _T(valuename) _T("") _T(value)
  650. static const TCHAR sz00[] = REGENTRY("%2", "%5");
  651. static const TCHAR sz01[] = REGENTRY("%2\CLSID", "%1");
  652. static const TCHAR sz02[] = REGENTRY("%2\Insertable", "");
  653. static const TCHAR sz03[] = REGENTRY("%2\protocol\StdFileEditing\verb\0", "&Edit");
  654. static const TCHAR sz04[] = REGENTRY("%2\protocol\StdFileEditing\server", "%3");
  655. static const TCHAR sz05[] = REGENTRY("CLSID\%1", "%5");
  656. static const TCHAR sz06[] = REGENTRY("CLSID\%1\ProgID", "%2");
  657. static const TCHAR sz07[] = REGENTRY("CLSID\%1\InprocHandler32", "ole32.dll");
  658. static const TCHAR sz08[] = REGENTRY("CLSID\%1\LocalServer32", "%3");
  659. static const TCHAR sz09[] = REGENTRY("CLSID\%1\Verb\0", "&Edit,0,2");
  660. static const TCHAR sz10[] = REGENTRY("CLSID\%1\Verb\1", "&Open,0,2");
  661. static const TCHAR sz11[] = REGENTRY("CLSID\%1\Insertable", "");
  662. static const TCHAR sz12[] = REGENTRY("CLSID\%1\AuxUserType\2", "%4");
  663. static const TCHAR sz13[] = REGENTRY("CLSID\%1\AuxUserType\3", "%6");
  664. static const TCHAR sz14[] = REGENTRY("CLSID\%1\DefaultIcon", "%3,1");
  665. static const TCHAR sz15[] = REGENTRY("CLSID\%1\MiscStatus", "0");
  666. static const TCHAR sz16[] = REGENTRY("%2\shell\open\command", "%3 "%%1"");
  667. static const TCHAR sz17[] = REGENTRY("%2\shell\print\command", "%3 /p "%%1"");
  668. static const TCHAR sz18[] = REGENTRY("%7", "%2");
  669. static const TCHAR sz19[] = REGENTRY("%2", ""); // like sz00 only no long type name
  670. static const TCHAR sz20[] = REGENTRY("%2\shell\printto\command", "%3 /pt "%%1" "%%2" "%%3" "%%4"");
  671. static const TCHAR sz21[] = REGENTRY("%2\DefaultIcon", "%3,%8");
  672. static const TCHAR sz22[] = REGENTRYX("%7\ShellNew", "NullFile", "true");
  673. static const TCHAR sz23[] = REGENTRYX("%7\ShellNew", "Data", "{\rtf1}");
  675. // %1 - class ID
  676. // %2 - class name              WordPad.Document.1
  677. // %3 - SFN executable path     C:PROGRA~1ACCESS~1WORDPAD.EXE
  678. // %4 - short type name         Document
  679. // %5 - long type name          Microsoft WordPad Document
  680. // %6 - long application name   Microsoft WordPad
  681. // %7 = extension               .rtf
  682. // %8 = default icon            0,1,2,3
  683. #define NUM_REG_ARGS 8
  685. static const LPCTSTR rglpszWordPadRegister[] =
  686. {sz00, sz02, sz03, sz05, sz09, sz10, sz11, sz15, NULL};
  688. static const LPCTSTR rglpszWordPadOverwrite[] =
  689. {sz01, sz04, sz06, sz07, sz08, sz12, sz13, sz14, sz16, sz17, sz20, NULL};
  691. //static const LPCTSTR rglpszExtRegister[] =
  692. //{sz00, sz18, NULL};
  694. //static const LPCTSTR rglpszExtOverwrite[] =
  695. //{sz01, sz16, sz17, sz21, NULL};
  697. static const LPCTSTR rglpszWriExtRegister[] =
  698. {sz18, NULL};
  699. static const LPCTSTR rglpszWriRegister[] =
  700. {sz00, sz01, sz16, sz17, sz20, sz21, NULL};
  702. static const LPCTSTR rglpszRtfExtRegister[] =
  703. {sz18, sz23, NULL};
  704. static const LPCTSTR rglpszRtfRegister[] =
  705. {sz00, sz01, sz16, sz17, sz20, sz21, NULL};
  707. static const LPCTSTR rglpszTxtExtRegister[] =
  708. {sz18, sz22, NULL};
  709. static const LPCTSTR rglpszTxtRegister[] =
  710. {sz00, sz01, sz16, sz17, sz20, sz21, NULL};
  712. static const LPCTSTR rglpszDocExtRegister[] =
  713. {sz18, sz22, NULL};
  714. static const LPCTSTR rglpszDocRegister[] =
  715. {sz00, sz01, sz16, sz17, sz20, sz21, NULL};
  717. static void RegisterExt(LPCTSTR lpszExt, LPCTSTR lpszProgID, UINT nIDTypeName,
  718. LPCTSTR* rglpszSymbols, LPCTSTR* rglpszExtRegister,
  719. LPCTSTR* rglpszRegister, int nIcon)
  720. {
  721. // don't overwrite anything with the extensions
  722. CString strWhole;
  723. VERIFY(strWhole.LoadString(nIDTypeName));
  724. CString str;
  725. AfxExtractSubString(str, strWhole, DOCTYPE_PROGID);
  727. rglpszSymbols[1] = lpszProgID;
  728. rglpszSymbols[4] = str;
  729. rglpszSymbols[6] = lpszExt;
  730. TCHAR buf[10];
  731. wsprintf(buf, _T("%d"), nIcon);
  732. rglpszSymbols[7] = buf;
  733. // check for .ext and progid
  734. CKey key;
  735. if (!key.Open(HKEY_CLASSES_ROOT, lpszExt)) // .ext doesn't exist
  736. RegisterHelper(rglpszExtRegister, rglpszSymbols, TRUE);
  737. key.Close();
  738. if (!key.Open(HKEY_CLASSES_ROOT, lpszProgID)) // ProgID doesn't exist (i.e. txtfile)
  739. RegisterHelper(rglpszRegister, rglpszSymbols, TRUE);
  740. }
  742. void CWordPadApp::UpdateRegistry()
  743. {
  744. USES_CONVERSION;
  745. LPOLESTR lpszClassID = NULL;
  746. CDocTemplate* pDocTemplate = &DocTemplate;
  748. // get registration info from doc template string
  749. CString strServerName;
  750. CString strLocalServerName;
  751. CString strLocalShortName;
  753. if (!pDocTemplate->GetDocString(strServerName,
  754. CDocTemplate::regFileTypeId) || strServerName.IsEmpty())
  755. {
  756. TRACE0("Error: not enough information in DocTemplate to register OLE server.n");
  757. return;
  758. }
  759. if (!pDocTemplate->GetDocString(strLocalServerName,
  760. CDocTemplate::regFileTypeName))
  761. strLocalServerName = strServerName;     // use non-localized name
  762. if (!pDocTemplate->GetDocString(strLocalShortName,
  763. CDocTemplate::fileNewName))
  764. strLocalShortName = strLocalServerName; // use long name
  766. ASSERT(strServerName.Find(' ') == -1);  // no spaces allowed
  768. ::StringFromCLSID(clsid, &lpszClassID);
  769. ASSERT (lpszClassID != NULL);
  771. // get path name to server
  772. TCHAR szLongPathName[_MAX_PATH];
  773. TCHAR szShortPathName[_MAX_PATH];
  774. ::GetModuleFileName(AfxGetInstanceHandle(), szLongPathName, _MAX_PATH);
  775. ::GetShortPathName(szLongPathName, szShortPathName, _MAX_PATH);
  777. LPCTSTR rglpszSymbols[NUM_REG_ARGS];
  778. rglpszSymbols[0] = OLE2CT(lpszClassID);
  779. rglpszSymbols[1] = strServerName;
  780. rglpszSymbols[2] = szShortPathName;
  781. rglpszSymbols[3] = strLocalShortName;
  782. rglpszSymbols[4] = strLocalServerName;
  783. rglpszSymbols[5] = m_pszAppName;    // will usually be long, readable name
  784. rglpszSymbols[6] = NULL;
  786. if (RegisterHelper((LPCTSTR*)rglpszWordPadRegister, rglpszSymbols, FALSE))
  787. RegisterHelper((LPCTSTR*)rglpszWordPadOverwrite, rglpszSymbols, TRUE);
  789. //  RegisterExt(_T(".txt"), _T("txtfile"), IDS_TEXT_DOC, rglpszSymbols,
  790. //      (LPCTSTR*)rglpszTxtExtRegister, (LPCTSTR*)rglpszTxtRegister, 3);
  791. RegisterExt(_T(".rtf"), _T("rtffile"), IDS_RICHTEXT_DOC, rglpszSymbols,
  792. (LPCTSTR*)rglpszRtfExtRegister, (LPCTSTR*)rglpszRtfRegister, 1);
  793. RegisterExt(_T(".wri"), _T("wrifile"), IDS_WRITE_DOC, rglpszSymbols,
  794. (LPCTSTR*)rglpszWriExtRegister, (LPCTSTR*)rglpszWriRegister, 2);
  795. RegisterExt(_T(".doc"), _T("WordPad.Document.1"), IDS_WINWORD6_DOC, rglpszSymbols,
  796. (LPCTSTR*)rglpszDocExtRegister, (LPCTSTR*)rglpszDocRegister, 1);
  798. // free memory for class ID
  799. ASSERT(lpszClassID != NULL);
  800. CoTaskMemFree(lpszClassID);
  801. }
  803. BOOL RegisterHelper(LPCTSTR* rglpszRegister, LPCTSTR* rglpszSymbols,
  804. BOOL bReplace)
  805. {
  806. ASSERT(rglpszRegister != NULL);
  807. ASSERT(rglpszSymbols != NULL);
  809. CString strKey;
  810. CString strValueName;
  811. CString strValue;
  813. // keeping a key open makes this go a bit faster
  814. CKey keyTemp;
  815. VERIFY(keyTemp.Create(HKEY_CLASSES_ROOT, _T("CLSID")));
  817. BOOL bResult = TRUE;
  818. while (*rglpszRegister != NULL)
  819. {
  820. LPCTSTR lpszKey = *rglpszRegister++;
  821. if (*lpszKey == '')
  822. continue;
  824. LPCTSTR lpszValueName = lpszKey + lstrlen(lpszKey) + 1;
  825. LPCTSTR lpszValue = lpszValueName + lstrlen(lpszValueName) + 1;
  827. strKey.ReleaseBuffer(
  828. FormatMessage(FORMAT_MESSAGE_FROM_STRING |
  829. FORMAT_MESSAGE_ARGUMENT_ARRAY, lpszKey, NULL,   NULL,
  830. strKey.GetBuffer(256), 256, (va_list*) rglpszSymbols));
  831. strValueName = lpszValueName;
  832. strValue.ReleaseBuffer(
  833. FormatMessage(FORMAT_MESSAGE_FROM_STRING |
  834. FORMAT_MESSAGE_ARGUMENT_ARRAY, lpszValue, NULL, NULL,
  835. strValue.GetBuffer(256), 256, (va_list*) rglpszSymbols));
  837. if (strKey.IsEmpty())
  838. {
  839. TRACE1("Warning: skipping empty key '%s'.n", lpszKey);
  840. continue;
  841. }
  843. CKey key;
  844. VERIFY(key.Create(HKEY_CLASSES_ROOT, strKey));
  845. if (!bReplace)
  846. {
  847. CString str;
  848. if (key.GetStringValue(str, strValueName) && !str.IsEmpty())
  849. continue;
  850. }
  852. if (!key.SetStringValue(strValue, strValueName))
  853. {
  854. TRACE2("Error: failed setting key '%s' to value '%s'.n",
  855. (LPCTSTR)strKey, (LPCTSTR)strValue);
  856. bResult = FALSE;
  857. break;
  858. }
  859. }
  861. return bResult;
  862. }
  864. void CWordPadApp::WinHelp(DWORD dwData, UINT nCmd)
  865. {
  866. if (nCmd == HELP_INDEX || nCmd == HELP_CONTENTS)
  867. nCmd = HELP_FINDER;
  868. CWinApp::WinHelp(dwData, nCmd);
  869. }
  871. BOOL CWordPadApp::PreTranslateMessage(MSG* pMsg)
  872. {
  873. if (pMsg->message == WM_PAINT)
  874. return FALSE;
  875. // CWinApp::PreTranslateMessage does nothing but call base
  876. return CWinThread::PreTranslateMessage(pMsg);
  877. }
  879. void CWordPadApp::NotifyPrinterChanged(BOOL bUpdatePrinterSelection)
  880. {
  881. if (bUpdatePrinterSelection)
  882. UpdatePrinterSelection(FALSE);
  883. POSITION pos = m_listPrinterNotify.GetHeadPosition();
  884. while (pos != NULL)
  885. {
  886. HWND hWnd = m_listPrinterNotify.GetNext(pos);
  887. ::SendMessage(hWnd, m_nPrinterChangedMsg, 0, 0);
  888. }
  889. }
  891. BOOL CWordPadApp::IsIdleMessage(MSG* pMsg)
  892. {
  893. if (pMsg->message == WM_MOUSEMOVE || pMsg->message == WM_NCMOUSEMOVE)
  894. return FALSE;
  895. return CWinApp::IsIdleMessage(pMsg);
  896. }
  898. HGLOBAL CWordPadApp::CreateDevNames()
  899. {
  900. HGLOBAL hDev = NULL;
  901. if (!cmdInfo.m_strDriverName.IsEmpty() && !cmdInfo.m_strPrinterName.IsEmpty() &&
  902. !cmdInfo.m_strPortName.IsEmpty())
  903. {
  904. hDev = GlobalAlloc(GPTR, 4*sizeof(WORD)+
  905. cmdInfo.m_strDriverName.GetLength() + 1 +
  906. cmdInfo.m_strPrinterName.GetLength() + 1 +
  907. cmdInfo.m_strPortName.GetLength()+1);
  908. LPDEVNAMES lpDev = (LPDEVNAMES)GlobalLock(hDev);
  909. lpDev->wDriverOffset = sizeof(WORD)*4;
  910. lstrcpy((TCHAR*)lpDev + lpDev->wDriverOffset, cmdInfo.m_strDriverName);
  912. lpDev->wDeviceOffset = (WORD)(lpDev->wDriverOffset + cmdInfo.m_strDriverName.GetLength()+1);
  913. lstrcpy((TCHAR*)lpDev + lpDev->wDeviceOffset, cmdInfo.m_strPrinterName);
  915. lpDev->wOutputOffset = (WORD)(lpDev->wDeviceOffset + cmdInfo.m_strPrinterName.GetLength()+1);
  916. lstrcpy((TCHAR*)lpDev + lpDev->wOutputOffset, cmdInfo.m_strPortName);
  918. lpDev->wDefault = 0;
  919. }
  920. return hDev;
  921. }