запросить произвольный html-элемент, например, чтобы узнать, не отключен ли он, с глянцевым

Может ли поступитьтоникс что-то вроде if(is_disabled("#my_element_id")) do_something() ? Я хотел бы иметь возможность увидеть, отключен ли определенный элемент HTML (глянцевым или другим способом), прежде чем делать с ним что-то еще.

Всего 1 ответ


Там нет такой функции. Ответ зависит от того, что вы хотите именно. Вот что может помочь:

library(shiny)
library(shinyjs)

jsCode <- 'shinyjs.isDisabled = function(params) {
  var el = $("#radiobtns");
  Shiny.setInputValue("disabled", el.prop("disabled"));
}' 

ui <- fluidPage(
  useShinyjs(),
  extendShinyjs(text = jsCode, functions = "isDisabled"),
  actionButton("button", "Disable radio buttons"),
  radioButtons("radiobtns", "Radio buttons", c("Yes", "No"))
)

server <- function(input, output) {

  observeEvent(input$button, {
    toggleState("radiobtns")
    js$isDisabled()
  })

  observeEvent(input$disabled, {
    if(input$disabled){
      cat("disabled
")
    }else{
      cat("enabled
")
    }
  })

}

shinyApp(ui = ui, server = server)

Есть идеи?

10000