防止用户取消选择 selectizeInput 中的选项

Question

selectizeInput的默认行为允许用户单击一个选项并通过按Backspace或Delete键将其删除。

有什么办法可以禁用这种行为吗？.

我有一个应用程序，允许用户通过“添加”和“删除”操作按钮从

selectizeInput

添加和删除分组。我不希望用户使用

selectizeInput

小部件删除选择，而是使用“删除”操作按钮。

Answer 1

是的，使用

onDelete

事件和

return false

:

library(shiny)

ui <- fluidPage(
  selectizeInput(
    inputId = 'selInput',
    label = 'No deletion',
    choices = state.name,
    multiple = TRUE,
    options = list(onDelete = I("function(value) {return false;}"))
  )
)

shinyApp(ui, \(...) {
})