编程技巧20法(11-20)

天云上人 · 发表于 2004-1-4 21:09:15

编程技巧20法(11-20)
徐景周
日期:2002-09-12


11. 如何判断当前操作系统的版本

//------------------------------------------------------------------------------------------------

//判断操作系统涵数及变量

typedef enum tagWin32SysType{
Windows32s,
WindowsNT3,
Windows95,
Windows98,
WindowsME,
WindowsNT4,
Windows2000,
WindowsXP
}Win32SysType;

//判断操作系统涵数及变量，jingzhou xu

Win32SysType IsShellSysType()
{
Win32SysType  ShellType;
DWORD winVer;
OSVERSIONINFO *osvi;

winVer=GetVersion();

if(winVer<0x80000000){/*NT */
      ShellType=WindowsNT3;
      osvi= (OSVERSIONINFO *)malloc(sizeof(OSVERSIONINFO));
      if (osvi!=NULL){
         memset(osvi,0,sizeof(OSVERSIONINFO));
         osvi->dwOSVersionInfoSize=sizeof(OSVERSIONINFO);
         GetVersionEx(osvi);
         if(osvi->dwMajorVersion==4L)ShellType=WindowsNT4;
         else if(osvi->dwMajorVersion==5L&&osvi->dwMinorVersion==0L)ShellType=Windows2000;
         else if(osvi->dwMajorVersion==5L&&osvi->dwMinorVersion==1L)ShellType=WindowsXP;
         free(osvi);
      }
}
else if  (LOBYTE(LOWORD(winVer))<4)
      ShellType=Windows32s;
else{
      ShellType=Windows95;
      osvi= (OSVERSIONINFO *)malloc(sizeof(OSVERSIONINFO));
      if (osvi!=NULL){
         memset(osvi,0,sizeof(OSVERSIONINFO));
         osvi->dwOSVersionInfoSize=sizeof(OSVERSIONINFO);
         GetVersionEx(osvi);
         if(osvi->dwMajorVersion==4L&&osvi->dwMinorVersion==10L)ShellType=Windows98;
         else if(osvi->dwMajorVersion==4L&&osvi->dwMinorVersion==90L)ShellType=WindowsME;
         free(osvi);
      }
}
return ShellType;
}

//------------------------------------------------------------------------------------------------

12. 如何在指定矩形框内水平/垂直显示多行文字

///////////////////////////////////////////////////////
//说明：
//  在矩形框中水平或垂直显示多行文字，jingzhou xu.
//  lMode: 排列方式，0:水平方式; 1:垂直对齐
//  lHori: 水平对齐方式, 0:左对齐; 1:居中; 2:右对齐; 3：自定义
//  lVert: 垂直对齐方式, 0:顶对齐; 1:居中; 2:底对齐; 3：自定义
///////////////////////////////////////////////////////

CRect DrawTitleInRect(CDC *pDC, CString szString, LPRECT lpRect, long lMode, long lHori, long lVert)
{
TEXTMETRIC tm;
pDC->GetTextMetrics(&tm);
int tmpWidth=tm.tmAveCharWidth, tmpHeight=tm.tmHeight;

CRect rcInner(lpRect);
if(lMode==0)
{
      rcInner.left+=tmpWidth;
      rcInner.right-=tmpWidth;
      rcInner.top-=tmpWidth;
      rcInner.bottom+=tmpWidth;
}
if(lMode==1)
{
      rcInner.left+=tmpWidth;
      rcInner.right=rcInner.left+tmpWidth;
      rcInner.top-=tmpWidth;
      rcInner.bottom+=tmpWidth;
}

pDC->DrawText(szString, rcInner,DT_CALCRECT);
switch(lHori)
{
case 0:
      break;
case 1:
      {
         long xOutCent=(lpRect->right+lpRect->left)/2;
         long xInnCent=(rcInner.right+rcInner.left)/2;
         rcInner.left+=(xOutCent-xInnCent);
         rcInner.right+=(xOutCent-xInnCent);
      }
      break;
case 2:
      {
         long lInWidth=rcInner.right-rcInner.left;
         rcInner.right=lpRect->right-tmpWidth;
         rcInner.left=rcInner.right-lInWidth;
      }
      break;
default:
      break;
}

switch(lVert)
{
case 0:
      break;
case 1:
      {
         long yOutCent=(lpRect->bottom+lpRect->top)/2;
         long yInnCent=(rcInner.bottom+rcInner.top)/2;
         rcInner.top-=(yInnCent-yOutCent);
         rcInner.bottom-=(yInnCent-yOutCent);
      }
      break;
case 2:
      {
         long lInHeigh=rcInner.top-rcInner.bottom;
         rcInner.bottom=lpRect->bottom+tmpWidth;
         rcInner.top=rcInner.bottom+lInHeigh;
      }
      break;
default:
      break;
}

//---------------------------------------------------------------------------------------------
//功能：根据新、老矩形，重新计算行数，使文字多行显示,jingzhou xu
//---------------------------------------------------------------------------------------------
//一行中最大字符数
int nMaxLineChar = abs(lpRect->right - lpRect->left) / tmpWidth ;
//记录当前行的宽度
short theLineLength=0;
//记录当前行中汉字字节数，以防止将一半汉字分为两行
unsigned short halfChinese=0;

for(int i=0; i<=szString.GetLength()-1; i++)
{
      if(((unsigned char)szString.GetAt(i) == 0x0d) && ((unsigned char)szString.GetAt(i+1) == 0x0a))
         theLineLength=0;

   //大于0xa1的字节为汉字字节
      if((unsigned char)szString.GetAt(i) >= 0xA1)
         halfChinese++;
      theLineLength++;

      //如果行宽大于每行最大宽度，进行特殊处理
      if(theLineLength > nMaxLineChar)
      {
         //防止将一个汉字分为两行，回溯
         if(halfChinese%2)
         {
            szString.Insert(i,(unsigned char)0x0a);
            szString.Insert(i,(unsigned char)0x0d);
         }
         else
         {
            szString.Insert(i-1,(unsigned char)0x0a);
            szString.Insert(i-1,(unsigned char)0x0d);
         }

         theLineLength = 0;
      }
}

//重新计算矩形边界范围
// int tmpLine = int(abs(szString.GetLength()*tmpWidth / abs(lpRect->right - lpRect->left)-0.5));

// tmpLine += (szString.GetLength()*tmpWidth % abs(lpRect->right - lpRect->left))? 1 : 0;
// if(tmpLine == 0)
//       tmpLine = 1;

if(rcInner.bottom > lpRect->bottom)
      rcInner.bottom = lpRect->bottom;
if(rcInner.top < lpRect->top)
      rcInner.top = lpRect->top;

//---------------------------------------------------------------------------------------------

if(lHori==0)
      pDC->DrawText(szString, rcInner, DT_WORDBREAK|DT_LEFT);
else if(lHori==1)
      pDC->DrawText(szString, rcInner, DT_WORDBREAK|DT_CENTER);
else if(lHori==2)
      pDC->DrawText(szString, rcInner, DT_WORDBREAK|DT_RIGHT);
return rcInner;
}

