C cachen1 Unregistered / Unconfirmed GUEST, unregistred user! 2001-03-13 #1 一直想做一个透明的BitBtn,就是位图按纽了,不过它的背景和周围的图案融合。 和ToolButton一样的东西。
C Chenlili Unregistered / Unconfirmed GUEST, unregistred user! 2001-03-14 #3 你可以去www.csdn.net/dev/delphi找一个类似notron2000的控件
Z zhangkan Unregistered / Unconfirmed GUEST, unregistred user! 2001-03-14 #4 你看看TSpeedButton就行吧。自己去看看源代码,再改一改不就是啦。
H htw Unregistered / Unconfirmed GUEST, unregistred user! 2001-03-14 #5 程序员大本营2000荟萃版光盘中有好多个,不必做的 www.csdn.net/dev/delphi 中在控件中的按钮中找outlbtn.zip
D Diana Unregistered / Unconfirmed GUEST, unregistred user! 2001-03-24 #6 procedure YourBitbtn.Paint; begin Canvas.Brush.Style:=bsClear;//透明效果 DrawShape;//绘制按扭外观; end;
H htw Unregistered / Unconfirmed GUEST, unregistred user! 2001-05-16 #7 http://www.ue100.com/GRZY/cjsoftware/Downloads.htm上有一个 TransBtn:一个很老的控件,透明按钮,我很喜欢,有源代码. 这个比TransBtn好
F fineboy Unregistered / Unconfirmed GUEST, unregistred user! 2001-05-28 #9 TSpeedButton 改 Float;=true; Caption;='xxx'
风 风中流云 Unregistered / Unconfirmed GUEST, unregistred user! 2001-12-29 #10 procedure TForm1.FormCreate(Sender: TObject); begin bitbtn1.Brush.style := bsclear; bitbtn1.handleneeded; setwindowlong(bitbtn1.handle, GWL_EXSTYLE, WS_EX_TRANSPARENT ); end;
procedure TForm1.FormCreate(Sender: TObject); begin bitbtn1.Brush.style := bsclear; bitbtn1.handleneeded; setwindowlong(bitbtn1.handle, GWL_EXSTYLE, WS_EX_TRANSPARENT ); end;