tipdlg.cpp

一个完整的编辑器的代码（很值得参考

#include "stdafx.h"
#include "editcmd.h"
#include "tipdlg.h"
#include "registry.h"
#include "editreg.h"
#include <sys\stat.h>
#include <sys\types.h>

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

#ifndef _WIN32

// supply a replacement for CDC::FillSolidColor for MSVC 1.5

void 
FillSolidRect (CDC * pDC, LPCRECT lpRect, COLORREF clr)
{
  ASSERT_VALID (pDC);
  ASSERT (pDC->m_hDC != NULL);

  pDC->SetBkColor (clr);
  pDC->ExtTextOut (0, 0, ETO_OPAQUE, lpRect, NULL, 0, NULL);
}

#endif

/////////////////////////////////////////////////////////////////////////////
// CTipDlg dialog

#define MAX_BUFLEN 1000

static const TCHAR szFile[] = _T ("editpad.tip");
static const TCHAR szIntFilePos[] = _T ("FilePos");
static const TCHAR szTimeStamp[] = _T ("TimeStamp");
static const TCHAR szIntStartup[] = _T ("StartUp");

CTipDlg::CTipDlg (CWnd * pParent /*=NULL*/)
: CDialog (CTipDlg::IDD, pParent)
{
  //{{AFX_DATA_INIT(CTipDlg)
  m_bStartup = TRUE;
  //}}AFX_DATA_INIT

  // Now try to open the tips file
  TCHAR szPath[256];
  if (GetModuleFileName (AfxGetResourceHandle (), szPath, countof (szPath)))
    {
      LPTSTR pszName = _tcsrchr (szPath, _T ('\\'));
      if (pszName)
        pszName[1] = _T ('\0');
    }
  else
    *szPath = _T ('\0');
  _tcscat (szPath, szFile);
  m_pStream = _tfopen (szPath, _T ("r"));
  if (m_pStream == NULL)
    {
      m_strTip.LoadString (IDS_TIP_FILE_ABSENT);
      return;
    }

  // We need to find out what the startup and file position parameters are
  // If startup does not exist, we assume that the Tips on startup is checked TRUE.
  CWinApp *pApp = AfxGetApp ();
  struct _stat buf;
  _fstat (_fileno (m_pStream), &buf);
  UINT iFilePos = 0;
  CString strCurrentTime = ctime (&buf.st_ctime), strStoredTime = strCurrentTime;
  CReg reg;
  if (reg.Open (HKEY_CURRENT_USER, REG_EDITPAD, KEY_READ))
    {
      DWORD dwTemp;
      if (reg.LoadNumber (szIntStartup, &dwTemp))
        m_bStartup = !dwTemp;
      if (reg.LoadNumber (szIntFilePos, &dwTemp))
        iFilePos = dwTemp;
      reg.LoadString (szTimeStamp, strStoredTime);
    }

  // If the timestamp in the INI file is different from the timestamp of
  // the tips file, then we know that the tips file has been modified
  // Reset the file position to 0 and write the latest timestamp to the
  // ini file
  strCurrentTime.TrimRight ();
  strStoredTime.TrimRight ();
  if (strCurrentTime != strStoredTime)
    {
      iFilePos = 0;
      CReg reg;
      if (reg.Create (HKEY_CURRENT_USER, REG_EDITPAD, KEY_WRITE))
        VERIFY (reg.SaveString (szTimeStamp, strCurrentTime));
    }

  if (fseek (m_pStream, iFilePos, SEEK_SET) != 0)
    AfxMessageBox (IDS_TIP_FILE_CORRUPT);
  else
    GetNextTipString (m_strTip);
}

CTipDlg:: ~ CTipDlg ()
{
  // This destructor is executed whether the user had pressed the escape key
  // or clicked on the close button. If the user had pressed the escape key,
  // it is still required to update the filepos in the ini file with the 
  // latest position so that we don't repeat the tips! 

  // But make sure the tips file existed in the first place....
  if (m_pStream != NULL)
    {
      CReg reg;
      if (reg.Create (HKEY_CURRENT_USER, REG_EDITPAD, KEY_WRITE))
        VERIFY (reg.SaveNumber (szIntFilePos, ftell (m_pStream)));
      fclose (m_pStream);
    }
}

