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

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

对话框与窗口

开发平台：

Visual C++

ExcelTabView.cpp：源码内容
  1. // ExcelTabView.cpp : implementation of the CExcelTabView class
  2. //
  4. #include "stdafx.h"
  5. #include "ExcelTab.h"
  7. #include "ExcelTabDoc.h"
  8. #include "ExcelTabView.h"
  9. #include "ExcelTabProperties.h"
  11. #ifdef _DEBUG
  12. #define new DEBUG_NEW
  13. #undef THIS_FILE
  14. static char THIS_FILE[] = __FILE__;
  15. #endif
  17. /////////////////////////////////////////////////////////////////////////////
  18. // CExcelTabView
  20. IMPLEMENT_DYNCREATE(CExcelTabView, CView)
  22. BEGIN_MESSAGE_MAP(CExcelTabView, CView)
  23. //{{AFX_MSG_MAP(CExcelTabView)
  24. ON_WM_CREATE()
  25. ON_WM_SIZE()
  26. ON_WM_ERASEBKGND()
  27. ON_WM_PAINT()
  28. ON_COMMAND(ID_EXCELTAB_PROPERTIES, OnExceltabProperties)
  29. //}}AFX_MSG_MAP
  30. // Standard printing commands
  31. ON_COMMAND(ID_FILE_PRINT, CView::OnFilePrint)
  32. ON_COMMAND(ID_FILE_PRINT_DIRECT, CView::OnFilePrint)
  33. ON_COMMAND(ID_FILE_PRINT_PREVIEW, CView::OnFilePrintPreview)
  34. END_MESSAGE_MAP()
  36. /////////////////////////////////////////////////////////////////////////////
  37. // CExcelTabView construction/destruction
  39. CExcelTabView::CExcelTabView()
  40. : m_dwTabStyle(0)
  41. , m_bBottom(TRUE)
  42. , m_bHasArrows(TRUE)
  43. , m_bHasHomeEnd(FALSE)
  44. , m_bHScroll(TRUE)
  45. , m_pSheet7(NULL)
  46. , m_pSheet8(NULL)
  47. , m_pExcelTabCtrl(NULL)
  48. {
  49. UpdateTabsStyle();
  50. }
  52. CExcelTabView::~CExcelTabView()
  53. {
  54. if (::IsWindow(m_pSheet7->GetSafeHwnd()))
  55. m_pSheet7->DestroyWindow();
  57. if (::IsWindow(m_pSheet8->GetSafeHwnd()))
  58. m_pSheet8->DestroyWindow();
  60. SAFE_DELETE(m_pExcelTabCtrl);
  61. }
  63. BOOL CExcelTabView::PreCreateWindow(CREATESTRUCT& cs)
  64. {
  65. if (!CView::PreCreateWindow(cs))
  66. return FALSE;
  68. // TODO: Modify the Window class or styles here by modifying
  69. //  the CREATESTRUCT cs
  70. cs.style |= WS_CLIPCHILDREN;
  72. return TRUE;
  73. }
  75. /////////////////////////////////////////////////////////////////////////////
  76. // CExcelTabView drawing
  78. void CExcelTabView::OnDraw(CDC* /*pDC*/)
  79. {
  80. }
  82. /////////////////////////////////////////////////////////////////////////////
  83. // CExcelTabView printing
  85. BOOL CExcelTabView::OnPreparePrinting(CPrintInfo* pInfo)
  86. {
  87. // default preparation
  88. return DoPreparePrinting(pInfo);
  89. }
  91. void CExcelTabView::OnBeginPrinting(CDC* /*pDC*/, CPrintInfo* /*pInfo*/)
  92. {
  93. // TODO: add extra initialization before printing
  94. }
  96. void CExcelTabView::OnEndPrinting(CDC* /*pDC*/, CPrintInfo* /*pInfo*/)
  97. {
  98. // TODO: add cleanup after printing
  99. }
  101. /////////////////////////////////////////////////////////////////////////////
  102. // CExcelTabView diagnostics
  104. #ifdef _DEBUG
  105. void CExcelTabView::AssertValid() const
  106. {
  107. CView::AssertValid();
  108. }
  110. void CExcelTabView::Dump(CDumpContext& dc) const
  111. {
  112. CView::Dump(dc);
  113. }
  115. CExcelTabDoc* CExcelTabView::GetDocument() // non-debug version is inline
  116. {
  117. ASSERT(m_pDocument->IsKindOf(RUNTIME_CLASS(CExcelTabDoc)));
  118. return (CExcelTabDoc*)m_pDocument;
  119. }
  120. #endif //_DEBUG
  122. /////////////////////////////////////////////////////////////////////////////
  123. // CExcelTabView message handlers
  125. void CExcelTabView::UpdateTabsStyle()
  126. {
  127. DWORD dwNewStyle = 0;
  129. if (m_bHasHomeEnd)
  130. {
  131. dwNewStyle |= FTS_XT_HASHOMEEND;
  132. m_bHasArrows = TRUE;
  133. }
  135. if (m_bBottom)
  136. dwNewStyle |= FTS_XT_BOTTOM;
  138. if (m_bHasArrows)
  139. dwNewStyle |= FTS_XT_HASARROWS;
  141. if (m_bHScroll)
  142. dwNewStyle |= FTS_XT_HSCROLL;
  144. dwNewStyle |= FTS_XT_TOOLTIPS;
  146. if (dwNewStyle != m_dwTabStyle)
  147. {
  148. m_dwTabStyle = dwNewStyle;
  149. }
  150. }
  152. int CExcelTabView::OnCreate(LPCREATESTRUCT lpCreateStruct) 
  153. {
  154. if (CView::OnCreate(lpCreateStruct) == -1)
  155. return -1;
  157. // Create  the flat tab control.
  158. if (!CreateExcelTab())
  159. return -1;
  161. return 0;
  162. }
  164. BOOL CExcelTabView::CreateExcelTab()
  165. {
  166. int iSel = 0;
  167. CXTPEmptyRect rTab;
  169. m_pExcelTabCtrl = new CXTExcelTabCtrl();
  171. // Create  the flat tab control.
  172. if (!m_pExcelTabCtrl->Create(WS_CHILD|WS_VISIBLE|m_dwTabStyle,
  173. rTab, this, IDC_EXCEL_TABCTRL))
  174. {
  175. TRACE0( "Failed to create flattab controln" );
  176. return FALSE;
  177. }
  179. if (!CreateSheet1()) return FALSE;
  180. if (!CreateSheet2()) return FALSE;
  181. if (!CreateSheet3()) return FALSE;
  182. if (!CreateSheet4()) return FALSE;
  183. if (!CreateSheet5()) return FALSE;
  184. if (!CreateSheet6()) return FALSE;
  185. if (!CreateSheet7()) return FALSE;
  186. if (!CreateSheet8()) return FALSE;
  188. // Insert tabs into the flat tab control.
  189. m_pExcelTabCtrl->InsertItem(0, _T("Build"),           &m_sheet1);
  190. m_pExcelTabCtrl->InsertItem(1, _T("Debug"),           &m_sheet2);
  191. m_pExcelTabCtrl->InsertItem(2, _T("Find in Files 1"), &m_sheet3);
  192. m_pExcelTabCtrl->InsertItem(3, _T("Find in Files 2"), &m_sheet4);
  193. m_pExcelTabCtrl->InsertItem(4, _T("Results"),         &m_sheet5);
  194. m_pExcelTabCtrl->InsertItem(5, _T("SQL Debugging"),   &m_sheet6);
  195. m_pExcelTabCtrl->InsertItem(6, _T("Form View"),       m_pSheet7);
  196. m_pExcelTabCtrl->InsertItem(7, _T("Scroll View"),     m_pSheet8);
  199. m_pExcelTabCtrl->SetCurSel(iSel);
  201. return TRUE;
  202. }
  204. BOOL CExcelTabView::CreateSheet1()
  205. {
  206. // Create the sheet1 list box.
  207. if (!m_sheet1.Create(WS_CHILD |
  208. LVS_REPORT | LVS_NOCOLUMNHEADER, CXTPEmptyRect(), m_pExcelTabCtrl, IDC_SHEET1 ))
  209. {
  210. TRACE0( "Failed to create sheet1.n" );
  211. return FALSE;
  212. }
  213. ListView_SetExtendedListViewStyleEx(m_sheet1.m_hWnd,
  214. LVS_EX_FULLROWSELECT, LVS_EX_FULLROWSELECT);
  215. m_sheet1.SetBackColor(GetXtremeColor(COLOR_WINDOW));
  216. m_sheet1.InsertColumn(0, _T("Column"), LVCFMT_LEFT, 512);
  217. m_sheet1.InsertItem(0, _T("--------------------Configuration: ExcelTabView - Win32 Debug--------------------"));
  218. m_sheet1.InsertItem(1, _T("Compiling resources..."));
  219. m_sheet1.InsertItem(2, _T("Compiling..."));
  220. m_sheet1.InsertItem(3, _T("StdAfx.cpp"));
  221. m_sheet1.InsertItem(5, _T("Compiling..."));
  222.     m_sheet1.InsertItem(6, _T("ExcelEditCtrl.cpp"));
  223.     m_sheet1.InsertItem(7, _T("ExcelFormView.cpp"));
  224.     m_sheet1.InsertItem(8, _T("ExcelListCtrl.cpp"));
  225.     m_sheet1.InsertItem(9, _T("ExcelScrollView.cpp"));
  226.     m_sheet1.InsertItem(10, _T("ExcelTab.cpp"));
  227.     m_sheet1.InsertItem(11, _T("ExcelTabDoc.cpp"));
  228.     m_sheet1.InsertItem(12, _T("ExcelTabProperties.cpp"));
  229.     m_sheet1.InsertItem(13, _T("ExcelTabView.cpp"));
  230.     m_sheet1.InsertItem(14, _T("ExcelTreeCtrl.cpp"));
  231.     m_sheet1.InsertItem(15, _T("MainFrm.cpp"));
  232. m_sheet1.InsertItem(16, _T("Generating Code..."));
  233. m_sheet1.InsertItem(17, _T("Linking..."));
  234. m_sheet1.InsertItem(18, _T(""));
  235. m_sheet1.InsertItem(19, _T("ExcelTabView.exe - 0 error(s), 0 warning(s)"));
  237. CXTLogFont lf;
  238. XTAuxData().font.GetLogFont(&lf);
  239. STRCPY_S(lf.lfFaceName, LF_FACESIZE, _T("Courier New"));
  240. m_font.CreateFontIndirect(&lf);
  241. m_sheet1.SetFont(&m_font);
  243. return TRUE;
  244. }
  246. BOOL CExcelTabView::CreateSheet2()
  247. {
  248. // Create the sheet2 list box.
  249. if (!m_sheet2.Create( WS_CHILD | WS_TABSTOP | WS_CLIPCHILDREN |
  250. WS_HSCROLL | WS_VSCROLL | ES_MULTILINE, CXTPEmptyRect(), m_pExcelTabCtrl, IDC_SHEET2 ))
  251. {
  252. TRACE0( "Failed to create sheet2.n" );
  253. return FALSE;
  254. }
  255. m_sheet2.SetFont(m_sheet1.GetFont());
  256. m_sheet2.SetBackColor(GetXtremeColor(COLOR_WINDOW));
  257. m_sheet2.SetWindowText(
  258. _T("Loaded 'C:\WINNT\System32\ntdll.dll', no matching symbolic information found.rn")
  259. _T("Loaded symbols for 'C:\WINNT\system32\MFC42D.DLL'rn")
  260. _T("Loaded symbols for 'C:\WINNT\system32\MSVCRTD.DLL'rn")
  261. _T("Loaded 'C:\WINNT\system32\KERNEL32.DLL', no matching symbolic information found.rn")
  262. _T("Loaded 'C:\WINNT\system32\GDI32.DLL', no matching symbolic information found.rn")
  263. _T("Loaded 'C:\WINNT\system32\USER32.DLL', no matching symbolic information found.rn")
  264. _T("Loaded 'C:\WINNT\system32\ADVAPI32.DLL', no matching symbolic information found.rn")
  265. _T("Loaded 'C:\WINNT\system32\rpcrt4.dll', no matching symbolic information found.rn")
  266. _T("Loaded 'C:\WINNT\system32\SHELL32.DLL', no matching symbolic information found.rn")
  267. _T("Loaded 'C:\WINNT\system32\shlwapi.dll', no matching symbolic information found.rn")
  268. _T("Loaded 'C:\WINNT\system32\comctl32.dll', no matching symbolic information found.rn")
  269. _T("Loaded symbols for 'C:\WINNT\system32\MFCO42D.DLL'rn")
  270. _T("Loaded 'C:\WINNT\system32\OLE32.DLL', no matching symbolic information found.rn")
  271. _T("Loaded 'C:\WINNT\system32\OLEAUT32.DLL', no matching symbolic information found.rn")
  272. _T("Loaded 'C:\WINNT\system32\lpk.dll', no matching symbolic information found.rn")
  273. _T("Loaded 'C:\WINNT\system32\usp10.dll', no matching symbolic information found.rn")
  274. _T("XTTOOLKIT_DLL.DLL Initializing!rn")
  275. _T("Loaded 'C:\WINNT\system32\indicdll.dll', no matching symbolic information found.rn")
  276. _T("Loaded 'C:\WINNT\system32\imm32.dll', no matching symbolic information found.rn")
  277. _T("The program 'D:\Controls\Bin\ExcelTabView.exe' has exited with code 0 (0x0).rn"));
  278. return TRUE;
  279. }
  281. BOOL CExcelTabView::CreateSheet3()
  282. {
  283. // Create the sheet3 list box.
  284. if (!m_sheet3.Create(
  285. WS_CHILD | TVS_HASBUTTONS | TVS_HASLINES | TVS_LINESATROOT | WS_VSCROLL,
  286. CXTPEmptyRect(), m_pExcelTabCtrl, IDC_SHEET3 ))
  287. {
  288. TRACE0( "Failed to create sheet3.n" );
  289. return FALSE;
  290. }
  291. m_sheet3.SetBackColor(GetXtremeColor(COLOR_WINDOW));
  292. HTREEITEM file;
  293. file = m_sheet3.InsertItem(_T("D:\Controls\Samples\ExcelTabView\EditCtrlForFlatTab.cpp"));
  294. m_sheet3.InsertItem(_T("Line 92:            pSB->Create(WS_CHILD, CRect(0, 0, 0, 0), (CWnd *)this, 0)"), 0, 0, file);
  295. file = m_sheet3.InsertItem(_T("D:\Controls\Samples\ExcelTabView\ExcelTabView.rc"));
  296. m_sheet3.InsertItem(_T("Line 190:STYLE WS_CHILD"), 0, 0, file);
  297. file = m_sheet3.InsertItem(_T("D:\Controls\Samples\ExcelTabView\ExcelTabView.cpp"));
  298. m_sheet3.InsertItem(_T("Line 92:            pSB->Create(WS_CHILD, CRect(0, 0, 0, 0), (CWnd *)this, 0)"), 0, 0, file);
  299. m_sheet3.InsertItem(_T("Line 265:   if (!m_pExcelTabView->Create(WS_CHILD|WS_VISIBLE|m_dwTabStyle,"), 0, 0, file);
  300. m_sheet3.InsertItem(_T("Line 293:   if (!m_sheet1.Create(WS_CHILD |  "), 0, 0, file);
  301. m_sheet3.InsertItem(_T("Line 303:   if (!m_sheet2.Create( WS_CHILD | WS_TABSTOP | WS_CLIPCHILDREN |"), 0, 0, file);
  302. m_sheet3.InsertItem(_T("Line 312:   DWORD dwStyle = WS_CHILD | LBS_NOINTEGRALHEIGHT | WS_TABSTOP | WS_VSCROLL;"), 0, 0, file);
  303. m_sheet3.InsertItem(_T("Line 316:       WS_CHILD | TVS_HASBUTTONS | TVS_HASLINES | TVS_LINESATROOT | WS_VSCROLL, "), 0, 0, file);
  304. m_sheet3.InsertItem(_T("Line 348:        !((CWnd *)m_pSheet7)->Create(NULL, NULL, WS_CHILD, "), 0, 0, file);
  305. file = m_sheet3.InsertItem(_T("D:\Controls\Samples\ExcelTabView\SampleFormView.cpp"));
  306. m_sheet3.InsertItem(_T("Line 79:    m_ScrollBarH.Create(WS_CHILD, CRect(0, 0, 0, 0), this, 0);"), 0, 0, file);
  307. return TRUE;
  308. }
  310. BOOL CExcelTabView::CreateSheet4()
  311. {
  312. // Define the default style for the output list boxes.
  313. DWORD dwStyle = WS_CHILD | LBS_NOINTEGRALHEIGHT | WS_TABSTOP | WS_VSCROLL;
  315. // Create the sheet4 list box.
  316. if (!m_sheet4.Create( dwStyle, CXTPEmptyRect(), m_pExcelTabCtrl, IDC_SHEET4 ))
  317. {
  318. TRACE0( "Failed to create sheet4.n" );
  319. return FALSE;
  320. }
  321. m_sheet4.SetBackColor(GetXtremeColor(COLOR_WINDOW));
  322. m_sheet4.SetFont(&XTAuxData().font);
  323. m_sheet4.AddString(_T("Find in Files 2 Tab Output..."));
  324. return TRUE;
  325. }
  327. BOOL CExcelTabView::CreateSheet5()
  328. {
  329. // Define the default style for the output list boxes.
  330. DWORD dwStyle = WS_CHILD | LBS_NOINTEGRALHEIGHT | WS_TABSTOP | WS_VSCROLL;
  332. // Create the sheet5 list box.
  333. if (!m_sheet5.Create( dwStyle, CXTPEmptyRect(), m_pExcelTabCtrl, IDC_SHEET5 ))
  334. {
  335. TRACE0( "Failed to create sheet5.n" );
  336. return FALSE;
  337. }
  338. m_sheet5.SetBackColor(GetXtremeColor(COLOR_WINDOW));
  339. m_sheet5.SetFont(&XTAuxData().font);
  340. m_sheet5.AddString(_T("Results Tab Output..."));
  341. return TRUE;
  342. }
  344. BOOL CExcelTabView::CreateSheet6()
  345. {
  346. // Define the default style for the output list boxes.
  347. DWORD dwStyle = WS_CHILD | LBS_NOINTEGRALHEIGHT | WS_TABSTOP | WS_VSCROLL;
  349. // Create the sheet6 list box.
  350. if (!m_sheet6.Create( dwStyle, CXTPEmptyRect(), m_pExcelTabCtrl, IDC_SHEET6 ))
  351. {
  352. TRACE0( "Failed to create sheet6.n" );
  353. return FALSE;
  354. }
  355. m_sheet6.SetBackColor(GetXtremeColor(COLOR_WINDOW));
  356. m_sheet6.SetFont(&XTAuxData().font);
  357. m_sheet6.AddString(_T("SQL Debugging Tab Output..."));
  358. return TRUE;
  359. }
  361. BOOL CExcelTabView::CreateSheet7()
  362. {
  363. // views must be created dynamically because they are destroyed during
  364. // window destruction
  365. CCreateContext cc;
  366. ::ZeroMemory(&cc, sizeof(cc));
  368. m_pSheet7 = (CExcelFormView*)RUNTIME_CLASS(CExcelFormView)->CreateObject();
  369. if (!m_pSheet7  || !((CWnd *)m_pSheet7)->Create(
  370. NULL, NULL, WS_CHILD, CXTPEmptyRect(), m_pExcelTabCtrl, IDC_SHEET7, &cc))
  371. {
  372. TRACE0( "Failed to create sheet7.n" );
  373. return FALSE;
  374. }
  375. return TRUE;
  376. }
  378. BOOL CExcelTabView::CreateSheet8()
  379. {
  380. // Create the Test Scroll View
  381. CCreateContext cc;
  382. ::ZeroMemory(&cc, sizeof(cc));
  384. m_pSheet8 = (CExcelScrollView*)RUNTIME_CLASS(CExcelScrollView)->CreateObject();
  385. if (!m_pSheet8  || !((CWnd *)m_pSheet8)->Create( NULL, NULL, WS_CHILD |
  386. WS_VSCROLL|WS_HSCROLL, CXTPEmptyRect(), m_pExcelTabCtrl, IDC_SHEET8, &cc))
  387. {
  388. TRACE0( "Failed to create m_pSheet8.n" );
  389. return FALSE;
  390. }
  391. return TRUE;
  392. }
  394. void CExcelTabView::OnSize(UINT nType, int cx, int cy) 
  395. {
  396. CView::OnSize(nType, cx, cy);
  398. if (::IsWindow(m_pExcelTabCtrl->GetSafeHwnd()))
  399. {
  400. m_pExcelTabCtrl->SetWindowPos(NULL, 0,0, cx, cy, SWP_FRAMECHANGED);
  401. }
  402. }
  404. BOOL CExcelTabView::OnEraseBkgnd(CDC* pDC) 
  405. {
  406. UNREFERENCED_PARAMETER(pDC);
  407. return TRUE;
  408. }
  410. void CExcelTabView::OnPaint() 
  411. {
  412. CPaintDC dc(this); // device context for painting
  414. CXTPClientRect rClient(this);
  415. CXTMemDC memDC(&dc, rClient, GetXtremeColor(COLOR_WINDOW));
  416. }
  418. void CExcelTabView::OnExceltabProperties() 
  419. {
  420. CExcelTabProperties dlg(m_bBottom, m_bHasArrows, m_bHasHomeEnd, m_bHScroll, this);
  421. if (dlg.DoModal() == IDOK)
  422. {
  423. }
  424. }
  426. void CExcelTabView::UpdateExcelTab()
  427. {
  428. UpdateTabsStyle();
  429. m_pExcelTabCtrl->SetTabStyle(m_dwTabStyle);
  430. }