VB中的按钮可以改变底色，请问Delphi中的按钮能否实现这样的功能？(50分)

叮

叮叮当当

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-16

• #1

VB中的按钮可以改变底色，请问Delphi中的按钮能否实现这样的功能？

 

B

beta

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-16

• #2

自己画呗

 

叮

叮叮当当

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-16

• #3

To: beta
废话少说，给个TButton的实现例子先。

 

C

chemer

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-16

• #4

用panel
procedure TForm1.Panel1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
panel1.Bevelouter:=bvlowered;
end;

procedure TForm1.Panel1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
panel1.Bevelouter:=bvRaised;
end;

 

叮

叮叮当当

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-16

• #5

chemer的方法不错！还有别的意见么？

 

C

chemer

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-16

• #6

自己找找其他控件，很多的。可以分析一下源码，修改现有的Button，使其拥有Color属性。

 

B

beta

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-16

• #7

FlatStyle 里面的 TFlatButton 不是现成的例子吗？

 

Q

qdyoung

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-16

• #8

用TBitBtin就是，不用TButton

-----
http://www.8421.org

 

H

hamsoft

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-16

• #9

很多！

 

叮

叮叮当当

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-16

• #10

TBitButton不行的，好了，就采用chemer的办法吧。