Question

将鼠标悬停在按钮上时，是否可以将网络图像用作光标？

我尝试过这样的事情：

tags$head(tags$style(HTML(" .custom {  cursor: url(https://c2.staticflickr.com/2/1907/31794847918_04f9e687e1_b.jpg), auto;
} ")))

这没有任何作用，我在网上找不到如何在R Shiny中进行管理的其他示例。

library(shiny)

ui  <- fluidPage(    
  actionButton(inputId = 'messagebutton', label = 'click me')
)

server <- function(input, output, session) {}

shinyApp(ui = ui, server = server)

Answer 1

这个例子对我有用。我认为您的图片无效，但是我不确定为什么会这样。可能太大了。

library(shiny)

csscode <- HTML("
#messagebutton {  
  cursor: url(http://www.javascriptkit.com/ajax.gif), auto;
}
")

ui  <- fluidPage(    
  tags$head(tags$style(csscode)),
  actionButton(inputId = 'messagebutton', label = 'click me')
)

server <- function(input, output, session) {}

shinyApp(ui = ui, server = server)

在R Shiny中将图像设置为光标

1 个答案: