使用 css 样式表更改 shinyalert 'OK' 按钮 (confirmButtonCol) 的颜色

Change the color of a shinyalert 'OK' button (confirmButtonCol) using a css stylesheet

我在 shinyalert() 中使用了 className = 'alert' 属性,这样我就可以在 CSS 样式表中格式化我的 shinyalerts。我可以更改整个模式的文本和背景颜色(例如 tags$style('.alert {background-color: blue}')),所以我知道设置 class 名称是有效的。我正在尝试更改 'OK' 按钮的颜色,但我不知道要使用什么 属性。我知道我可以在对 shinyalert() 的调用中使用 confirmButtonCol 设置按钮颜色,但如果可能的话我想使用样式表来完成它。

我的代码如下所示:

ui <- fluidPage(
  tags$style('.alert {*SOME_PROPERTY*: #2874A6;}'),
  actionButton('showalert', 'Show Alert'),
  shinyalert::useShinyalert()
)
server <- function(input, output, session) {
  observeEvent(input$showalert, {
     shinyalert::shinyalert(title = 'Alert', className = 'alert')
    })
}
shinyApp(ui = ui, server = server)

我想知道我可以用什么替换 SOME_PROPERTY

提前致谢!

因此 OK 按钮实际上具有 class 名称 confirm。当你 select 它与 CSS 时,只需将它添加在你的 class 名称之后,如 .alert .confirm {...}。另外,发现按钮颜色使用了行内样式,在所有CSS规则中优先级最高,所以需要强行覆盖为!important.

代码

library(shiny)
ui <- fluidPage(
    tags$style('.alert .confirm {background-color: #2874A6 !important;}'),
    actionButton('showalert', 'Show Alert'),
    shinyalert::useShinyalert()
)
server <- function(input, output, session) {
    observeEvent(input$showalert, {
        shinyalert::shinyalert(title = 'Alert', className = 'alert')
    })
}
shinyApp(ui = ui, server = server)