当鼠标悬停在按钮上时,有没有一种方法可以使用Web图像作为光标?
我试过这样的方法:
tags$head(tags$style(HTML(" .custom { cursor: url(https://c2.staticflickr.com/2/1907/31794847918_04f9e687e1_b.jpg), auto; } ")))
这没有任何影响,我在网上也找不到任何其他的例子来说明如何在r-shining中管理它。
library(shiny) ui <- fluidPage( actionButton(inputId = 'messagebutton', label = 'click me') ) server <- function(input, output, session) {} shinyApp(ui = ui, server = server)
这个例子对我很有用。我觉得你的形象不好用,但我不知道为什么。可能太大了。
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)