您所在位置：主题：BitBtn组件问题请教
daixueqiong
[专家分：0] 发布于 2006-07-03 10:42:00
本人是新手，在一个登录问题时，这样设置的，在窗体上添加了两个Edit组建和一个Bitbtn组件,首先的时候把Bitbtn组件的Enabled属性设置成false;现想要达到在Eidt1和Edit2 的内容不为空时,即能实现Bitbtn的属性变为True,添加了如下语句,却没能达到效果
procedure TForm1.Edit1Change(Sender: TObject);
begin
if (Trim(Edit1.Text)<>'') and (Trim(Edit2.Text)<>'') then
BitBtn1.Enabled:=True;
end;
想请教各位高手问题出在哪里?
procedure TForm1.Edit1Change(Sender: TObject);
begin
if (Trim(Edit1.Text)<>'') and (Trim(Edit2.Text)<>'') then
BitBtn1.Enabled:=True;
end;
想请教各位高手问题出在哪里?
