一个关于NMHTTP的小问题

Question

按扭一的功能
procedure TForm1.Button1Click(Sender: TObject);
begin
  NMHTTP1.Get('www.tom.com');
  memo1.Text:=NMHTTP1.Header;//得到header部分
  try
    NMHTTP1.Free;//这里我将NMHTTP对象释放了
  except
    showmessage('释放NMHTTP1出错!');
  end;
end;
按扭二的功能
procedure TForm1.Button3Click(Sender: TObject);
begin
  try
    NMHTTP1:=TNMHTTP.Create(form1);//创建NMHTTP1
  except
    showmessage('创建NMHTTP1出错!');
  end;
    NMHTTP1.Get('www.tom.com');      
    memo2.Text:=NMHTTP1.Body;//显示body中的内容
end;以上2个功能都能够正确实现，但是为什么下面这个事件按下button1有反应
而按下button2却没有反应呢？
procedure TForm1.NMHTTP1Connect(Sender: TObject);
begin
  showmessage('连接已经建立!');
end;