调用另一窗体上的button事件问题

Question

procedure TForm1.Button1Click(Sender: TObject);
begin
 if form3.Timer1.Enabled=false then
 form3.Button1Click(self);//请问这里为什么不起作用? 要按二次button1才能被触发为什么?
end;procedure TForm3.Button1Click(Sender: TObject);
begin
  timeleft:=3;
  timer1.Enabled:=true;
end;

Answer 1

因为你的form3.Timer1默认设为了Enabled=true

Answer 2

我设的是false啊,定义的函数也不行
function Tform3.click:string;
begin
  form3.timeleft:=3;
  form3.Timer1.Enabled:=true;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
  from3.click;
end;

Answer 3

你回答正确！！应该是：procedure TForm3.FormCreate(Sender: TObject);
begin
  timer1.Enabled:=false;
  timer1.Interval:=1000;
end;