我有一个带有selectizeInput的闪亮应用,这是一个例子:
library(shiny)
ui <- fluidPage(
theme = "bootstrap.css", # load css-settings
br(),
selectizeInput('in1', 'Options', c(Choose='', state.name))
)
server <- function(input, output,session) {}
shinyApp(ui = ui, server = server)
在我的bootstrap.css文件中(放在文件夹www中)我添加了下面的
.selectize-input.focus {
border-color: #cccccc;
-webkit-box-shadow: none;
box-shadow: none;
outline: none;
}
删除selectizeInput框周围的蓝色阴影。然而,没有任何反应......有人知道帮助吗?
答案 0 :(得分:0)
On Shiny有以下课程:
.selectize-input.focus {
border-color: #66afe9;
outline: 0;
-webkit-box-shadow: inset 0 1px 1px rgba(0,0,0,.075), 0 0 8px rgba(102, 175, 233, 0.6);
box-shadow: inset 0 1px 1px rgba(0,0,0,.075), 0 0 8px rgba(102, 175, 233, 0.6);
}
因此,要删除阴影,您可以使用以下内容:
.selectize-input.focus {
border-color:#66afe9;
outline: 0;
-webkit-box-shadow:none !important;
box-shadow:none !important;
}
确保CSS包含在Shiny的CSS之后。