D
delphiere
Unregistered / Unconfirmed
GUEST, unregistred user!
一个button,一个edit.请教一下,当在edit中输入内容的时候,button才没有变灰呢?
其实我要的结果就好象我们经常按ctrl+F调用查找对话框那样子,edit没有输入button永远是灰的
为什么我这样
procedure TForm1.Edit1Enter(Sender: TObject);
begin
if edit1.text<>'' then
button1.Enabled:=true
else
button1.Enabled :=false;
end;
这样不行呢?
其实我要的结果就好象我们经常按ctrl+F调用查找对话框那样子,edit没有输入button永远是灰的
为什么我这样
procedure TForm1.Edit1Enter(Sender: TObject);
begin
if edit1.text<>'' then
button1.Enabled:=true
else
button1.Enabled :=false;
end;
这样不行呢?