13. 如何在指定矩形中旋转显示文字

///////////////////////////////////////////////////////
//说明：
//  在矩形框中旋转方式显示文字，jingzhou xu
//参数：
//  pDC:       DC指针
//  str:       显示文字
//  rect:       显示范围
//  angle:       旋转角度
// nOptions: ExtTextOut()中相应设置
///////////////////////////////////////////////////////

void DrawRotatedText(CDC* pDC, const CString str, CRect rect,
                  double angle, UINT nOptions)
{
//按比例转换角度值
double pi = 3.141592654;
double radian = pi * 2 / 360 * angle;

//获取显示文字中心点
CSize TextSize = pDC->GetTextExtent(str);
CPoint center;
center.x = TextSize.cx / 2;
center.y = TextSize.cy / 2;

//计算显示文字新的中心点
CPoint rcenter;
rcenter.x = long(cos(radian) * center.x - sin(radian) * center.y);
rcenter.y = long(sin(radian) * center.x + cos(radian) * center.y);

//绘制文字
pDC->SetTextAlign(TA_BASELINE);
pDC->SetBkMode(TRANSPARENT);
pDC->ExtTextOut(rect.left + rect.Width() / 2 - rcenter.x,
               rect.top + rect.Height() / 2 + rcenter.y,
               nOptions, rect, str, NULL);
}

14. 如何将32 x 32像素图标转换为16 x 16像素值的图标

HICON Convert32x32IconTo16x16(HICON h32x32Icon)
{
  HDC hMainDC, hMemDC1, hMemDC2;
  HICON h16x16Icon;
  BITMAP bmp;
  HBITMAP hOldBmp1, hOldBmp2;
  ICONINFO IconInfo32x32, IconInfo16x16;

  GetIconInfo(h32x32Icon, &IconInfo32x32);

  hMainDC = ::GetDC(m_hWnd);
  hMemDC1 = CreateCompatibleDC(hMainDC);
  hMemDC2 = CreateCompatibleDC(hMainDC);

  GetObject(IconInfo32x32.hbmColor, sizeof(BITMAP), &bmp);

  IconInfo16x16.hbmColor = CreateBitmap( 16, 16,
                                       bmp.bmPlanes,
                                       bmp.bmBitsPixel,
                                       NULL);

  hOldBmp1 = (HBITMAP) SelectObject( hMemDC1,
                                 IconInfo32x32.hbmColor);
  hOldBmp2 = (HBITMAP) SelectObject( hMemDC2,
                                 IconInfo16x16.hbmColor);

  StretchBlt(hMemDC2,
   0, 0,
   16, 16,
   hMemDC1,
   0, 0,
   32, 32,
   SRCCOPY
   );

  GetObject(IconInfo32x32.hbmMask, sizeof(BITMAP), &bmp);

  IconInfo16x16.hbmMask = CreateBitmap( 16, 16,
                                    bmp.bmPlanes,
                                    bmp.bmBitsPixel,
                                    NULL);

  SelectObject(hMemDC1, IconInfo32x32.hbmMask);
  SelectObject(hMemDC2, IconInfo16x16.hbmMask);

  StretchBlt(hMemDC2,
         0, 0,
         16, 16,
         hMemDC1,
         0, 0,
         32, 32,
         SRCCOPY
   );

  SelectObject(hMemDC1, hOldBmp1);
  SelectObject(hMemDC2, hOldBmp2);

  IconInfo16x16.fIcon = TRUE;
  h16x16Icon = CreateIconIndirect(&IconInfo16x16);
  DeleteObject(IconInfo32x32.hbmColor);
  DeleteObject(IconInfo16x16.hbmColor);
  DeleteObject(IconInfo32x32.hbmMask);
  DeleteObject(IconInfo16x16.hbmMask);
  DeleteDC(hMemDC1);
  DeleteDC(hMemDC2);

  ::ReleaseDC(m_hWnd, hMainDC);
  return h16x16Icon;
}

15. 如何建立一个灰度级图标

HICON CreateGrayscaleIcon(HICON hIcon)
{
  HICON    hGrayIcon = NULL;
  HDC       hMainDC = NULL,
            hMemDC1 = NULL,
            hMemDC2 = NULL;
  BITMAP    bmp;
  HBITMAP    hOldBmp1 = NULL,
            hOldBmp2 = NULL;
  ICONINFO csII, csGrayII;
  BOOL       bRetValue = FALSE;

  bRetValue = ::GetIconInfo(hIcon, &csII);

  if (bRetValue == FALSE) return NULL;

  hMainDC = ::GetDC(m_hWnd);
  hMemDC1 = ::CreateCompatibleDC(hMainDC);
  hMemDC2 = ::CreateCompatibleDC(hMainDC);
  if (hMainDC == NULL ||
hMemDC1 == NULL ||
hMemDC2 == NULL)
   return NULL;

  if (::GetObject(csII.hbmColor,
            sizeof(BITMAP), &
            amp;bmp))
  {
csGrayII.hbmColor =
      ::CreateBitmap(csII.xHotspot*2,
                     csII.yHotspot*2,
                     bmp.bmPlanes,
                     bmp.bmBitsPixel,
                     NULL);
if (csGrayII.hbmColor)
{
   hOldBmp1 =
      (HBITMAP)::SelectObject(hMemDC1,
                              csII.hbmColor);
   hOldBmp2 =
      (HBITMAP)::SelectObject(hMemDC2,
                              csGrayII.hbmColor);

   ::BitBlt(hMemDC2, 0, 0, csII.xHotspot*2,
            csII.yHotspot*2, hMemDC1, 0, 0,
            SRCCOPY);

   DWORD dwLoopY = 0, dwLoopX = 0;
   COLORREF crPixel = 0;
   BYTE    byNewPixel = 0;
   for (dwLoopY = 0; dwLoopY < csII.yHotspot*2; dwLoopY++)
   {
      for (dwLoopX = 0; dwLoopX < csII.xHotspot*2; dwLoopX++)
      {
      crPixel = ::GetPixel(hMemDC2, dwLoopX, dwLoopY);
      byNewPixel = (BYTE)((GetRValue(crPixel) * 0.299) +
            (GetGValue(crPixel) * 0.587) +
            (GetBValue(crPixel) * 0.114));
      if (crPixel) ::SetPixel(hMemDC2,
                              dwLoopX,
                              dwLoopY,
                              RGB(byNewPixel,
                              byNewPixel,
                              byNewPixel));
   } // for
   } // for
   ::SelectObject(hMemDC1, hOldBmp1);
   ::SelectObject(hMemDC2, hOldBmp2);

   csGrayII.hbmMask = csII.hbmMask;
   csGrayII.fIcon = TRUE;
   hGrayIcon = ::CreateIconIndirect(&csGrayII);
} // if
:

eleteObject(csGrayII.hbmColor);
//:

eleteObject(csGrayII.hbmMask);
} // if
:

eleteObject(csII.hbmColor);
  ::DeleteObject(csII.hbmMask);
  ::DeleteDC(hMemDC1);
  ::DeleteDC(hMemDC2);
  ::ReleaseDC(m_hWnd, hMainDC);

  return hGrayIcon;
}

