怎么样使按钮不可用呢？(0分)

N

njskinglc

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-03

• #1

我想在界面上放一个按钮，当我按这个按钮的时候，界面上我指定的
组件不可用，我再按一次的时候，就可用了，怎么样可以实现呢？
比如有BUTTON1，2，3，我按一次1，2，3 不可用，再按一次1，则2，3 可用，再按一次1，
则2， 3 又不可用，类推。。。。

 

B

Babylon5

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-03

• #2

设置按钮的 Enabled 属性即可

 

J

junf_chen

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-03

• #3

button1.enabled:=false;

 

B

breezee

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-03

• #4

button1.click
begin
button2.enabled:=not button2.enabled;
button3.enabled:=not button3.enabled;
end;

 

C

Cut.fei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-03

• #5

Button2.Enabled := False;
Button3.Enabled := False;
procedure TForm1.Button1Click(Sender: TObject);
begin
Button2.Enabled := not Button1.Enabled;
Button3.Enabled := not Button1.Enabled;
end;

 

S

smallhand

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-03

• #6

1、对于不可用组件
procedure TForm1.Button1Click(Sender: TObject);
begin
Button2.Enabled := not Button2.Enabled;
end;
2、使其他组件不可用
procedure TForm1.Button1Click(Sender: TObject);
begin
Button2.Enabled := not Button2.Enabled;
Button3.Enabled := not Button2.Enabled;
Button4.Enabled := not Button2.Enabled;
end;

 

9

999roseto347

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-03

• #7

兄弟：
　　楼上几位说的方法已经是可以的了！如果你觉得一个个控件控制太麻烦，你可以把同时有
用（同时不可用）的控件放在一个pane上面或其他的什么容器。然后设那个容器的有用（不可
用）就可以了！别再提前了，浪费大侠们的眼神！（声明一下：我不是大侠）