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

源码开发语言/平台
当前位置：首页 > 源码/资料 > Windows编程 > 查看源码
MainFrm.cpp
资源名称：DesktopCalendar.zip　[点击查看]
上传用户：jianghp13
上传日期：2020-02-03
资源大小：148k
文件大小：25k
源码类别：

Windows编程

开发平台：

Visual C++

MainFrm.cpp：源码内容
  1. // MainFrm.cpp : implementation of the CMainFrame class
  2. //
  4. #include "stdafx.h"
  5. #include "DesktopCalendar.h"
  6. #include "Calendar.h"
  7. #include "OptionsDlg.h"
  8. #include "MainFrm.h"
  10. #ifdef _DEBUG
  11. #define new DEBUG_NEW
  12. #undef THIS_FILE
  13. static char THIS_FILE[] = __FILE__;
  14. #endif
  16. # define WS_EX_LAYERED 0x80000 
  17. # define LWA_ALPHA 2 
  18. # define LWA_COLORKEY 1 
  20. HBITMAP Create24BPPDIBSection(HDC hDC, int iWidth, int iHeight)
  21. {
  22.     BITMAPINFO bmi;
  23.     HBITMAP hbm;
  24.     LPBYTE pBits;
  26.     // Initialize header to 0s.
  27.     ZeroMemory(&bmi, sizeof(bmi));
  29.     // Fill out the fields you care about.
  30.     bmi.bmiHeader.biSize = sizeof(BITMAPINFOHEADER);
  31.     bmi.bmiHeader.biWidth = iWidth;
  32.     bmi.bmiHeader.biHeight = iHeight;
  33.     bmi.bmiHeader.biPlanes = 1;
  34.     bmi.bmiHeader.biBitCount = 24;
  35.     bmi.bmiHeader.biCompression = BI_RGB;
  37.     // Create the surface.
  38.     hbm = CreateDIBSection(hDC, &bmi, DIB_RGB_COLORS,(void **)&pBits, NULL, 0);
  39.       
  40.     return(hbm);
  41. }
  43. BOOL BitmapsCompatible(LPBITMAP lpbm1, LPBITMAP lpbm2)
  44. {
  45.     if (lpbm1->bmBitsPixel != lpbm2->bmBitsPixel) 
  46. return FALSE;
  47.     if (lpbm1->bmPlanes    != lpbm2->bmPlanes)    
  48. return FALSE;
  49.     if (lpbm1->bmWidth     != lpbm2->bmWidth)     
  50. return FALSE;
  51.     if (lpbm1->bmHeight    != lpbm2->bmHeight)    
  52. return FALSE;
  53.     return TRUE;
  54. }
  56. BOOL BlendImages(HBITMAP hbmSrc1, HBITMAP hbmSrc2, HBITMAP hbmDst, DWORD dwWeight1)
  57. {
  58.     BITMAP bmSrc1, bmSrc2, bmDst;
  59.     RGBTRIPLE *lprgbSrc1, *lprgbSrc2, *lprgbDst;
  60.     DWORD dwWidthBytes, dwWeight2;
  61.     int x, y;
  62.     
  63.     // Only values between 0 and 255 are valid.
  64.     if (dwWeight1 > 255) return FALSE;
  65.     
  66.     // Get weighting value for second source image.
  67.     dwWeight2 = 255-dwWeight1;
  68.     
  69.     // Get information about the surfaces you were passed.
  70.     if (!GetObject(hbmSrc1, sizeof(BITMAP), &bmSrc1)) return FALSE;
  71.     if (!GetObject(hbmSrc2, sizeof(BITMAP), &bmSrc2)) return FALSE;
  72.     if (!GetObject(hbmDst,  sizeof(BITMAP), &bmDst))  return FALSE;
  74.     // Make sure you have data that meets your requirements.
  75.     if (!BitmapsCompatible(&bmSrc1, &bmSrc2))
  76. return FALSE;
  77.     if (!BitmapsCompatible(&bmSrc1, &bmDst))
  78. return FALSE;
  79.     if (bmSrc1.bmBitsPixel != 24)
  80. return FALSE;
  81.     if (bmSrc1.bmPlanes != 1)
  82. return FALSE;
  83.     if (!bmSrc1.bmBits || !bmSrc2.bmBits || !bmDst.bmBits)
  84. return FALSE;
  86.     dwWidthBytes = bmDst.bmWidthBytes;
  87.     
  88.     // Initialize the surface pointers.
  89.     lprgbSrc1 = (RGBTRIPLE *)bmSrc1.bmBits; 
  90.     lprgbSrc2 = (RGBTRIPLE *)bmSrc2.bmBits;  
  91.     lprgbDst  = (RGBTRIPLE *)bmDst.bmBits;
  93.     for (y=0; y<bmDst.bmHeight; y++) {
  94.         for (x=0; x<bmDst.bmWidth; x++) {
  95.             lprgbDst[x].rgbtRed   = (BYTE)((((DWORD)lprgbSrc1[x].rgbtRed * dwWeight1) + 
  96.                                             ((DWORD)lprgbSrc2[x].rgbtRed * dwWeight2)) >> 8);
  97.             lprgbDst[x].rgbtGreen = (BYTE)((((DWORD)lprgbSrc1[x].rgbtGreen * dwWeight1) + 
  98.                                             ((DWORD)lprgbSrc2[x].rgbtGreen * dwWeight2)) >> 8);
  99.             lprgbDst[x].rgbtBlue  = (BYTE)((((DWORD)lprgbSrc1[x].rgbtBlue * dwWeight1) + 
  100.                                             ((DWORD)lprgbSrc2[x].rgbtBlue * dwWeight2)) >> 8);
  101.         }
  103.         // Move to next scan line.
  104.         lprgbSrc1 = (RGBTRIPLE *)((LPBYTE)lprgbSrc1 + dwWidthBytes);
  105.         lprgbSrc2 = (RGBTRIPLE *)((LPBYTE)lprgbSrc2 + dwWidthBytes);
  106.         lprgbDst  = (RGBTRIPLE *)((LPBYTE)lprgbDst  + dwWidthBytes);
  107.     }
  109.     return TRUE;
  110. }
  112. BOOL DoAlphaBlend(
  113.   HDC hdcDest,                 // Handle to destination DC.
  114.   int nXOriginDest,            // X-coord of upper-left corner.
  115.   int nYOriginDest,            // Y-coord of upper-left corner.
  116.   int nWidthDest,              // Destination width.
  117.   int nHeightDest,             // Destination height.
  118.   HDC hdcSrc,                  // Handle to source DC.
  119.   int nXOriginSrc,             // X-coord of upper-left corner.
  120.   int nYOriginSrc,             // Y-coord of upper-left corner.
  121.   int nWidthSrc,               // Source width.
  122.   int nHeightSrc,              // Source height.
  123.   DWORD dwSourceWeight)        // Source weighting (between 0 and 255).
  124. {
  125.     HDC      hdcSrc1 = NULL;
  126.     HDC      hdcSrc2 = NULL;
  127.     HDC      hdcDst  = NULL;
  128.     HBITMAP  hbmSrc1 = NULL;
  129.     HBITMAP  hbmSrc2 = NULL;
  130.     HBITMAP  hbmDst  = NULL;
  131.     BOOL     bReturn;
  133.     // Create surfaces for sources and destination images.
  134.     hbmSrc1 = Create24BPPDIBSection(hdcDest, nWidthDest,nHeightDest);
  135.     if (!hbmSrc1) goto HANDLEERROR;
  137.     hbmSrc2 = Create24BPPDIBSection(hdcDest, nWidthDest,nHeightDest);
  138.     if (!hbmSrc2) goto HANDLEERROR;
  140.     hbmDst  = Create24BPPDIBSection(hdcDest, nWidthDest,nHeightDest);
  141.     if (!hbmDst) goto HANDLEERROR;
  143.     
  144.     // Create HDCs to hold our surfaces.
  145.     hdcSrc1 = CreateCompatibleDC(hdcDest);
  146.     if (!hdcSrc1) goto HANDLEERROR;
  147.     
  148.     hdcSrc2 = CreateCompatibleDC(hdcDest);
  149.     if (!hdcSrc2) goto HANDLEERROR;
  150.     
  151.     hdcDst  = CreateCompatibleDC(hdcDest);
  152.     if (!hdcDst) goto HANDLEERROR;
  154.     
  155.     // Prepare the surfaces for drawing.
  156.     SelectObject(hdcSrc1, hbmSrc1);
  157.     SelectObject(hdcSrc2, hbmSrc2);
  158.     SelectObject(hdcDst,  hbmDst);
  159.     SetStretchBltMode(hdcSrc1, COLORONCOLOR);
  160.     SetStretchBltMode(hdcSrc2, COLORONCOLOR);
  162.     
  163.     // Capture a copy of the source area.
  164.     if (!StretchBlt(hdcSrc1, 0,0,nWidthDest,nHeightDest,
  165.                     hdcSrc,  nXOriginSrc, nYOriginSrc, nWidthSrc, nHeightSrc, 
  166.                     SRCCOPY))
  167.          goto HANDLEERROR;
  168.     
  169.     // Capture a copy of the destination area.
  170.     if (!StretchBlt(hdcSrc2, 0,0,nWidthDest,nHeightDest,
  171.                     hdcDest, nXOriginDest, nYOriginDest, nWidthDest, nHeightDest, 
  172.                     SRCCOPY))
  173.          goto HANDLEERROR;
  175.                   
  176.     // Blend the two source areas to create the destination image.
  177.     bReturn = BlendImages(hbmSrc1, hbmSrc2, hbmDst, dwSourceWeight);
  179.     
  180.     // Clean up objects you do not need any longer.
  181.     // You cannot delete an object that's selected into an
  182.     // HDC so delete the HDC first. 
  183.     DeleteDC(hdcSrc1);
  184.     DeleteDC(hdcSrc2);
  185.     DeleteObject(hbmSrc1);
  186.     DeleteObject(hbmSrc2);
  188.     
  189.     // Display the blended (destination) image to the target HDC.
  190.     if (bReturn) {
  191.         BitBlt(hdcDest, nXOriginDest, nYOriginDest, nWidthDest, nHeightDest, 
  192.                hdcDst, 0,0, SRCCOPY);
  193.     }
  195.     
  196.     // Clean up the rest of the objects you created.
  197.     DeleteDC(hdcDst);
  198.     DeleteObject(hbmDst);
  200.     return bReturn;
  202. HANDLEERROR:
  204.     if (hdcSrc1) DeleteDC(hdcSrc1);
  205.     if (hdcSrc2) DeleteDC(hdcSrc2);
  206.     if (hdcDst)  DeleteDC(hdcDst);
  207.     if (hbmSrc1) DeleteObject(hbmSrc1);
  208.     if (hbmSrc2) DeleteObject(hbmSrc2);
  209.     if (hbmDst)  DeleteObject(hbmDst);
  211.     return FALSE;
  212. }
  214. const unsigned int CMainFrame::m_nTaskbarCreatedMsg = ::RegisterWindowMessage(_T("TaskbarCreated"));
  215. /////////////////////////////////////////////////////////////////////////////
  216. // CMainFrame
  217. IMPLEMENT_DYNAMIC(CMainFrame, CFrameWnd)
  219. BEGIN_MESSAGE_MAP(CMainFrame, CFrameWnd)
  220. ON_REGISTERED_MESSAGE(CMainFrame::m_nTaskbarCreatedMsg, OnTaskbarCreated)
  221. //{{AFX_MSG_MAP(CMainFrame)
  222. ON_WM_CREATE()
  223. ON_WM_TIMER()
  224. ON_WM_TIMECHANGE()
  225. ON_COMMAND(IDD_CAL_ABOUTBOX, OnCalAboutbox)
  226. ON_COMMAND(IDR_CAL_OPTIONS, OnCalOptions)
  227. //}}AFX_MSG_MAP
  228. END_MESSAGE_MAP()
  232. // CAboutDlg dialog used for App About
  234. class CAboutDlg : public CDialog
  235. {
  236. public:
  237. CAboutDlg();
  239. // Dialog Data
  240. //{{AFX_DATA(CAboutDlg)
  241. enum { IDD = IDD_ABOUTBOX };
  242. //}}AFX_DATA
  244. // ClassWizard generated virtual function overrides
  245. //{{AFX_VIRTUAL(CAboutDlg)
  246. protected:
  247. virtual void DoDataExchange(CDataExchange* pDX);    // DDX/DDV support
  248. //}}AFX_VIRTUAL
  250. // Implementation
  251. protected:
  252. //{{AFX_MSG(CAboutDlg)
  253. virtual BOOL OnInitDialog();
  254. //}}AFX_MSG
  255. DECLARE_MESSAGE_MAP()
  256. };
  258. CAboutDlg::CAboutDlg() : CDialog(CAboutDlg::IDD)
  259. {
  260. //{{AFX_DATA_INIT(CAboutDlg)
  261. //}}AFX_DATA_INIT
  262. }
  264. void CAboutDlg::DoDataExchange(CDataExchange* pDX)
  265. {
  266. CDialog::DoDataExchange(pDX);
  267. //{{AFX_DATA_MAP(CAboutDlg)
  268. //}}AFX_DATA_MAP
  269. }
  271. BEGIN_MESSAGE_MAP(CAboutDlg, CDialog)
  272. //{{AFX_MSG_MAP(CAboutDlg)
  273. //}}AFX_MSG_MAP
  274. END_MESSAGE_MAP()
  276. BOOL CAboutDlg::OnInitDialog() 
  277. {
  278. CDialog::OnInitDialog();
  280. // TODO: Add extra initialization here
  281. /*SetWindowLong(this->m_hWnd,GWL_EXSTYLE,GetWindowLong(this->m_hWnd,GWL_EXSTYLE)|WS_EX_LAYERED);
  282. HWND hWnd=this->m_hWnd; 
  283. typedef DWORD (WINAPI *PSLWA)(HWND, DWORD, BYTE, DWORD);
  284. PSLWA pSetLayeredWindowAttributes;
  285. HMODULE hDLL = LoadLibrary ("user32");
  286. pSetLayeredWindowAttributes = (PSLWA) GetProcAddress(hDLL,"SetLayeredWindowAttributes");
  287. if (pSetLayeredWindowAttributes != NULL)
  288. {
  289. pSetLayeredWindowAttributes (hWnd,0,225,LWA_ALPHA);
  290. }*/
  292. return TRUE;  // return TRUE unless you set the focus to a control
  293.               // EXCEPTION: OCX Property Pages should return FALSE
  294. }
  296. /////////////////////////////////////////////////////////////////////////////
  297. // CDesktopCalendarApp message handlers
  298. /////////////////////////////////////////////////////////////////////////////
  299. // CMainFrame construction/destruction
  301. CMainFrame::CMainFrame()
  302. {
  303. // TODO: add member initialization code here
  304. hMainBitmap = NULL;
  305. m_nYPos = m_nXPos = 100;
  306. m_nTransparency = 125;
  307. }
  309. CMainFrame::~CMainFrame()
  310. {
  312. }
  314. BOOL CMainFrame::PreCreateWindow(CREATESTRUCT& cs)
  315. {
  316. if( !CFrameWnd::PreCreateWindow(cs) )
  317. return FALSE;
  318. WNDCLASS wndcls;
  319. HINSTANCE hInst = AfxGetInstanceHandle();
  321. if(!(::GetClassInfo(hInst,CAL_CLASS_NAME, &wndcls)))      
  322. {
  323. // get default MFC class settings 
  324. if(::GetClassInfo(hInst, cs.lpszClass, &wndcls))           
  325. {
  326. wndcls.lpszClassName = CAL_CLASS_NAME;                
  327. wndcls.style |= CS_OWNDC;         
  328. wndcls.hbrBackground = NULL;
  329. if (!AfxRegisterClass(&wndcls))             
  330. AfxThrowResourceException();
  331. }
  332. else
  333. AfxThrowResourceException();
  334. }
  335.     cs.lpszClass = CAL_CLASS_NAME; 
  337. return (TRUE);
  338. }
  340. /////////////////////////////////////////////////////////////////////////////
  341. // CMainFrame diagnostics
  343. int CMainFrame::OnCreate(LPCREATESTRUCT lpCreateStruct) 
  344. {
  345. if (CFrameWnd::OnCreate(lpCreateStruct) == -1)
  346. return -1;
  348. SetWindowText(WINDOW_NAME);
  349. // Read last saved settings from windows registry
  350. ReadRegistry();
  352. CTime t = CTime::GetCurrentTime();
  353. CString date = t.Format("%A, %B %d, %Y");
  354. strcpy(m_tnd.szTip,date.operator LPCTSTR());
  355. m_hCalIcon = AfxGetApp()->LoadIcon(IDI_ICON1+t.GetDay()-1);
  357. m_tnd.cbSize = sizeof(NOTIFYICONDATA);
  358.     m_tnd.hWnd   = this->m_hWnd;
  359.     m_tnd.uID    = IDR_POP_UP;
  360.     m_tnd.hIcon  = m_hCalIcon;
  361. m_tnd.uCallbackMessage = WM_ICON_NOTIFY;
  362. m_tnd.uFlags = NIF_MESSAGE | NIF_ICON | NIF_TIP;
  363. Shell_NotifyIcon(NIM_ADD, &m_tnd);
  365. // Display Calendar
  366. SetCalendar();
  367. m_CurrentTime = CTime::GetCurrentTime();
  368. WriteRegistry();
  370. SetTimer(CAL_TIMER,20000,0);
  371. return 0;
  372. }
  374. LRESULT CMainFrame::WindowProc(UINT message, WPARAM wParam, LPARAM lParam) 
  375. {
  376. // TODO: Add your specialized code here and/or call the base class
  377. if (message == m_tnd.uCallbackMessage)
  378.         return OnTrayNotification(wParam, lParam);
  380. return CFrameWnd::WindowProc(message, wParam, lParam);
  381. }
  383. LRESULT CMainFrame::OnTrayNotification(UINT wParam, LONG lParam) 
  384. {
  385.     //Return quickly if its not for this tray icon
  386.     if (wParam != m_tnd.uID)
  387.         return (0L);
  389.     CMenu Menu, *pSubMenu;
  390.     CWnd *pTargetWnd = AfxGetMainWnd();
  391.     if (!pTargetWnd)
  392.         return 0L;
  394.     // Clicking with right button brings up a context menu
  395.     if (LOWORD(lParam) == WM_RBUTTONUP)
  396.     {    
  397.         if (!Menu.LoadMenu(m_tnd.uID))
  398.             return (0L);
  399.         
  400. pSubMenu = Menu.GetSubMenu(0);
  401.         if (!pSubMenu)
  402.             return 0;
  404. // CustomizeMenu(pSubMenu);
  406.         // Display and track the popup menu
  407.         CPoint pos;
  408.         GetCursorPos(&pos);
  410.         pTargetWnd->SetForegroundWindow(); 
  411.         
  412. pSubMenu->TrackPopupMenu(TPM_LEFTALIGN, pos.x, pos.y, pTargetWnd, NULL);
  413.         
  414. // BUGFIX: See "PRB: Menus for Notification Icons Don't Work Correctly"
  415.         pTargetWnd->PostMessage(WM_NULL, 0, 0);
  417.         Menu.DestroyMenu();
  418.     } 
  420. return (1);
  421. }
  423. void CMainFrame::SetCalendar()
  424. {
  425. KillTimer(CAL_TIMER);
  427. HKEY hRegKey;
  428. LONG lRet = 0;
  429. LONG lWidth=0,lHeight=0;
  430. CString szNewFile;
  431. CHAR szSysDir[MAX_PATH];
  432. GetSystemDirectory(szSysDir,MAX_PATH);
  434. // Delete the last bitmap
  435. if(hMainBitmap != NULL)
  436. {
  437. DeleteObject(hMainBitmap);
  438. hMainBitmap = NULL;
  439. }
  441. // Read the registry key which says about desktop wall paper
  442. lRet = RegOpenKeyEx(HKEY_CURRENT_USER,
  443. "Software\Microsoft\Internet Explorer\Desktop\General",
  444. 0,KEY_ENUMERATE_SUB_KEYS|KEY_EXECUTE|KEY_READ|KEY_WRITE,
  445. &hRegKey);
  447. if(lRet == ERROR_SUCCESS)
  448. {
  449. unsigned long ulType;
  450. BYTE szFileName[MAX_PATH];
  451. unsigned long   ulLength=MAX_PATH;
  453. lRet = RegQueryValueEx(hRegKey,"Wallpaper",NULL,&ulType,szFileName,&ulLength);
  455. if(lRet == ERROR_SUCCESS)
  456. {
  457. CString szFile(szFileName);
  458. szFile.TrimLeft();
  459. szFile.TrimRight();
  461. if(!szFile.IsEmpty())
  462. {
  463. // Expand Sytem Paths
  464. int k = szFile.ReverseFind('%');
  465. if( k > 0)
  466. {
  467. CString Variable = szFile.Left(k);
  468. Variable = Variable.Right(Variable.GetLength()-1);
  469. int nRet = GetEnvironmentVariable(Variable.operator LPCTSTR(),(char *)szFileName,MAX_PATH);
  470. if(nRet > 0)
  471. {
  472. szFile  = szFile.Right(szFile.GetLength()-(k+1));
  473. Variable = szFileName;
  474. szFile   = Variable + _T("\") + szFile;
  475. }
  476. }
  478. k = szFile.ReverseFind('\');
  479. CString szName = szFile.Right(szFile.GetLength()-(k+1));
  481. if(szName == _T("Desktop Calendar.bmp"))
  482. {
  483. szFile = szSysDir;
  484. szFile +=_T("\Desk_Cal");
  485. hMainBitmap = LoadImage(szFile,lWidth,lHeight);
  486. if(hMainBitmap == NULL)
  487. return;
  488. }
  489. else
  490. {
  491. hMainBitmap = LoadImage(szFile,lWidth,lHeight);
  492. szNewFile = szSysDir;
  493. szNewFile += _T("\Desk_Cal");
  494. CopyFile(szFile,szNewFile,FALSE);
  495. }
  496. }
  497. else
  498. {
  499. if(NULL != hMainBitmap)
  500. {
  501. DeleteObject(hMainBitmap);
  502. hMainBitmap = NULL;
  503. }
  504. }
  506. HWND hWnd = this->m_hWnd;
  507. // Screen Resolution //
  508. int nScreenWidth  = GetSystemMetrics(SM_CXSCREEN);
  509. int nScreenHeight = GetSystemMetrics(SM_CYSCREEN);
  510. HDC hDC = ::GetDC(hWnd);
  512. HDC hBitmapDC = ::CreateCompatibleDC(hDC);
  513. HDC hMemDC    = ::CreateCompatibleDC(hDC);
  515. HBITMAP hBitmap = CreateCompatibleBitmap(hDC,nScreenWidth,nScreenHeight);
  516. ::SelectObject(hMemDC,hBitmap);
  518. if(hMainBitmap)
  519. {
  520. // Image Height and Width
  521. #define HIMETRIC_INCH 2540
  522. lWidth = MulDiv(lWidth, GetDeviceCaps(hDC, LOGPIXELSX),HIMETRIC_INCH);
  523. lHeight = MulDiv(lHeight, GetDeviceCaps(hDC,LOGPIXELSY), HIMETRIC_INCH);
  525. ::SelectObject(hBitmapDC,hMainBitmap);
  526. SetStretchBltMode(hMemDC,HALFTONE);
  527. ::StretchBlt(hMemDC,0,0,nScreenWidth,nScreenHeight,hBitmapDC,0,0,lWidth,lHeight,SRCCOPY);
  528. }
  529. else
  530. {
  531. COLORREF crDeskColor = GetSysColor(COLOR_DESKTOP);
  532. CBrush FillBrush;
  533. FillBrush.CreateSolidBrush(crDeskColor);
  534. CRect Rect(0,0,nScreenWidth,nScreenHeight);
  535. ::FillRect(hMemDC,&Rect,FillBrush.operator HBRUSH());
  536. }
  538. // Making Calendar
  539. C_Calendar * pCalendar;
  540. pCalendar = new C_Calendar();
  541. pCalendar->SetFont(m_szFontName);
  542. pCalendar->SetTextColor(m_crTextColor);
  543. pCalendar->SetBackColor(m_crBackColor);
  544. pCalendar->SetTextSize(m_nFontSize);
  545. HDC hCalDC = pCalendar->DrawCalendar(hDC);
  546. DoAlphaBlend(hMemDC,m_nXPos,m_nYPos,pCalendar->GetWidth(),pCalendar->GetHeight(),
  547. hCalDC,0,0,pCalendar->GetWidth(),pCalendar->GetHeight(),m_nTransparency);
  549. szNewFile = szSysDir;
  550. szNewFile += _T("\Desktop Calendar.bmp");
  552. SaveBitmap(hMemDC,hBitmap,szNewFile);
  554. lRet = RegSetValueEx(hRegKey,"Wallpaper",NULL,REG_SZ,(const BYTE*)szNewFile.operator LPCTSTR(),szNewFile.GetLength());
  555. SystemParametersInfo(SPI_SETDESKWALLPAPER, 0,(void*)szNewFile.operator LPCTSTR(),SPIF_UPDATEINIFILE | SPIF_SENDWININICHANGE);    
  557. delete(pCalendar);
  558. pCalendar = NULL;
  559. DeleteDC(hMemDC);
  560. DeleteDC(hBitmapDC);
  561. DeleteObject(hMainBitmap);
  562. DeleteObject(hBitmap);
  563. hMainBitmap = NULL;
  564. hBitmap = NULL;
  565. hMemDC= hBitmapDC =  NULL;
  566. ::ReleaseDC(hWnd,hDC);
  567. }
  568. RegCloseKey(hRegKey);
  569. }
  571. CTime tm = CTime::GetCurrentTime();
  572. m_CurrentTime = tm;
  573. SetIcon(tm.GetDay());
  574. CString date = tm.Format("%A, %B %d, %Y");
  575. SetToolTip(date);
  576. SetTimer(CAL_TIMER,20000,0);
  577. }
  579. void CMainFrame::OnTimer(UINT nIDEvent) 
  580. {
  581. // TODO: Add your message handler code here and/or call default
  582. int nResult = CheckDate();
  583. if(nResult == CHANGE_ALL)
  584. {
  585. SetCalendar();
  586. }
  587. else
  588. if(nResult == DAY_CHANGE)
  589. {
  590. CTime tm = CTime::GetCurrentTime();
  591. m_CurrentTime = tm;
  592. SetIcon(tm.GetDay());
  593. CString date = tm.Format("%A, %B %d, %Y");
  594. SetToolTip(date);
  595. }
  596. m_CurrentTime = CTime::GetCurrentTime();
  597. WriteRegistry();
  599. CFrameWnd::OnTimer(nIDEvent);
  600. }
  602. HBITMAP CMainFrame::LoadImage(CString szFile,long & lWidth,long& lHeight)
  603. {
  604. HANDLE hFile;
  605. HBITMAP hBmp;
  606. DWORD dwSize;
  607. DWORD dwRead;
  608. HGLOBAL hMemJpeg;
  609. LPSTREAM lpStream;
  610. OLE_HANDLE hJpegBmp;
  611. HRESULT hr;
  612. LPPICTURE lpPicture = NULL;
  613. void* pMemJpeg;
  615. /* Open the file and get the size. */
  616. if((hFile = CreateFile(szFile, GENERIC_READ, FILE_SHARE_READ,NULL,OPEN_EXISTING, 0, NULL)) 
  617. == INVALID_HANDLE_VALUE)
  618. return NULL;
  620. if((dwSize = GetFileSize(hFile, NULL)) == 0xFFFFFFFF)
  621. {
  622. CloseHandle(hFile);
  623. return (NULL);
  624. }
  626. /* Allocate space for file, read it in, and then close the file again. */
  627. if((hMemJpeg = GlobalAlloc(GMEM_MOVEABLE, dwSize)) == NULL)
  628. {
  629. CloseHandle(hFile);
  630. return (NULL);
  631. }
  633. if((pMemJpeg = GlobalLock(hMemJpeg)) == NULL)
  634. {
  635. CloseHandle(hFile);
  636. GlobalFree(hMemJpeg);
  637. return (NULL);
  638. }
  640. if(!ReadFile(hFile, pMemJpeg, dwSize, &dwRead, NULL))
  641. {
  642. CloseHandle(hFile);
  643. GlobalFree(hMemJpeg);
  644. return (NULL);
  645. }
  647. CloseHandle(hFile);
  648. GlobalUnlock(hMemJpeg);
  651. /* Create the stream and load the picture. */
  652. if((hr = CreateStreamOnHGlobal(hMemJpeg, TRUE, &lpStream)) != S_OK)
  653. {
  654. GlobalFree(hMemJpeg);
  655. return (NULL);
  656. }
  658. if(::OleLoadPicture(lpStream, dwSize, FALSE, IID_IPicture,(LPVOID*) &lpPicture) != S_OK)
  659. {
  660. GlobalFree(hMemJpeg);
  661. lpStream->Release();
  662. return (NULL);
  663. }
  665. /* Get the handle to the image, and then copy it. */
  666. if((lpPicture->get_Handle(&hJpegBmp)) != S_OK)
  667. {
  668. GlobalFree(hMemJpeg);
  669. lpStream->Release();
  670. lpPicture->Release();
  671. return (NULL);
  672. }
  673. lWidth = lHeight = 0;
  674. lpPicture->get_Width((OLE_XSIZE_HIMETRIC*)&lWidth);
  675. lpPicture->get_Height((OLE_XSIZE_HIMETRIC*)&lHeight);
  677. if((hBmp = (HBITMAP)CopyImage((HANDLE *) hJpegBmp, IMAGE_BITMAP, 0, 0, LR_COPYRETURNORG)) == NULL)
  678. {
  679. GlobalFree(hMemJpeg);
  680. lpStream->Release();
  681. lpPicture->Release();
  682. return (NULL);
  683. }
  685. /* Free the original image and memory. */
  686. GlobalFree(hMemJpeg);
  687. lpStream->Release();
  688. lpPicture->Release();
  690. return (hBmp);
  691. }
  693. BOOL CMainFrame::SaveBitmap(HDC hDC,HBITMAP hBitmap,CString szPath)
  694. {
  695. FILE * fp= NULL;
  696. fp = fopen(szPath.GetBuffer(1),"wb");
  697. if(fp == NULL)
  698. return false;
  700. BITMAP Bm;
  701. BITMAPINFO BitInfo;
  702. ZeroMemory(&BitInfo, sizeof(BITMAPINFO));
  703. BitInfo.bmiHeader.biSize = sizeof(BITMAPINFOHEADER);
  704. BitInfo.bmiHeader.biBitCount = 0;
  706. if(!::GetDIBits(hDC, hBitmap, 0, 0, NULL, &BitInfo, DIB_RGB_COLORS))
  707. return (false);
  709. Bm.bmHeight = BitInfo.bmiHeader.biHeight;
  710. Bm.bmWidth  = BitInfo.bmiHeader.biWidth;
  712. BITMAPFILEHEADER BmHdr;
  714. BmHdr.bfType = 0x4d42;   // 'BM' WINDOWS_BITMAP_SIGNATURE
  715. BmHdr.bfSize = (((3 * Bm.bmWidth + 3) & ~3) * Bm.bmHeight) + sizeof(BITMAPFILEHEADER) + sizeof(BITMAPINFOHEADER);
  716. BmHdr.bfReserved1 = BmHdr.bfReserved2 = 0;
  717. BmHdr.bfOffBits = (DWORD) sizeof(BITMAPFILEHEADER) + sizeof(BITMAPINFOHEADER);
  719. BitInfo.bmiHeader.biCompression = 0;
  720. // Writing Bitmap File Header ////
  721. fwrite(&BmHdr,sizeof(BITMAPFILEHEADER),1,fp);
  723. fwrite(&BitInfo.bmiHeader,sizeof(BITMAPINFOHEADER),1,fp);
  725. BYTE *pData = new BYTE[BitInfo.bmiHeader.biSizeImage + 5];
  726. if(!::GetDIBits(hDC, hBitmap, 0, Bm.bmHeight, pData, &BitInfo, DIB_RGB_COLORS))
  727. return (false);
  728. if(pData != NULL)
  729. fwrite(pData,1,BitInfo.bmiHeader.biSizeImage,fp);
  731. fclose(fp);
  732. delete (pData);
  734. return (true);
  735. }
  737. void CMainFrame::OnTimeChange() 
  738. {
  739. CFrameWnd::OnTimeChange();
  740. if(CheckDate() == CHANGE_ALL)
  741. {
  742. SetCalendar();
  743. }
  744. else
  745. if(CheckDate() == DAY_CHANGE)
  746. {
  747. CTime tm = CTime::GetCurrentTime();
  748. m_CurrentTime = tm;
  749. SetIcon(tm.GetDay());
  750. CString date = tm.Format("%A, %B %d, %Y");
  751. SetToolTip(date);
  752. }
  753. m_CurrentTime = CTime::GetCurrentTime();
  754. WriteRegistry();
  755. }
  757. void CMainFrame::ReadRegistry()
  758. {
  759. CString szSection(_T("Configuration"));
  760. CDesktopCalendarApp * pApp = (CDesktopCalendarApp*)AfxGetApp();
  761. m_szFontName = pApp->GetProfileString(szSection,_T("Font Name"),_T("Monotype Corsiva"));
  762. m_nFontSize = pApp->GetProfileInt(szSection,_T("Text Size"),24);
  763. m_crTextColor = pApp->GetProfileInt(szSection,_T("Text Color"),(INT)RGB(0,255,0));
  764. m_crBackColor = pApp->GetProfileInt(szSection,_T("Back Ground Color"),(INT)RGB(255,255,255));
  765. m_nTransparency = pApp->GetProfileInt(szSection,_T("Transparency"),88);
  766. m_nXPos = pApp->GetProfileInt(szSection,_T("StartX"),100);
  767. m_nYPos = pApp->GetProfileInt(szSection,_T("StartY"),100);
  769. }
  771. void CMainFrame::WriteRegistry()
  772. {
  773. CString szSection(_T("Configuration"));
  774. CDesktopCalendarApp * pApp = (CDesktopCalendarApp*)AfxGetApp();
  775. pApp->WriteProfileString(szSection,_T("Font Name"),m_szFontName);
  776. pApp->WriteProfileInt(szSection,_T("Text Size"),m_nFontSize);
  777. pApp->WriteProfileInt(szSection,_T("Text Color"),m_crTextColor);
  778. pApp->WriteProfileInt(szSection,_T("Back Ground Color"),m_crBackColor);
  779. pApp->WriteProfileInt(szSection,_T("Day"),m_CurrentTime.GetDay());
  780. pApp->WriteProfileInt(szSection,_T("Month"),m_CurrentTime.GetMonth());
  781. pApp->WriteProfileInt(szSection,_T("Year"),m_CurrentTime.GetYear());
  782. pApp->WriteProfileInt(szSection,_T("Transparency"),m_nTransparency);
  783. pApp->WriteProfileInt(szSection,_T("StartX"),m_nXPos);
  784. pApp->WriteProfileInt(szSection,_T("StartY"),m_nYPos);
  787. }
  789. void CMainFrame::SetIcon(INT nDate)
  790. {
  791. HICON hIcon = AfxGetApp()->LoadIcon(IDI_ICON1+(nDate-1));
  793. if(hIcon)
  794. {
  795. if(NULL!= m_hCalIcon)
  796. ::DestroyIcon(m_hCalIcon);
  797. m_hCalIcon = hIcon;
  798. m_tnd.hIcon  = m_hCalIcon;
  799. m_tnd.uFlags = NIF_ICON;
  800. Shell_NotifyIcon(NIM_MODIFY, &m_tnd);
  801. }
  802. }
  804. void CMainFrame::SetToolTip(CString szToolTip)
  805. {
  806. strcpy(m_tnd.szTip,szToolTip.operator LPCTSTR());
  807.     m_tnd.uFlags = NIF_TIP;
  808. Shell_NotifyIcon(NIM_MODIFY, &m_tnd);
  809. }
  811. int CMainFrame::CheckDate()
  812. {
  813. CString szSection(_T("Configuration"));
  814. CDesktopCalendarApp * pApp = (CDesktopCalendarApp*)AfxGetApp();
  815. int nLastDay   = pApp->GetProfileInt(szSection,_T("Day"),0);
  816. int nLastYear  = pApp->GetProfileInt(szSection,_T("Year"),0);
  817. int nLastMonth = pApp->GetProfileInt(szSection,_T("Month"),0);
  819. CTime tm = CTime::GetCurrentTime();
  820. if(nLastDay == tm.GetDay() &&
  821. nLastMonth == tm.GetMonth() &&
  822. nLastYear == tm.GetYear())
  823. return (NO_CHANGE);
  824. if(nLastDay != tm.GetDay() &&
  825. nLastMonth == tm.GetMonth() &&
  826. nLastYear == tm.GetYear())
  827. return (DAY_CHANGE);
  829. return (CHANGE_ALL);
  830. }
  832. BOOL CMainFrame::DestroyWindow() 
  833. {
  834. m_tnd.uFlags = 0;
  835. // Remove Icon
  836. Shell_NotifyIcon(NIM_DELETE, &m_tnd);
  837. WriteRegistry();
  838. if(NULL!= hMainBitmap)
  839. {
  840. DeleteObject(hMainBitmap);
  841. hMainBitmap = NULL;
  842. }
  844. return CFrameWnd::DestroyWindow();
  845. }
  847. LRESULT CMainFrame::OnTaskbarCreated(WPARAM wParam, LPARAM lParam)
  848. {
  849. // Install the icon again
  850. CTime t = CTime::GetCurrentTime();
  851. CString date = t.Format("%A, %B %d, %Y");
  853. if(NULL != m_hCalIcon)
  854. {
  855. DestroyIcon(m_hCalIcon);
  856. }
  857. m_hCalIcon = AfxGetApp()->LoadIcon(IDI_ICON1+t.GetDay()-1);
  858. m_tnd.cbSize = sizeof(NOTIFYICONDATA);
  859.     m_tnd.hWnd   = this->m_hWnd;
  860.     m_tnd.uID    = IDR_POP_UP;
  861.     m_tnd.hIcon  = m_hCalIcon;
  862. strcpy(m_tnd.szTip,date.operator LPCTSTR());
  863. m_tnd.uCallbackMessage = WM_ICON_NOTIFY;
  864. m_tnd.uFlags = NIF_MESSAGE | NIF_ICON | NIF_TIP;
  865. Shell_NotifyIcon(NIM_ADD, &m_tnd);
  867. return (0L);
  868. }
  871. void CMainFrame::OnCalAboutbox() 
  872. {
  873. CAboutDlg aboutDlg;
  874. aboutDlg.DoModal();
  875. }
  879. void CMainFrame::OnCalOptions() 
  880. {
  881. // TODO: Add your command handler code here
  882. COptionsDlg Dlg;
  883. Dlg.m_szFontName = m_szFontName;
  884. Dlg.m_crBackColor = m_crBackColor;
  885. Dlg.m_crTextColor = m_crTextColor; 
  886. Dlg.m_nFontSize = m_nFontSize;
  887. Dlg.m_uXPos = m_nXPos;
  888. Dlg.m_uYPos = m_nYPos;
  889. Dlg.m_nTransparency = m_nTransparency;
  891. if(Dlg.DoModal() ==IDOK)
  892. {
  893. m_szFontName = Dlg.m_szFontName;
  894. m_crBackColor = Dlg.m_crBackColor;
  895. m_crTextColor = Dlg.m_crTextColor;
  896. m_nFontSize = Dlg.m_nFontSize;
  897. m_nXPos = Dlg.m_uXPos;
  898. m_nYPos = Dlg.m_uYPos;
  899. m_nTransparency = Dlg.m_nTransparency;
  900. SetCalendar();
  901. }
  903. }