mfc怎样生成透明的窗体

Question

是用另一个位图屏蔽的，不是SetBKMode(),有一堆代码，

Answer 1

SetBkMode(hdc,TRANSPARENT);
or
dc.SetBkMode(TRANSPARENT);

Answer 2

现在有不少软件都采用了透明的窗口作为界面，如何在你的程序中实现呢？我发现在Win2k中提供了这种支持，只要简单的几行代码就可实现。(本例子目前只适用于Win2k )拿一个对话框为例：第一步 定义功能typedef BOOL (FAR PASCAL * FUNC1)(
  HWND hwnd,           // handle to the layered window
  COLORREF crKey,      // specifies the color key
  BYTE bAlpha,         // value for the blend function
  DWORD dwFlags        // action
);
第二步 实现代码在OnInitDialog中加入下列代码.....
 HMODULE hModule = GetModuleHandle("user32.dll");
 FUNC1 SetLayeredWindowAttributes;
 SetLayeredWindowAttributes =  (FUNC1) GetProcAddress (hModule, _T( "SetLayeredWindowAttributes" ) ); // 设置分层扩展标记
 SetWindowLong(GetSafeHwnd(), GWL_EXSTYLE, GetWindowLong(GetSafeHwnd(), GWL_EXSTYLE) | 0x80000L);
 // 70% alpha
 SetLayeredWindowAttributes(GetSafeHwnd(), 0, (255 * 70) / 100, 0x2);
工作完成，怎么样，现在你可以运行你的程序来查看效果，即使背景变化也能立刻反映到你的窗口当中，这一点比金山词霸的效果要好。 看到下面这段文章的人有福了，这是新加入的：第三步：如何除去透明选项？ // 除去分层扩展标记
SetWindowLong(GetSafeHwnd(),, GWL_EXSTYLE,
        GetWindowLong(GetSafeHwnd(), GWL_EXSTYLE) & ~ 0x80000L);
 // 重画窗口
RedrawWindow();第四部：VB的透明窗口(摘自MSDN)Private Declare Function GetWindowLong Lib "user32" Alias _
  "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLong Lib "user32" Alias _
  "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, _
  ByVal dwNewLong As Long) As Long
Private Declare Function SetLayeredWindowAttributes Lib "user32" _
  (ByVal hwnd As Long, ByVal crey As Byte, ByVal bAlpha As Byte, _
  ByVal dwFlags As Long) As LongPrivate Const GWL_EXSTYLE = (-20)
Private Const WS_EX_LAYERED = &H80000
Private Const WS_EX_TRANSPARENT = &H20&
Private Const LWA_ALPHA = &H2&Option ExplicitPrivate Sub Form_Load()
    Dim lOldStyle As Long
    Dim bTrans As Byte ' The level of transparency (0 - 255)    bTrans = 128
    lOldStyle = GetWindowLong(Me.hWnd, GWL_EXSTYLE)
    SetWindowLong Me.hWnd, GWL_EXSTYLE, lOldStyle Or WS_EX_LAYERED
     SetLayeredWindowAttributes Me.hWnd, 0, bTrans, LWA_ALPHA
End Sub 总算完整了一点。多谢观看。 作者:n6002

Answer 3

我用SDK实现的时候挺容易的，只要修改Create()里的style就可以了，但是在mfc下我不知道该把SetBkMode放在哪儿？有谁能说的具体一点吗？谢了！

Answer 4

我把我的程序放在了http://218.242.2.116/download/mone.zip
请帮我看看好吗？谢谢谢谢！

Answer 5

to luckbird(luckbird)
你的Create()里的style怎样修改？

Answer 6

