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

源码开发语言/平台
当前位置：首页 > 源码/资料 > Windows编程 > 界面编程 > 查看源码
WORDPAD.CPP
资源名称：word.rar　[点击查看]
上传用户：aakk678
上传日期：2022-07-09
资源大小：406k
文件大小：27k
源码类别：

界面编程

开发平台：

Visual C++

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