如何在一个已显示出的位图文件上加入文本文件？？

[qbql]

如题

[wrcluomo]

抢分：
HDC hDC = NULL, hSourceDC;
HBITMAP hSourceBitmap;
DWORD dwSourceBitsSize;

LPBITMAPINFO lpSrcDIB = (LPBITMAPINFO)lpDIB;
hDC = ::GetDC(NULL);
hSourceBitmap = CreateDIBSection( hDC, lpSrcDIB, 0, &m_lpSourceBits, NULL, 0 );
hSourceDC = CreateCompatibleDC( hDC );
dwSourceBitsSize = lpSrcDIB->bmiHeader.biHeight *WIDTHBYTES(((LPBITMAPINFOHEADER)lpDIB)->biWidth * ((LPBITMAPINFOHEADER)lpDIB)->biPlanes * ((LPBITMAPINFOHEADER)lpDIB)->biBitCount);
memcpy( m_lpSourceBits, ::FindDIBBits(lpDIB), dwSourceBitsSize );
m_pMemDC = new CDC;
m_pMemDC->CreateCompatibleDC(NULL);
m_hOldSourceBitmap=(HBITMAP) m_pMemDC->SelectObject(hSourceBitmap);
DeleteDC( hSourceDC );
::ReleaseDC( NULL,hDC );
int OldBKMode=m_pMemDC->SetBkMode(TRANSPARENT);
CPen pen,*OldPen;
pen.CreatePen(0,PenWidth,m_PenColor);
OldPen=(CPen *)m_pMemDC->SelectObject(pen);
COLORREF OldColor=m_pMemDC->SetTextColor(m_PenColor);


m_pMemDC->TextOut( TextX,TextY, strMessage);



dwSourceBitsSize = lpSrcDIB->bmiHeader.biHeight *WIDTHBYTES(((LPBITMAPINFOHEADER)lpDIB)->biWidth * ((LPBITMAPINFOHEADER)lpDIB)->biPlanes * ((LPBITMAPINFOHEADER)lpDIB)->biBitCount);
memcpy( ::FindDIBBits(lpDIB),m_lpSourceBits,dwSourceBitsSize);

[yifeng_ch]

大侠能否给出完整的代码，急谢谢先。