如何改变选择下拉闪亮的高度?

时间:2014-12-11 09:25:30

标签: r shiny selectize.js

我想更改闪亮应用中选择下拉列表的高度。默认高度显示大约8个选项,我想看到更多。可以通过降低下拉线的行高来增加选项的数量,但这对我来说不是最佳解决方案。我搜索了很多关于如何做到这一点,查看了selectize.js代码,我目前的假设是,这是微不足道的,或者不可能通过设计。

我所学到的是,select中显示的下拉列表是.selectize-dropdown-content类的div,但更改其高度和宽度属性不会改变任何内容。虽然可以改变背景颜色。这是我的单个文件闪亮的应用程序代码:

server <- function(input, output) {
    output$distPlot <- renderPlot({
        plot(0.5,0.5,xlim=c(0,1),ylim=c(0,1))
        text(0.5,0.5,input$Letter)
  })
}

ui <- shinyUI(fluidPage(
  sidebarLayout(
    sidebarPanel(
        selectizeInput("Letter", "", setNames(letters,letters),selected="a",multiple=FALSE),       
        tags$style(type='text/css',
                   ".selectize-dropdown-content {
height: 600 px;
width: 700 px;
background-color: #b0c4de;
}")
    ),
    mainPanel(plotOutput("distPlot"))
  )
))

shinyApp(ui = ui, server = server)

所以我的问题是,我是否正在修改正确元素的css,或者是否在selectize.js中更改下拉高度?

1 个答案:

答案 0 :(得分:11)

在发布问题几分钟后得到解决方案。选择下拉列表的高度由max-height属性控制。以下css可以解决问题:

tags$style(type='text/css', ".selectize-dropdown-content {max-height: 400px; }"),