16. 如何按指定角度旋转显示内存位图(用法和BitBlt类似)

void RotBlt(HDC destDC, int srcx1, int srcy1, int srcx2, int srcy2,

  HDC srcDC , int destx1, int desty1 ,int thetaInDegrees ,DWORD mode)
{
  double theta = thetaInDegrees * (3.14159/180);

  //原图像原始大小

  int width = srcx2 - srcx1;
  int height = srcy2 - srcy1;

  //原图像中心点
  int centreX = int(float(srcx2 + srcx1)/2);
  int centreY = int(float(srcy2 + srcy1)/2);

  //判断出图像可以沿任意方向旋转的矩形框
  if(width>height)height = width;
  else
width = height;

  HDC memDC = CreateCompatibleDC(destDC);
  HBITMAP memBmp = CreateCompatibleBitmap(destDC, width, height);

  HBITMAP obmp = (HBITMAP) SelectObject(memDC, memBmp);

  //内存DC新在中心点

  int newCentre = int(float(width)/2);
  //开始旋转
  for(int x = srcx1; x<=srcx2; x++)
for(int y = srcy1; y<=srcy2; y++)
{
   COLORREF col = GetPixel(srcDC,x,y);
   int newX = int((x-centreX)*sin(theta)+(y-centreY)*cos(theta));
   int newY = int((x-centreX)*cos(theta)-(y-centreY)*sin(theta));
   SetPixel(memDC , newX + newCentre, newY + newCentre, col);
}

  //复制到目标DC上
  BitBlt(destDC, destx1, desty1, width, height, memDC, 0,0,mode);
  //释放内存
  SelectObject(memDC, obmp);
  DeleteDC(memDC);
  DeleteObject(memBmp);
}

用法：

RotBlt(dc, 0,0,150,150,memDC,200,0, 45, SRCCOPY);

17. 如何将指定的窗体，以位图形式复制到系统剪切板上

void CScreenSnapDlg::toClipboard_Bio(CWnd * wnd, BOOL FullWnd)
{
   CDC *dc;
   if(FullWnd)
      { /* 抓取整个窗口 */
      dc = new CWindowDC(wnd);
      } /* 抓取整个窗口 */
   else
      { /* 仅抓取客户区时 */
      dc = new CClientDC(wnd);
      } /* 仅抓取客户区时 */

   CDC memDC;
   memDC.CreateCompatibleDC(dc);

   CBitmap bm;
   CRect r;
   if(FullWnd)
      wnd->GetWindowRect(&r);
   else
      wnd->GetClientRect(&r);

   CString s;
   wnd->GetWindowText(s);
   CSize sz(r.Width(), r.Height());

   bm.CreateCompatibleBitmap(dc, sz.cx, sz.cy);
   CBitmap * oldbm = memDC.SelectObject(&bm);
   memDC.BitBlt(0, 0, sz.cx, sz.cy, dc, 0, 0, SRCCOPY);

   //直接调用OpenClipboard()，而不用wnd->GetParent()->OpenClipboard();
   wnd->OpenClipboard();
   ::EmptyClipboard();
   ::SetClipboardData(CF_BITMAP, bm.m_hObject);
   CloseClipboard();

   //恢复原始环境
   memDC.SelectObject(oldbm);
   bm.Detach();
   delete dc;
}

18. 如何替换HBITMAP中的颜色值

#define COLORREF2RGB(Color) (Color & 0xff00) | ((Color >> 16) & 0xff) \
                                          | ((Color << 16) & 0xff0000)

