小编Teu*_*eun的帖子

在我的应用程序中,我正在使用IdHTTP.Get.代码的一部分:

var
  IdHTTP: TIdHTTP;
begin
  IdHTTP := TIdHTTP.Create(nil);
  Output := IdHTTP.Get(url);
  ...
  IdHTTP.Free;

使用IdHTTP.Version给我的版本:10.6.2.5263

我从这里下载了OpenSSL ,libeay32.dll和ssleay32.dll都在我的应用程序的同一个文件夹中.

这个问题发生在我使用Windows 10的新笔记本电脑后.我希望有人能告诉我如何解决这个问题!

在我的 Shiny 应用程序中，我想打开几个 URL，并且在打开之间有很短的延迟。下面是一些示例代码，当我在 RStudio 中运行该应用程序时，它们运行良好。

library(shiny)

URLs <- c("http://www.google.com", "http://www.stackoverflow.com")

ui <- fluidPage(
  actionButton(
    "click",
    "Click here to open several browser tabs"
  )
)

server <- function(input, output){
  observeEvent(input$click, {
    for (i in URLs){
      browseURL(i)
      Sys.sleep(1)                #Short delay of 1 second
    }
  })
}

shinyApp(ui, server)

然而，当我在shinyapps.io运行这个程序，browseURL()不工作（如提到这里）。

有谁知道如何打开多个浏览器选项卡，并在打开它们之间有很短的延迟，以便在应用程序部署在 Shinyapps.io 上时也能正常工作？使用 R 代码可能还是需要 JavaScript？