TNMHTTP控件问题谁知道请帮忙!

Question

出错信息:Project pingtst.exe raised exception class ESockError with
message 'Already Connected'. process stopped. 
源程序如下:       NMHTTP1.InputFileMode := FALSE;
       NMHTTP1.OutputFileMode := FALSE;
       NMHTTP1.ReportLevel := Status_Basic;
        NMHTTP1.Get(HostAddress);
          PageCode := NMHTTP1.body;
          if PageCode <> '' then
            begin
              if( Pos(KeyWord,PageCode) >0 ) then
                begin
                  result := true;
                  exit;
                end;
            end;
    except
    end;