HBITMAP ReplaceColor (HBITMAP hBmp,COLORREF cOldColor,COLORREF cNewColor)
{
HBITMAP RetBmp=NULL;
if (hBmp)
{
      HDC BufferDC=CreateCompatibleDC(NULL);       // 源位图DC
      if (BufferDC)
      {
         SelectObject(BufferDC,hBmp); 　 // 选入DC中
         HDC DirectDC=CreateCompatibleDC(NULL);    // 目标DC
         if (DirectDC)
         {
            // 获取源位图大小
            BITMAP bm;
            GetObject(hBmp, sizeof(bm), &bm);

            // 初始化BITMAPINFO信息，以便使用CreateDIBSection
            BITMAPINFO RGB32BitsBITMAPINFO;
            ZeroMemory(&RGB32BitsBITMAPINFO,sizeof(BITMAPINFO));
            RGB32BitsBITMAPINFO.bmiHeader.biSize=sizeof(BITMAPINFOHEADER);
            RGB32BitsBITMAPINFO.bmiHeader.biWidth=bm.bmWidth;
            RGB32BitsBITMAPINFO.bmiHeader.biHeight=bm.bmHeight;
            RGB32BitsBITMAPINFO.bmiHeader.biPlanes=1;
            RGB32BitsBITMAPINFO.bmiHeader.biBitCount=32;

            UINT * ptPixels;
            HBITMAP DirectBitmap= CreateDIBSection(DirectDC,
                     (BITMAPINFO *)&RGB32BitsBITMAPINFO,
                     DIB_RGB_COLORS,(void **)&ptPixels, NULL, 0);
            if (DirectBitmap)
            {
                  HGDIOBJ PreviousObject=SelectObject(DirectDC, DirectBitmap);
                  BitBlt(DirectDC,0,0,bm.bmWidth,bm.bmHeight,BufferDC,0,0,SRCCOPY);

                  // 转换 COLORREF 为 RGB
                  cOldColor=COLORREF2RGB(cOldColor);
                  cNewColor=COLORREF2RGB(cNewColor);
                  // 替换颜色
                  for (int i=((bm.bmWidth*bm.bmHeight)-1);i>=0;i--)
                  {
                     if (ptPixels==cOldColor) ptPixels=cNewColor;& V5 c% |; ~* ]: l7 v
                  }8 ~" G3 M. W, q  ^. P, M/ V+ Q2 x

; f* V6 z& \3 J( Q, Z) P3 [                   // 修改位图 DirectBitmap) {# K6 L: M4 z5 [
                  SelectObject(DirectDC,PreviousObject);
( X. v' X- l% }! E% g$ v1 v2 A                   / H9 b, H  Z' Q: q$ G
                  // 完成9 ~% n. I. V9 T2 T3 x" i& c
                  RetBmp=DirectBitmap;
0 r9 z# p6 z/ L# Q             }
$ }" F. P: v; M             // 释放DC
. x0 F0 R) p8 ?, r             DeleteDC(DirectDC);
9 w3 z9 V$ e5 B2 p% j: X          }
6 \" Z  i2 P) P: z' D, C2 C, I# ?          // 释放DC5 y8 P9 W' H0 `- H3 f( `4 {4 f$ O
         DeleteDC(BufferDC);% {0 O+ L( z6 k( u
      }' {' D# y) ?+ p2 B5 O. E% s/ M: L- \
}
+ ]" L6 ^! W( y- } return RetBmp;
2 `* f- P& Z3 _4 _0 }}. b! L3 n$ \/ a' C% e
* k( L% g: R" H$ \; \; @
# v1 b8 V: G7 S% I' i
用法：' C8 X, _& `" @# h
' I5 @1 o. B4 H$ N5 u8 _% }
HBITMAP hBmp2 = LoadBitmap(g_hinstance,MAKEINTRESOURCE(IDB_SAMPLEBITMAP));  w" M7 U7 T( z9 h! H- T
HBITMAP hBmp = ReplaceColor(hBmp2,0xff0000,0x00ff00); // 替换蓝色为绿色
% o1 _$ a$ n+ R( ^......
' j- o) m, m, e) g6 g5 O1 ^$ M8 c9 F6 `
DeleteObject(hBmp2);6 \* E! q( }8 l; a$ q3 {
DeleteObject(hBmp);( g6 F- p6 H; R1 u( S9 I5 c
/ C% G% C- d6 x9 M5 @! h# S
' h# T% c3 }& o1 |5 ^
19. 如何转换并保存位图; X( E. v) i; v& j
7 F8 z& k4 s0 O0 K: M! U
//********************************************************************************
7 J' P) l0 x" F//* 名称：DDBToDIB7 A/ M7 Z! I% K" R( M
//* 作者：徐景周(jingzhou_xu@163.net)
$ Z. m. m% s4 E( [& x( F3 U& Q//* 功能：设备相关转换为设备无关位图
2 N) V+ W: B0 u: N8 j//********************************************************************************
) E2 P$ S! P! z- X* U# K1 X
9 M3 s2 ~6 I: _; \  ^1 zHANDLE CScreenSnapDlg::DDBToDIB( CBitmap& bitmap, DWORD dwCompression /* = BI_RGB */)
( t* i5 F& d: C# T9 I$ v{
) W, j. n) y  B" ]" U5 L) C0 U" B: J BITMAP             bm;( `- m, \! f, ?  n$ o; O+ p
BITMAPINFOHEADER bi;3 n% |6 `+ f- b0 c4 G; h
LPBITMAPINFOHEADER  lpbi;
2 w% b# M: Q2 x4 L5 ^ DWORD             dwLen;3 u0 T& y. j7 r+ n! w
HANDLE             hDIB;
) u. V2 L: J/ t4 j$ ] HANDLE             handle;1 t, d' M" C* {2 C, Y8 w7 e
HDC                   hDC;
  s4 H8 b# l. t- d2 t HPALETTE          hPal;% @5 u; G/ N! O7 J; u/ x+ t, c

/ q  V$ G/ l; R$ @/ ~ CWindowDC          dc( this );
; i, F& s- K5 C) k. `; _% q CPalette          pal;+ Y& e0 Y, f$ d( G% U/ o8 o6 H
//如果支持调色板的话，则建立它1 X" $ x) I+ Q; J% |/ {: e3 o
if( dc.GetDeviceCaps( RASTERCAPS ) & RC_PALETTE )
7 V7 t  q. d- u- {) \8 ]3 U {: B* M6 ?# R2 k, o4 G/ k5 }" Y
      UINT       nSize = sizeof(LOGPALETTE) + ( sizeof(PALETTEENTRY) * 256 );
3 ^, \* a+ j0 u$ $ g( f. ?       LOGPALETTE* pLP    = (LOGPALETTE*)new BYTE[nSize];
8 n% x; j7 [. D1 s1 L: P' X3 Z       pLP->palVersion    = 0x300;1 x( C, p, i0 A9 Z# @
      pLP->palNumEntries = (unsigned short)GetSystemPaletteEntries( dc, 0, 255, ' f- T/ q0 Z# ?4 T: P6 j
      pLP->palPalEntry );
9 B" R: Q8 L/ Z+ B5 o0 b( \5 e- Y, k& Y7 C: r
      pal.CreatePalette( pLP );
* I* C# z* ]" d" T6 G; U+ d7 q; G5 n3 _
7 l3 c5 ~2 G# t. m* d; M       //释放/ b' g7 \0 [) I7 \% e2 `
      delete[] pLP;' g; o, b! V9 j1 m( C
}
$ m7 K* t6 c+ D# W& {" v8 J; s% @- Q$ S+ l8 _. @! L
ASSERT( bitmap.GetSafeHandle() );
2 e! w3 D. ^) [4 I9 Q2 o( R6 N0 |. G$ z9 a2 s: f+ v

7 f, w5 e6 D) c! q+ ~' S //不支持BI_BITFIELDS类型
) q: O& R& L" F. \! x/ a; \ if( dwCompression == BI_BITFIELDS )- P, P6 ]: m9 ?
      return NULL;
8 {- |, H) @5 J2 l9 y/ _2 A$ i0 T, n/ h4 a) q
//如果调色板为空，则用默认调色板
hPal = (HPALETTE) pal.GetSafeHandle();
. o* c# J" l; q5 p! y if (hPal==NULL)
3 f8 j% g) g' ?  h6 g: l       hPal = (HPALETTE) GetStockObject(DEFAULT_PALETTE);: q2 Y3 e' ~% ]: K+ k9 H
# |% L) `" p% b8 n& _3 O) i
//获取位图信息
) q9 Q) R' C" Z0 ] bitmap.GetObject(sizeof(bm),(LPSTR)&bm);
; {+ G! M& ~- J: D0 B  r0 `1 O" S. D) l8 v" I  a4 K
//初始化位图信息头
! ^; ^: \  C& s# ~. j$ x1 e# N bi.biSize       = sizeof(BITMAPINFOHEADER);
/ {/ f0 w$ F' K" d5 |5 A+ F8 Y5 k bi.biWidth       = bm.bmWidth;5 Q. v% f9 D. J) Y- t, ?
bi.biHeight       = bm.bmHeight;
" |5 L0 h7 n# S0 M  X bi.biPlanes       = 1;3 K4 p  X$ t: @2 A8 F/ z
bi.biBitCount       = (unsigned short)(bm.bmPlanes * bm.bmBitsPixel) ;0 m' P5 W/ Z6 W* n7 ^
bi.biCompression = dwCompression;7 Z1 p0 C6 D0 ^
bi.biSizeImage       = 0;& C* E9 h* C# h( |, v: ^" k6 N
bi.biXPelsPerMeter = 0;
' C/ x3 S: G* ?+ s bi.biYPelsPerMeter = 0;/ m# Z! t' O, P7 k" T
bi.biClrUsed       = 0;: `9 `/ o9 e! K  c
bi.biClrImportant = 0;
9 z. d+ W( g8 P& l, j/ Q  P; n5 X  p% N
//计算信息头及颜色表大小8 p+ q* A1 }7 ~/ B/ P6 l9 W" z
int nColors = 0;, j. f9 E, j1 f* j* u0 O* j1 d
if(bi.biBitCount <= 8)! q1 I# C; ~1 |4 Z2 O( v+ m* Y/ C
      {
- m4 e+ c- ~7 N, s7 }# x0 g       nColors = (1 << bi.biBitCount);
- A' q" g. y1 ?' B8 Y3 p, I       }
$ R, I- N3 r4 V dwLen  = bi.biSize + nColors * sizeof(RGBQUAD);
* l9 a" A5 R+ j; E
% B/ V* l1 t6 b' U- t: x2 v hDC = ::GetDC(NULL);; k8 Y6 |! S8 J$ k# [9 d  P
hPal = SelectPalette(hDC,hPal,FALSE);
7 O5 O( C" c/ g) ^1 v1 f RealizePalette(hDC);& J5 H" H& U6 p+ b( h1 l

7 E7 c1 ?% H8 d! P //为信息头及颜色表分配内存) Y' P% b% s4 `$ }$ ~6 X
hDIB = GlobalAlloc(GMEM_FIXED,dwLen);
3 r1 |0 e( @3 q7 Z. R% d5 t if (!hDIB){$ @* Y. k# P! J4 b5 j* P
      SelectPalette(hDC,hPal,FALSE);* ^4 a0 ^" s$ G& R
      ::ReleaseDC(NULL,hDC);
1 H4 i% v$ o1 Q       return NULL;2 [$ R. }$ }% l
}: G' I! L- K; L$ k" X

1 B; Q/ s/ w' _* _/ A lpbi = (LPBITMAPINFOHEADER)GlobalLock(hDIB);, v: V( C( |; d
*lpbi = bi;: i* r) P0 r, L! r6 d$ @
0 Y5 H0 Y# U0 K+ |+ Y/ z- h
//调用 GetDIBits 计算图像大小
  p- ~# a$ U$ |* L  c# ^ GetDIBits(hDC, (HBITMAP)bitmap.GetSafeHandle(), 0L, (DWORD)bi.biHeight,: Z2 r  K! N* ]- h
         (LPBYTE)NULL, (LPBITMAPINFO)lpbi, (DWORD)DIB_RGB_COLORS);
