Question

delphi 7的问题，button1按一下来判断edit1 这个框，如果符合的话，button1就暗掉不能再按（现在到这）

（需要做到的）edit1 这个输入框一改变，button1就得重新判断 不知道这问题够清楚不

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
begin
if 判断符合 then
begin
Button1.Enabled:= False;
end;
end;
procedure TForm1.Edit1Change(Sender: TObject);
begin
Button1.Enabled:= True;
end;