没有源代码的情况强制性地使一个可执行程序的界面透明?(200分)

  • 主题发起人 主题发起人 devuser
  • 开始时间 开始时间
D

devuser

Unregistered / Unconfirmed
GUEST, unregistred user!
很多广告软件在左面上运行很讨厌,但是我想挣钱,能不能使他们透明
 
当然可以,我写了一个清除OICQ广告的小东西,不知道你是不是这意思?
 
to Fox_110:
; ;如何搞搞?很感兴趣耶!
 
Fox_110:能不能给我发一个?

yanzi_wy@china.com
 
我猜大概是HOOK的干活。
恐怕这是WindowsBlind的核心技术。
 
没意思
拿vc过来直接该就行了
 
to Fox_110:
; ;贴出来,让大家想你学习学习好不好?代表想知道的人说声谢谢!
 
我也想知道。
 
如果你用的是WIN2K,那就很简单:
const
; WS_EX_LAYERED = $80000;
; WS_EX_TRANSPARENT = $20;
; LWA_ALPHA = $2;

var
; bTrans: Byte;
begin
; //HWnd就是你要设置的窗口的Handle.
; //当然要用FindWindow等函数找到你要隐藏窗口的Handle啦。
; SetWindowLong(HWnd, GWL_EXSTYLE, GetWindowLong(HWnd, GWL_EXSTYLE) or WS_EX_LAYERED or WS_EX_TRANSPARENT);
; //注意如果设置了WS_EX_TRANSPARENT,那这个窗口就不受你控制了[:D]
; bTrans := 100; //透明度
; SetLayeredWindowAttributes(HWnd, 0, bTrans, LWA_ALPHA); //设置为透明

WIN2K, Delphi5,6上测试通过。可以设置任意窗口的透明度。
 
接受答案了.
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
1K
DelphiTeacher的专栏
D
I
回复
0
查看
786
import
I
后退
顶部