如何强制闪亮的输入大写

Question

我发现了一些 javascript 函数可以将输入文本转换为大写文本（此处和此处）。但我不确定如何将 javascript 函数应用于闪亮的输入。请参阅下面我提供的示例 selectizeInput 函数。

ui <- fluidPage(theme = "bootstrap.css",
                
                fluidRow(
                    column(6,
                           selectizeInput("input", "Input words here", 
                                          choices = NULL, 
                                          multiple = TRUE, 
                                          options = list(create = TRUE)),
                           column(6,
                                  textOutput("test"))
)
    )
        )

server <- function(input, output) {
    
output$test<-renderText({input$input})
    
}

Answer 1

TRUE您可以使用该选项的 JavaScript 函数来代替create，该函数会处理输入：

createOption <- "
function(input, callback) {
  var item = input.toUpperCase();
  callback({value: item, label: item});
}
"

ui <- fluidPage(
  theme = "bootstrap.css",
  
  fluidRow(
    column(6,
           selectizeInput(
             "input", "Input words here", 
             choices = NULL, 
             multiple = TRUE, 
             options = list(
               create = I(createOption)
             )
           )
    ),
    column(6,
           textOutput("test")
    )
  )
)