在win98下如何实现透明窗口效果？

[斐偲]

现有的资料都是在win2000下用api函数实现的。但在98下怎么办？

[insert2003]

procedure TForm1.CreateWnd;
begin
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, 100, LWA_ALPHA or LWA_COLORKEY);
end;


你试试，没在98下用过，2000是可以的

[thunderniao]

form.alphablend：=true;
form.alphablendvalue：=***;
好象就可以调透明度

[dickcissel]

顶一下，关注！

[斐偲]

xp里这两种方法都行，但98里就都不行了，

[大北北]

第三方控件吧！