谁有办法改过来吗,谢谢

Question

button3,变为灰色，要点击button2和button1,button3才恢复可按的颜色，
这样写错了吗
begin
if button1.click and button2.click then
button3.enable=true;
end

Answer 1

enable错了。应该是button3.enabled=true；

Answer 2

procedure TForm1.FormCreate(Sender:TObject);
begin
  Button3.Tag:=0;
end;
procedure TForm1.Button2Click(Sender:TObject);
begin
  Inc(Button3.Tag);
  if Button3.Tag>1 then  
     Button3.Enabled:=True;
end;
procedure TForm1.Button1Click(Sender:TObject);
begin
  Inc(Button3.Tag);
  if Button3.Tag>1 then  
     Button3.Enabled:=True;
end;

Answer 3

procedure TForm1.FormCreate(Sender:TObject);
begin
  Button1.Tag:=0;
  Button2.Tag:=0;
end;
procedure TForm1.Button2Click(Sender:TObject);
begin
  Inc(Button2.Tag);
  if Button1.Tag>=1 then  
     Button3.Enabled:=True;
end;
procedure TForm1.Button1Click(Sender:TObject);
begin
  Inc(Button1.Tag);
  if Button2.Tag>=1 then  
     Button3.Enabled:=True;
end;

Answer 4

不行呀
to hiflower(花)
error: left side cannot be assigned to

Answer 5

procedure TForm1.FormCreate(Sender:TObject);
begin
  Button1.Tag:=0;
  Button2.Tag:=0;
end;
procedure TForm1.Button2Click(Sender:TObject);
begin
  Button2.Tag:=1;
  if Button1.Tag=1 then
     Button3.Enabled:=True;
end;
procedure TForm1.Button1Click(Sender:TObject);
begin
  Button1.Tag:=1;
  if Button2.Tag=1 then
     Button3.Enabled:=True;
end;

Answer 6

procedure TForm1.button3click(sender: TObject);
begin
  button1.tag := 0;
  button2.tag := 0;
end;