most of the students:DELPHI中如何激活组件

来源:百度文库 编辑:高校问答 时间:2024/04/30 00:37:16
当文本EDIT内容为空时,BUTTON的ENABIED属性为FALSE,如果EDIT幽雅内容则BUTTON为TRUE,这样的代码怎么写呢

给Edit添加一个OnChange事件处理, 在其中加入如下代码:

Button.Enabled := Edit.Text <> '';

就可以了.

if edit.text='' then button.enable=true
else button.enable=true

if edit.text='' then
button.enable:=true
else
button.enable:=true;
注意看,有点区别的

1 在文本框的onchange事件中加入
if edit1.Text<>'' then
button1.Enabled:=true
else
button1.Enabled:=false;