void CTipDlg::
DoDataExchange (CDataExchange * pDX)
{
  CDialog::DoDataExchange (pDX);
  //{{AFX_DATA_MAP(CTipDlg)
  DDX_Check (pDX, IDC_STARTUP, m_bStartup);
  DDX_Text (pDX, IDC_TIPSTRING, m_strTip);
  //}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP (CTipDlg, CDialog)
    //{{AFX_MSG_MAP(CTipDlg)
ON_BN_CLICKED (IDC_NEXTTIP, OnNextTip)
ON_WM_CTLCOLOR ()
ON_WM_PAINT ()
ON_WM_CREATE ()
    //}}AFX_MSG_MAP
END_MESSAGE_MAP ()

/////////////////////////////////////////////////////////////////////////////
// CTipDlg message handlers

void CTipDlg::OnNextTip ()
{
  UpdateData (TRUE);
  GetNextTipString (m_strTip);
  UpdateData (FALSE);

  CDC *pDC = GetDC ();
  DoPaint (pDC, TRUE);
  VERIFY (ReleaseDC (pDC));
}

void CTipDlg::
GetNextTipString (CString & strNext)
{
  LPTSTR lpsz = strNext.GetBuffer (MAX_BUFLEN);

  // This routine identifies the next string that needs to be
  // read from the tips file
  BOOL bStop = FALSE;
  while (!bStop)
    {
      if (_fgetts (lpsz, MAX_BUFLEN, m_pStream) == NULL)
        {
          // We have either reached EOF or enocuntered some problem
          // In both cases reset the pointer to the beginning of the file
          // This behavior is same as VC++ Tips file
          if (fseek (m_pStream, 0, SEEK_SET) != 0)
            AfxMessageBox (IDS_TIP_FILE_CORRUPT);
        }
      else
        {
          if (*lpsz != _T (' ') && *lpsz != _T ('\t') &&
              *lpsz != _T ('\n') && *lpsz != _T (';'))
            {
              // There should be no space at the beginning of the tip
              // This behavior is same as VC++ Tips file
              // Comment lines are ignored and they start with a semicolon
              bStop = TRUE;
            }
        }
    }
  strNext.ReleaseBuffer ();
}

HBRUSH CTipDlg::
OnCtlColor (CDC * pDC, CWnd * pWnd, UINT nCtlColor)
{
  if (pWnd->GetDlgCtrlID () == IDC_TIPSTRING)
    return (HBRUSH) GetStockObject (WHITE_BRUSH);

  return CDialog::OnCtlColor (pDC, pWnd, nCtlColor);
}

void CTipDlg::
OnOK ()
{
  CDialog::OnOK ();
  UpdateData (TRUE);

  // Update the startup information stored in the INI file
      CReg reg;
  if (reg.Create (HKEY_CURRENT_USER, REG_EDITPAD, KEY_WRITE))
    VERIFY (reg.SaveNumber (szIntStartup, !m_bStartup));
}

CRect bigrect;

BOOL CTipDlg::
OnInitDialog ()
{
  CDialog::OnInitDialog ();

  // If Tips file does not exist then disable NextTip
  if (m_pStream == NULL)
    GetDlgItem (IDC_NEXTTIP)->EnableWindow (FALSE);
  CWnd *pStatic = GetDlgItem (IDC_STATIC1);
  pStatic->GetWindowRect (&bigrect);
  ScreenToClient (&bigrect);
  pStatic->DestroyWindow ();

  return TRUE;                  // return TRUE unless you set the focus to a control

}

void CTipDlg::
OnPaint ()
{
  CPaintDC dc (this);           // device context for painting

  DoPaint (&dc, FALSE);
  // Do not call CDialog::OnPaint()for painting messages
}

int CTipDlg::
DoModal ()
{
  if (m_pStream != NULL)
    return CDialog::DoModal ();
  else
    {
      MessageBeep (-1);
      return IDOK;
    }
}

void CTipDlg::
DoPaint (CDC * pdc, BOOL updatetext)
{
  // Get paint area for the big static control
  CWnd *pStatic;
  CRect tiprect, seprect, didyourect, bulbrect, rect = bigrect;

  CBrush brush;
  brush.CreateStockObject (WHITE_BRUSH);

/*
   pStatic = GetDlgItem(IDC_STATIC1);
   pStatic->GetWindowRect(&rect);
   ScreenToClient(&rect);
 */

  pStatic = GetDlgItem (IDC_TIPSTRING);
  pStatic->GetWindowRect (&tiprect);
  ScreenToClient (&tiprect);

  pStatic = (CStatic *) GetDlgItem (IDC_BULB);
  pStatic->GetWindowRect (bulbrect);

  if (!updatetext)
    {
      pdc->Draw3dRect (rect,::GetSysColor (COLOR_BTNSHADOW),::GetSysColor (COLOR_BTNHILIGHT));
      rect.InflateRect (-1, -1);

      // Paint the background white.
#ifndef _WIN32
      FillSolidRect (pdc, rect,::GetSysColor (COLOR_WINDOW));
#else
      pdc->FillSolidRect (rect,::GetSysColor (COLOR_WINDOW));
#endif

      seprect = rect;

      // Paint left side gray

      rect.right = tiprect.left - 10;
      CBrush gbrush;
      gbrush.CreateSolidBrush (::GetSysColor (COLOR_BTNSHADOW));


#ifndef _WIN32
      FillSolidRect (pdc, rect,::GetSysColor (COLOR_BTNSHADOW));
#else
      pdc->FillSolidRect (rect,::GetSysColor (COLOR_BTNSHADOW));
#endif
      pdc->SetBkColor (::GetSysColor (COLOR_WINDOW));

      // Load bitmap and get dimensions of the bitmap
      CBitmap bmp;
      bmp.LoadBitmap (IDB_LIGHTBULB2);
      BITMAP bmpInfo;
#ifdef _WIN32
      bmp.GetBitmap (&bmpInfo);
#else
      bmp.GetObject (sizeof (BITMAP), &bmpInfo);
#endif
      // Draw bitmap in top corner and validate only top portion of window
      CDC dcTmp;
      ScreenToClient (bulbrect);
      dcTmp.CreateCompatibleDC (pdc);
      dcTmp.SelectObject (&bmp);
      bulbrect.bottom = bmpInfo.bmHeight + bulbrect.top;
      bulbrect.right = bmpInfo.bmWidth + bulbrect.left;
      dcTmp.SelectObject (&gbrush);
      dcTmp.ExtFloodFill (0, 0, 0x00ffffff, FLOODFILLSURFACE);
      pdc->BitBlt (bulbrect.left, bulbrect.top, bulbrect.Width (), bulbrect.Height (),
                   &dcTmp, 0, 0, SRCCOPY);

      seprect.top = bulbrect.bottom + 6;
      seprect.bottom = seprect.top + 1;

#ifndef _WIN32
      FillSolidRect (pdc, seprect,::GetSysColor (COLOR_BTNSHADOW));
#else
      pdc->FillSolidRect (seprect,::GetSysColor (COLOR_BTNSHADOW));
#endif
      pdc->SetBkColor (::GetSysColor (COLOR_WINDOW));
    }

  CFont font, fonttext;
  BOOL fok = font.CreateFont (22, 0, 0, 0, FW_BOLD, 0, 0, 0,
                              DEFAULT_CHARSET, OUT_DEFAULT_PRECIS,
                              CLIP_DEFAULT_PRECIS, DEFAULT_QUALITY,
                              DEFAULT_PITCH | FF_SWISS, _T ("Times"));

  fok = fonttext.CreateFont (16, 0, 0, 0, FW_NORMAL, 0, 0, 0,
                             DEFAULT_CHARSET, OUT_DEFAULT_PRECIS,
                             CLIP_DEFAULT_PRECIS, DEFAULT_QUALITY,
                             DEFAULT_PITCH | FF_SWISS, _T ("Arial"));

  CFont *pOldFont = pdc->SelectObject (&font);
  // Draw out "Did you know..." message next to the bitmap
  CString strMessage;
  strMessage.LoadString (IDS_TIP_DIDYOUKNOW);
  didyourect = tiprect;
  didyourect.top = bulbrect.top;
  pdc->DrawText (strMessage, -1, didyourect, DT_SINGLELINE);

  pdc->SelectObject (&fonttext);


  // efface le rectangle contenant le text


#ifndef _WIN32
  FillSolidRect (pdc, tiprect,::GetSysColor (COLOR_WINDOW));
#else
  pdc->FillSolidRect (tiprect,::GetSysColor (COLOR_WINDOW));
#endif
  pdc->DrawText (m_strTip, -1, tiprect, DT_WORDBREAK);
  pdc->SelectObject (pOldFont);
}

int CTipDlg::
OnCreate (LPCREATESTRUCT lpCreateStruct)
{
  if (CDialog::OnCreate (lpCreateStruct) == -1)
    return -1;

  return 0;
}