转载：透明窗口的显示早就想写一篇我这方面的心得, 一直特忙没有空, 不过这次点名找我, 就不好再缩头缩脑了.
其实我也还有很多问题没有解决, 在这里也向高手请教.
此篇在V-Galaxy BBS发表, 如要转贴请和作者联系
[email protected]
1. Windows 2000 的GDI+扩充集
Windows 2000内部扩充了原有的GDI指令集, 将直接提供高效的图像处理指令如Alpha Blending等. 在Win2000里有一个专门的窗口风格WS_EX_LAYERED提供透明窗口的可能. Win2000还提供如AnimateWindow(...)一类的API, 直接支持窗口动画. 
有关连接
http://www.microsoft.com/hwdev/video/GDInext.htm
http://x.wonder.ca/stevex/nthack/
2. Win95/NT下的实现方法
既然Windows不提供现成的, 就只好自己做了. 原则上是这么过程:
a. 获取桌面的DC, 生成一个兼容的Bitmap, 送一个WM_PAINT消息, 把桌面取到Bitmap里. (就像一个Screen Capture)
b. 把自己要开的窗口画到另一幅Bitmap
c. 用这两幅图片做Alpha Blending, 或者其他效果, 生成第三幅图.
d. 最后再把图片BitBlt出来
说起来并不难, 但技术上有几个问题.
1. 如何把hidden的窗口拷贝到图像里?
原则上说, 是做不到的. 但在自己程序里可以做一些手脚. 我在SafeClean Utilities2里用的Wizard窗口, 就需要在显示之前获取图像, 再做处理. 我用的是WM_PRINT消息, 平时用的很少, 但可以把Z-Order低的窗口也拦截下来(hidden的还不行). 比如我要从第1页(p1)翻到第二页(p2), 我就得在显示新窗口之前, 把p1移到最上面, 再显示p2(被p1遮挡着), 向p2送WM_PRINT消息拦截图片, 再做动画, 关闭p1.
2. WM_PRINT的问题
WM_PRINT其实和WM_PAINT差不多, 但可以拦截被其他窗口遮住的部分. 但不是所有窗口都支持WM_PRINT, 比如Static control, 只能自己在Bitmap里把他们画上.
3. 如何把程序下面的窗口储存在Bitmap里?
要想实现真正的象Win2000的Transparent Window, 就必须得把自己程序下面的窗口存在图片里. 能否实现我也不清楚.
我用的技术其实只适合做Splash Window和象金山词霸那样静态的透明窗口.我用的代码列在下面, 因为涉及到一些其他类, 分布在不同地方, 所以并不完整. 仅供参考. 关于使用Alpha Blending, 可以参看www.codeguru.com的Bitmap部分, 有很好的代码. 这段时间实在很忙, 学校又要开始考试, 只是粗略介绍, 请大家谅解.int CFadeWindow::FadeAndSwitchWindow(CWnd* pWndFrom, CWnd* pWndTo)
{
CWnd* pDesktop = CWnd::GetDesktopWindow();
CWnd* pMain = AfxGetMainWnd();
CClientDC dc(pMain);
CRect rc;
pWndFrom->GetWindowRect(rc);
pMain->ScreenToClient(rc);
CDC *pDCFrom;
pDCFrom=pWndFrom->GetDC ();
m_dib1.PasteDC ( pDCFrom, 0, 0, rc.Width(), rc.Height());
m_dib3.PasteDC ( pDCFrom, 0, 0, rc.Width(), rc.Height());
pWndFrom->ReleaseDC ( pDCFrom );
CClientDC dcWndTo(pWndTo);
CDC dcTo;
dcTo.CreateCompatibleDC(&dcWndTo);
CBitmap bmpTo;
bmpTo.CreateCompatibleBitmap(&dcWndTo, rc.Width(), rc.Height());
CBitmap * pOldbmp = dcTo.SelectObject(&bmpTo);
SetWindowPos(pWndFrom->GetSafeHwnd(), HWND_TOP, 0,0,0,0,SWP_NOSIZE|SWP_NOMOVE);
pWndTo->ShowWindow(SW_SHOW);
pWndTo->SendMessage(WM_PRINT, (WPARAM) dcTo.GetSafeHdc(), (LPARAM) PRF_CLIENT|PRF_CHILDREN|PRF_OWNED);
m_dib2.PasteDC ( &dcTo, 0, 0, rc.Width(), rc.Height());
dcTo.SelectObject(pOldbmp);
SetWindowPos(pWndTo->GetSafeHwnd(), HWND_TOP, 0,0,0,0,SWP_NOSIZE|SWP_NOMOVE|SWP_NOREDRAW|SWP_SHOWWINDOW);
SetWindowPos(pWndFrom->GetSafeHwnd(), NULL, 0,0,0,0,SWP_NOSIZE|SWP_NOMOVE|SWP_NOREDRAW|SWP_NOZORDER|SWP_HIDEWINDOW);
int index = 5;
for (int i=0; i {
m_dib3.Paste(&m_dib1);
m_dib3.Blend(&m_dib2, i*256/index);
m_draw.DrawDib ( &m_dib3, dc.GetSafeHdc(), rc.left, rc.top,
rc.Width(), rc.Height(), DDF_HALFTONE );
Sleep(10);
}
m_draw.DrawDib ( &m_dib2, dc.GetSafeHdc(), rc.left, rc.top,
rc.Width(), rc.Height(), DDF_HALFTONE );
return 1;
}不过，我没有试过...

Answer 7

用的着这么复杂？？？？？？？？哎！
在onpaint里夹上一句：
SendMessage(WM_ICONERASEBKGND, (WPARAM) dc.GetSafeHdc(), 0);
呵呵，一切搞定，哎，大家把问题搞得那么复杂

Answer 8

楼上这位说的办法好象行不通，不知道是在什么样的环境下，是不是对话框模式？可是对话框模式我也试过了，也不行，不知道是什么地方弄错了。我是这样实现的：   环境：VC6.0+SP5+WIN98SE
         单文档，没有工具栏和状态栏。   目的：实现全透明窗口   步骤：
        1、在应用程序类的成员函数InitInstance()中添加以下代码        //修改窗体的风格和扩展风格，
SetWindowLong(m_pMainWnd->m_hWnd,GWL_STYLE,WS_OVERLAPPED|WS_BORDER|WS_THICKFRAME);
SetWindowLong(m_pMainWnd->m_hWnd,GWL_EXSTYLE,WS_EX_TRANSPARENT); //修改标题栏的文字
m_pMainWnd->SetWindowText(NULL);

//修改菜单
SetMenu(m_pMainWnd->m_hWnd,NULL);        //显示窗口
m_pMainWnd->ShowWindow(SW_SHOW); //设置窗口的位置，请记住一定要让窗口挪动一个位置，不然会有标题栏出现
m_pMainWnd->SetWindowPos(&CWnd::wndTopMost,20,160,600,350,SWP_SHOWWINDOW); m_pMainWnd->UpdateWindow();

2、在ClassWizard中为视图类添加WM_ERASEBKGND消息处理函数，写成下面这个样子：

BOOL CMONEView::OnEraseBkgnd(CDC* pDC) 
{
// TODO: Add your message handler code here and/or call default

pDC->SetBkMode(TRANSPARENT);
return TRUE;
}

这样一个透明窗口就实现了，不过还不是很完善，比如不能显示边框，我也不知为什么，正在研究。