在非套接字错误，Delphi上中断系统调用和套接字操作

Question

我使用TidHttp组件将太多文件上传到服务器，但是当应用程序上传文件时，这个错误会提交给我！

套接字错误＃10004 中断系统调用和

套接字错误＃10038 非套接字上的套接字操作。

老实说，我不知道这个错误意味着什么!!

这是我上传文件的代码！

procedure TForm1.Button1Click(Sender: TObject);
var
  StreamFiles: TIdMultiPartFormDataStream;
  path : string;
begin
  StreamFiles := TIdMultiPartFormDataStream.Create;
  path :=  'D:\example.doc' ;
  try
    StreamFiles.AddFile('upload_file', path, 'text/plain');
    try
    IdHTTP1.Post('http://myserver.com/upload/files', StreamFiles);
    except
     on E: Exception do
       ShowMessage('Error encountered during POST: ' + E.Message);
    end;
  finally
    StreamFiles.Free;
  end;
end;