如何制作鼠标穿透的界面？

Question

请问：怎样才能制作鼠标穿透的界面？本人刚学习Delphi7不久，请各位高手相助！多谢！

Answer 1

我查了以前的帖子，有人问过了。
用：
inherited CreateWnd;
  SetWindowLong(Handle, GWL_EXSTYLE, GetWindowLong(Handle, GWL_EXSTYLE) or
    WS_EX_LTRREADING or
    WS_EX_TRANSPARENT or
    WS_EX_TOPMOST or
    WS_EX_TOOLWINDOW or
    WS_EX_LAYERED);
  SetLayeredWindowAttributes(Handle, Color, 150, LWA_ALPHA or LWA_COLORKEY);可以实现。但是我试用后，在关闭窗口时总是出现异常，请问这是什么原因引起的？
有人知道吗？
请帮我，多谢！

Answer 2

问题点数：  0  >>>飘过　飘过　我什么都没看到~~~