MFC C++ 绘制 EAN13 （商品条码）

绘制方法参考的 http://blog.csdn.net/zgke/archive/2008/12/11/3496721.aspx C#.NET下绘制EAN13

 

有兴趣的同学还可以参考http://blog.csdn.net/forrest23/archive/2009/08/21/4470858.aspx VB.NET绘制EAN13

 

 

DEMO

CClientDC dc(this);EAN13Builder bld(_T("6926032345039"));bld.Draw(&dc, CRect(100, 0, 304, 100)); 

 

EAN13Builder.h

#pragma once#include "stdafx.h"class EAN13Builder{public: EAN13Builder(LPCTSTR pStrEAN); void SetCode(LPCTSTR pStrEAN); static TCHAR CalSNVerify(LPCTSTR sz); CString TranslateCode(LPCTSTR pStrEAN); ~EAN13Builder(void); void Draw(CDC* pDC, CRect rect);protected: CString m_strEANCode; CString m_strBitCode;}; 

 

EAN13Builder.cpp

#include "StdAfx.h"#include "EAN13Builder.h"const static LPCTSTR DICTIONARY[][4] = { // TYPE 'A' 'B' 'C' {_T("AAAAAACCCCCC"), _T("0001101"), _T("0100111"), _T("1110010")}, // 0 {_T("AABABBCCCCCC"), _T("0011001"), _T("0110011"), _T("1100110")}, // 1 {_T("AABBABCCCCCC"), _T("0010011"), _T("0011011"), _T("1101100")}, // 2 {_T("AABBBACCCCCC"), _T("0111101"), _T("0100001"), _T("1000010")}, // 3 {_T("ABAABBCCCCCC"), _T("0100011"), _T("0011101"), _T("1011100")}, // 4 {_T("ABBAABCCCCCC"), _T("0110001"), _T("0111001"), _T("1001110")}, // 5 {_T("ABBBAACCCCCC"), _T("0101111"), _T("0000101"), _T("1010000")}, // 6 {_T("ABABABCCCCCC"), _T("0111011"), _T("0010001"), _T("1000100")}, // 7 {_T("ABABBACCCCCC"), _T("0110111"), _T("0001001"), _T("1001000")}, // 8 {_T("ABBABACCCCCC"), _T("0001011"), _T("0010111"), _T("1110100")}, // 9};// 将12位EAN翻译为01条码代码CString EAN13Builder::TranslateCode(LPCTSTR pStrEAN){ // 拿到翻译掩码 LPCTSTR pStrMask = DICTIONARY[pStrEAN[0] - _T('0')][0]; CString strCode; for (int i = 0; i < 12; i++) { strCode += DICTIONARY[pStrEAN[i + 1] - _T('0')][pStrMask[i] - _T('A') + 1]; } return CString(_T("101")) + strCode.Left(strCode.GetLength() / 2) + _T("01010") + strCode.Right(strCode.GetLength() / 2) + _T("101");}EAN13Builder::EAN13Builder(LPCTSTR strEAN){ SetCode(strEAN);}EAN13Builder::~EAN13Builder(void){}void EAN13Builder::SetCode( LPCTSTR pStrEAN ){ CString strCode = pStrEAN; if (strCode.GetLength() == 12) { strCode += CalSNVerify(strCode); } if (strCode.GetLength() != 13) { ASSERT(FALSE); throw -1; return; } m_strEANCode = strCode; m_strBitCode = TranslateCode(pStrEAN);}// 计算EAN-13校验位，生成方法为：// 前12位的偶数位（索引从1开始）之和*3 - 奇数位和。// 最后返回最接近且大于等于当前数的10倍数与当前值的差值。TCHAR EAN13Builder::CalSNVerify(LPCTSTR szEAN){ if (_tcslen(szEAN) != 12) { return _T('0'); } INT iSum = 0; for (int i = 0; i < 6; i++) { iSum += szEAN[i * 2] - _T('0'); iSum += (szEAN[i * 2 + 1] - _T('0')) * 3; } return (iSum % 10 == 0) ? _T('0') : 10 - iSum % 10 + _T('0');}void EAN13Builder::Draw( CDC* pDC, CRect rect ){ pDC->FillSolidRect(rect, RGB(255, 255, 255)); if (m_strBitCode.GetLength() == 0) { throw -2; return; } // 每个数字占7位图形位，第一个数字在图形外 INT iWidth = rect.Width() / (m_strBitCode.GetLength() + 7); CFont fnt; VERIFY(fnt.CreateFont( iWidth * 7, // nHeight 0, // nWidth 0, // nEscapement 0, // nOrientation FW_NORMAL, // nWeight FALSE, // bItalic FALSE, // bUnderline 0, // cStrikeOut ANSI_CHARSET, // nCharSet OUT_DEFAULT_PRECIS, // nOutPrecision CLIP_DEFAULT_PRECIS, // nClipPrecision DEFAULT_QUALITY, // nQuality DEFAULT_PITCH | FF_SWISS, // nPitchAndFamily _T("Consolas"))); // lpszFacename for (int i = 0; i < m_strBitCode.GetLength(); i++) { CRect rtCur = rect; rtCur.left += (7 + i) * iWidth; rtCur.right = rtCur.left + iWidth; if (i != 0 && i != 2 && i != 46 && i != 48 && i != 92 && i != 94) { rtCur.bottom -= 10 * iWidth; } else { rtCur.bottom -= 3 * iWidth; } if (m_strBitCode[i] == _T('1')) { pDC->FillSolidRect(rtCur, RGB(0, 0, 0)); } } INT iOldMode = pDC->SetBkMode(TRANSPARENT); CFont* pOldFnt = pDC->SelectObject(&fnt); CRect rtText = rect; rtText.top = rect.bottom - 10 * iWidth; rtText.right = rect.left + 7 * iWidth; pDC->DrawText(m_strEANCode.Left(1), rtText, DT_RIGHT | DT_VCENTER); rtText.left = rect.left + 10 * iWidth; rtText.right = rect.left + 52 * iWidth; pDC->DrawText(m_strEANCode.Mid(1, 6), rtText, DT_CENTER | DT_VCENTER); rtText.left = rect.left + 57 * iWidth; rtText.right = rect.left + 104 * iWidth; pDC->DrawText(m_strEANCode.Right(6), rtText, DT_CENTER | DT_VCENTER); pDC->SetBkMode(iOldMode); pDC->SelectObject(pOldFnt);}