- X9 @/ g4 k( J4 k8 B6 [1 i3 ]
$ j7 O( _' n- I2 o7 T bi = *lpbi;
" o# ^0 ^! A' L: K/ ]1 `4 Z; Y- L9 r0 Z8 M/ P0 D7 ]. S' [
//图像的每一行都对齐(32bit)边界
" ]0 G# V1 Y7 m( E5 ^* a if (bi.biSizeImage == 0){
- v. M) \$ T$ c" A' O& o! |       bi.biSizeImage = ((((bi.biWidth * bi.biBitCount) + 31) & ~31) / 8)
1 @9 A3 l+ l7 w" b3 l                      * bi.biHeight;6 ]+ I. U* [6 |- j
      if (dwCompression != BI_RGB)
3 G3 B% _6 \! x          bi.biSizeImage = (bi.biSizeImage * 3) / 2;" J% }9 H  \) V+ W5 Y
}9 Z, G0 \; W' `: P- A" F+ b( [
//重新分配内存大小，以便放下所有数据# I% H7 T. N. M4 A: z* _3 x/ h
dwLen += bi.biSizeImage;# `2 E" K& m6 N, Y6 A4 h" i
handle = GlobalReAlloc(hDIB, dwLen, GMEM_MOVEABLE) ;% x  u( N8 a3 J0 ]
if (handle != NULL)1 L; k- N0 o6 z. n7 {+ d+ I9 N
      hDIB = handle;$ t0 {: [1 S- @
else0 @+ b4 g0 Z" u
      {
! S# k3 s: z% L! ~* T9 l% N       GlobalFree(hDIB);8 m7 _0 Y( ~4 m/ I3 Q
6 g; C9 k" o& K( @( k/ n
      //重选原始调色板
) N0 w# [9 Y2 N9 k       SelectPalette(hDC,hPal,FALSE);
  p, c; p7 Q  t8 v2 a       ::ReleaseDC(NULL,hDC);; r( S! Z4 I+ b& n! I
      return NULL;
6 g  Q1 V* D, v% u4 W) N3 W1 g0 m       }
' u' Z( m' S" G: T  O //获取位图数据
8 g* Z6 B# \; M& e lpbi = (LPBITMAPINFOHEADER)hDIB;. u5 i' W( y$ i, t' L8 A; B" D) {
//最终获得的DIB" B+ s( F5 f; M& y
BOOL bGotBits = GetDIBits( hDC, (HBITMAP)bitmap.GetSafeHandle(),
8 d  {( B% W" }0 a7 }) O: F! Y             0L,                   //扫描行起始处8 i1 ]" ?7 ^- V- N* M* O% T
            (DWORD)bi.biHeight,    //扫描行数7 ?" a! q7 @7 M
            (LPBYTE)lpbi          //位图数据地址8 F% ^  K* U! D" S# h
            + (bi.biSize + nColors * sizeof(RGBQUAD)),
- a; b4 s. j# B, y, U             (LPBITMAPINFO)lpbi,    //位图信息地址& d# }9 p$ J) O( b8 ?% P! X# D$ ~& k
            (DWORD)DIB_RGB_COLORS);  //颜色板使用RGB
/ q! K. [: {0 w9 Y if( !bGotBits )
- x  \4 ^' V) Q) c8 a {. q" p3 l8 e+ q8 ]! p) \  X
      GlobalFree(hDIB);
2 C; V& C  O" R1 Q, ^, z) R       SelectPalette(hDC,hPal,FALSE);
2 ^6 r% I, W, K       ::ReleaseDC(NULL,hDC);
3 f2 T2 }# ]) j5 [       return NULL;$ W) o. W; m* G& q2 E4 p
}  n! H. T2 v+ Z
SelectPalette(hDC,hPal,FALSE);
; ]0 z. c  h( I" c3 N9 L ::ReleaseDC(NULL,hDC);
  P1 D8 K! P+ c return hDIB;
5 b" r: W$ h) t, `1 @2 G! M4 Q8 g}- i4 g. L' B, J3 ?' d2 |; B
, j- F( V1 O1 k' a: H

' }, K9 n# x5 H' s0 h+ z" }$ s//********************************************************************************
3 k  y' I8 u1 o- {* n( z8 C, z//* 名称：SaveBitmapToFile
! V. e% c1 J5 \' b//* 修改：徐景周(jingzhou_xu@163.net)8 s4 E$ K5 {: U, }
//* 功能：保存为位图文件, H- Z# p- ^# c$ X$ X3 E1 a- z2 ]
//********************************************************************************8 F! a# s$ Q4 E) f# T& X& [5 p1 z
BOOL CScreenSnapDlg::SaveBitmapToFile(HBITMAP hBitmap , CString lpFileName) ( P  \1 b: N6 s
{7 a" x6 d. a% A0 G
HDC             hDC;                         //设备描述表  5 Y. G- Q* F! ], ~" n
int             iBits;                         //当前显示分辨率下每个像素所占字节数
# t( c8 n6 }& T1 p1 K WORD          wBitCount;                      //位图中每个像素所占字节数
+ r3 G1 _& _6 v  Y8 u DWORD          dwPaletteSize=0,             //定义调色板大小，位图中像素字节大小，位图文件大小，写入文件字节数
4 f1 ]5 e* ^) t2 `8 R/ {2 i, f                   dwBmBitsSize,- x/ t8 \. t3 ?  h( j* O
                  dwDIBSize, dwWritten;9 s( K+ n6 R8 j* e  W
BITMAP       Bitmap;
2 i+ T& D: n- z* \ BITMAPFILEHEADER bmfHdr;                      //位图属性结构
. b. S# K1 b0 t$ o4 W; E8 e' X, z BITMAPINFOHEADER bi;                         //位图文件头结构    : s* A4 I7 N- {, a
LPBITMAPINFOHEADER lpbi;                      //位图信息头结构
" Q' {7 P* |( w, C" i+ O: `, V0 S# H* ^
HANDLE       fh, hDib, hPal,hOldPal=NULL; //指向位图信息头结构,定义文件，分配内存句柄，调色板句柄, o2 f) P3 s  I, S' F( ^! w( p, J
) m3 W3 \3 |5 o' M

1 L4 Z0 f) q! _3 _ //计算位图文件每个像素所占字节数
' R8 ]5 u* y' L hDC = CreateDC("DISPLAY",NULL,NULL,NULL);1 q, [: x# a- b5 G
iBits = GetDeviceCaps(hDC, BITSPIXEL) * 5 w  v/ g# d3 b6 {: @& j/ M
GetDeviceCaps(hDC, PLANES);4 y- S3 D+ P" w' J- k: N- o
DeleteDC(hDC);. {1 V  [8 Y) i6 c3 R( n# x8 Q
if (iBits <= 1)
6 W* B8 n. a5 D    wBitCount = 1;
5 r2 ~3 k0 y+ A' Y) h: Y else if (iBits <= 4)3 {  {" J$ m* K# p
   wBitCount = 4;
. M! U( G! o  g else if (iBits <= 8)2 P. F& `9 I6 N$ \" X4 {, B
   wBitCount = 8;  l& e. Y) G0 e  ~# p& W
else if (iBits <= 24)
+ ~! w$ ]4 a8 w; S    wBitCount = 24;- K% s" M4 n+ }1 C- `; M. R

& M3 I0 V7 j4 A6 ?4 c //计算调色板大小: D0 ?6 \8 N5 Y: ]) \
if (wBitCount <= 8)
# O! j0 j6 a" s- _    dwPaletteSize = (1 << wBitCount) *sizeof(RGBQUAD);% t" r& ]2 ^0 {! @

0 o! Y$ Y# |. |5 l6 k //设置位图信息头结构
+ y( O* F7 W. y! Z GetObject(hBitmap, sizeof(BITMAP), (LPSTR)&Bitmap);$ N$ ?! D/ l- f! z8 e9 J( u2 U
bi.biSize          = sizeof(BITMAPINFOHEADER);
* z9 M6 Z) s2 Z5 Z7 Z bi.biWidth          = Bitmap.bmWidth;
8 I3 K! ?6 G9 F! s4 k! } bi.biHeight       = Bitmap.bmHeight;6 T& e1 A) w$ Y. A: }- f2 y
bi.biPlanes       = 1;
3 R$ I/ U7 _8 c bi.biBitCount       = wBitCount;
  H1 x+ C) N4 S, t) \8 H6 k bi.biCompression    = BI_RGB;5 A! A5 \* I$ \0 x" J
bi.biSizeImage       = 0;, e7 p$ b2 i  s; ^3 h
bi.biXPelsPerMeter    = 0;% f/ X, ?) q& m$ t
bi.biYPelsPerMeter    = 0;: \& n7 I; {; S
bi.biClrUsed       = 0;
6 W6 j8 e7 q8 H2 d1 M8 f bi.biClrImportant    = 0;% G6 G. m4 X# ?: V
dwBmBitsSize = ((Bitmap.bmWidth *- M4 _: q. A8 K/ F2 ?- j. y! [
wBitCount+31)/32)* 4
' R: R& f3 I2 |1 Q' i    *Bitmap.bmHeight ;" Q' G- ~4 l) b

! p, z( q7 x# |5 L! C6 N" h, C) I3 L //为位图内容分配内存2 @* d2 t9 g  I. S3 H8 [: ]- U
hDib  = GlobalAlloc(GHND,dwBmBitsSize+! e! e% I+ F5 F& ^' D. [, N
dwPaletteSize+sizeof(BITMAPINFOHEADER));$ x$ r' t; s/ A3 [3 ^& }' {. Q
lpbi = (LPBITMAPINFOHEADER)GlobalLock(hDib);5 |3 t8 H4 X, n' Y
*lpbi = bi;
- j/ Y7 X. S1 }! v, T1 u
( [: S- S! z5 P, ]# N // 处理调色板 2 J5 w4 Z1 K2 k
hPal = GetStockObject(DEFAULT_PALETTE);" R% n& M- \# R
if (hPal)  b2 ]/ v# e4 f% h
{
4 x. b$ r( ]; ^. z4 w    hDC  = ::GetDC(NULL);
* M- u: G) x2 z" y    hOldPal = SelectPalette(hDC, (HPALETTE)hPal, FALSE);) K; D( Z0 ]! X0 ~  J
   RealizePalette(hDC);& f6 o, Z* G; ?
}  M7 ^* D: l1 Q
- [. B6 s* g3 k0 L- }3 ~
  // 获取该调色板下新的像素值# s  I: G/ n% g$ A
GetDIBits(hDC, hBitmap, 0, (UINT) Bitmap.bmHeight,& h1 ?; H1 O$ L8 w7 ^. O! o( l
   (LPSTR)lpbi + sizeof(BITMAPINFOHEADER)+dwPaletteSize,
6 H" E$ F2 S/ I, q( P: g    (LPBITMAPINFO)lpbi, DIB_RGB_COLORS);
# \. b2 ]5 q' a( n% ]
% U- k' i  ^& Y7 I: a  //恢复调色板 0 w9 i8 A9 I2 k  b6 l
if (hOldPal)' S$ z$ g) M' S8 s  }4 d
{. B. Q* ]% k" X, J; h. g% _" z4 q
   SelectPalette(hDC, (HPALETTE)hOldPal, TRUE);
/ R' y5 c! i8 v& j( I, A- t    RealizePalette(hDC);
! F  e2 r& R8 G' A* i/ P. K    ::ReleaseDC(NULL, hDC);9 J7 p( {# y) u: ]
}
* I3 M' Q8 s% M+ N- D4 n5 i  f* F, J
//创建位图文件 2 R/ ^6 d: a7 d% m9 y+ G3 w5 H9 N  t
fh = CreateFile(lpFileName, GENERIC_WRITE,
, t* f) U# p3 N% T6 y- v& {2 l       0, NULL, CREATE_ALWAYS,7 v) J; x9 p7 x* i
      FILE_ATTRIBUTE_NORMAL | FILE_FLAG_SEQUENTIAL_SCAN, NULL);/ ?2 v. g! O2 n
if (fh == INVALID_HANDLE_VALUE)
# z& H: ?0 ?9 I. n0 _" G- d+ ~    return FALSE;
' }" O7 n8 H2 o7 {0 B& r. C( T
/ Y- r* t* N1 H- i. ] // 设置位图文件头1 ^2 I% p  U# U, T, H& n
bmfHdr.bfType = 0x4D42;  // "BM"
/ r6 R2 L+ C3 m dwDIBSize = sizeof(BITMAPFILEHEADER) + sizeof(BITMAPINFOHEADER) + dwPaletteSize + dwBmBitsSize;  5 b; @9 f$ z3 Q- J& j( N
bmfHdr.bfSize = dwDIBSize;
/ o4 [) t% G  c7 I2 D5 M# K bmfHdr.bfReserved1 = 0;
, z3 ^" C4 K6 z$ n, M bmfHdr.bfReserved2 = 0;
$ K# c! r' ~, k# h bmfHdr.bfOffBits = (DWORD)sizeof(BITMAPFILEHEADER) - S0 e* D0 B' \6 g/ D
   + (DWORD)sizeof(BITMAPINFOHEADER)$ \# Q# I4 a3 Z2 k
   + dwPaletteSize;/ M+ E( Z) W0 K$ E9 J4 H& ?. S2 k
; a- d, P$ J3 J0 T0 \
1 f# p, B& _+ ~/ W2 O$ y
// 写入位图文件头
* z' {2 V" n" g+ F3 e WriteFile(fh, (LPSTR)&bmfHdr, sizeof
( T0 p7 P! T$ f5 {! M9 Y; s( G (BITMAPFILEHEADER), &dwWritten, NULL);1 U( K% m+ R+ M, `* `" B2 g5 m

+ h) @% P; k5 j // 写入位图文件其余内容3 m# Q' c" u* ^7 P
WriteFile(fh, (LPSTR)lpbi, dwDIBSize, * X' V5 c! Q% Y- w6 h
&dwWritten, NULL);9 B! c) Z+ Q/ O' l6 g* a4 _
4 J  l+ T: r6 {% t* L% E( b
//消除内存分配
2 G  v4 d& e7 I' C GlobalUnlock(hDib);" ^/ u$ E4 a3 ?6 f) B$ m! [
GlobalFree(hDib);& @1 Q5 o# R, d6 H* p& G
CloseHandle(fh);+ u4 ^' J* g0 q2 y" s6 z+ v

, i3 T4 S4 P: S; Q; C" x- O return TRUE;: _! }" n$ {; P( A
}
. [) ?5 {! g* I. `8 {" [+ p: H/ [/ m/ W9 P

2 J, I# I* V0 d' \* Z  C20. 如何获取局域网上计算机名及它们的IP地址
/ U2 w6 W2 D0 F" g# O' O# E6 R. l7 k7 }( s6 P% Y4 X+ y
l 连接ws2_32.lib和 mpr.lib库
; T) `& G  W- E3 F- N9 b+ w1 ?% g9 j1 \! f" N
l #include winsock2.h( Q+ V& X" o% N
- H* Z0 I5 R7 ~5 X
CString strTemp;
( r& R: ], R; u) L+ d# Z# estruct hostent *host;
8 Z" v3 d4 k' W5 n! A; V7 g5 I
& u3 d# z9 F$ M, Istruct in_addr *ptr; // 检索IP地址 ) e1 n6 S) ?  _1 l2 K
DWORD dwScope = RESOURCE_CONTEXT;
, W5 I( H: N& L) zNETRESOURCE *NetResource = NULL;3 m$ i1 d1 O4 [" o/ b/ ]
HANDLE hEnum;& k0 p/ B1 a; Z( L1 f7 k
WNetOpenEnum( dwScope, NULL, NULL,
$ Z9 D& j& s) o+ _( T( x, Q  v6 h* P          NULL, &hEnum );+ \' P+ L* C" h4 z8 y; t5 A

4 z7 O/ t( i& r% OWSADATA wsaData;* [! ?; B9 N6 |5 \+ N0 o& R2 |: v% u
WSAStartup(MAKEWORD(1,1),&wsaData);" v# I9 T: d- a) K

# M- ?4 @) m" C# w" sif ( hEnum )
' P9 _4 j# F8 M{- n( ^+ u" c( Z4 I0 A) G! N5 M
DWORD Count = 0xFFFFFFFF;
1 F0 x- ?. D, D  J- n9 ~ DWORD BufferSize = 2048;# B/ [, k' K; V/ u! R5 b
LPVOID Buffer = new char[2048];
1 a1 T1 [9 f; t1 I WNetEnumResource( hEnum, &Count,
, g! a/ s' X3 C       Buffer, &BufferSize );
$ f; M: X8 p9 f/ Y NetResource = (NETRESOURCE*)Buffer;
0 a6 t. t4 d( S# N3 ?! C# J6 ^' |8 l* W) c, u& P+ M1 ]7 l2 _9 N
char szHostName[200];
( s0 i1 N! Y& o$ \. R" H3 i  w, J unsigned int i;
% c% }. Z$ [3 P$ J  o5 _: y2 E( f! \0 w4 O9 O5 Z
for ( i = 0;
, E: q; s! J; F& w' U# ]       i < BufferSize/sizeof(NETRESOURCE);
) P* H( X' R; [4 d( L3 j       i++, NetResource++ )
8 |7 [9 ]; Y9 [ {2 I1 }3 V7 q% a
      if ( NetResource->dwUsage ==   _- H0 a. E) w9 W0 q
         RESOURCEUSAGE_CONTAINER && % \/ g( t9 Q" _( j" L
         NetResource->dwType == # j+ d! d& B3 d( I2 @3 t
         RESOURCETYPE_ANY ). `' v* ~) F: q- I3 l+ S$ Y; t% z
      {0 m0 ~0 L) ?& \; t  \
         if ( NetResource->lpRemoteName )) Y" g! p% f9 D) E
         {
! s3 C+ `2 u6 d0 y$ D             CString strFullName =
) t$ e: d( E% A. _% I6 O                   NetResource->lpRemoteName;
) S% v  o$ X- V             if ( 0 ==
. z- R( W  a" C, ?" s$ I' F                   strFullName.Left(2).Compare("\\\\") )
; Q6 }0 s8 e0 Q  I' M* M  [) r                   strFullName =
' x8 x9 z. d0 n0 S6 A% o/ b                      strFullName.Right(
7 m/ C+ d6 a& T( U' Y) ]% _& [                         strFullName.GetLength()-2);# _8 h% E% H/ W: w/ I% A$ ~

            gethostname( szHostName, % l/ Q$ q6 }1 R) o
                  strlen( szHostName ) );; T2 ~8 ~$ P) K. S- {5 E
            host = gethostbyname(strFullName);
; k' Z  Z2 T( Z; M, l' {8 o- D5 h8 |: L9 s
            if(host == NULL) continue; + M* y' J9 L4 H6 G6 d1 _- E6 H. b
            ptr = (struct in_addr *)
8 M1 @- |) \) x! B& `                   host->h_addr_list[0];                   ; r3 z! V- v: Y) V2 z6 M$ s

' S2 \/ u8 D: r$ {% f             // =. 分隔开IP:211.40.35.76.          ; p9 n$ ~8 v0 b
            int a = ptr->S_un.S_un_b.s_b1;  // 211
( q5 a2 N# b0 P7 K5 T1 G1 }, W, ?/ J             int b = ptr->S_un.S_un_b.s_b2;  // 401 ^0 e; {( ^6 d# c" B3 N8 X: k
            int c = ptr->S_un.S_un_b.s_b3;  // 35
& a, r' z$ n+ k) P             int d = ptr->S_un.S_un_b.s_b4;  // 76
8 i% I! |, U9 _0 X1 |# s, Z! f. o
- p! V4 G+ R3 ?5 [% N* K( P             strTemp.Format("%s -->  %d.%d.%d.%d",
, e/ p1 P0 T! O) l                   strFullName,a,b,c,d);2 I4 D4 Z. m9 `' f
            AfxMessageBox(strTemp);
  u& ^) B! X. S' X  c7 a8 n          }- Q+ l% P/ x% T
      }; Z! w- e% e+ b# S
}
2 q; j8 h5 Z4 J& H4 o- Y4 E' R
, X. L$ D4 O. S3 K# V* S delete Buffer;. G: F- U: q# z/ R) f( J
WNetCloseEnum( hEnum );   J. {0 V$ A& I- h
}
" J4 u" ~% P$ g' x. d& L- R3 `
# J# ]; d  j5 [1 r5 N7 I$ nWSACleanup();

		自动登录	找回密码
密码			注册

编程技巧20法(11-20)

浏览过的版块