光沢のあるウィジェットでカーソルを移動中

Question

光沢のあるアプリで単純なスライダーバーを使用して値の範囲を定義しています。スライダーバーの青い領域を保持することで、開始値と終了値を個別に変更することなく範囲を非常に有効にスライドできることに気付きました。しかし、私がこの機能を実装したとき、ユーザーはこの機能が明白ではないと不平を言う。

この機能をより明確にするために、カーソルが青い領域の上を移動するときに、カーソルを「移動」シンボルe.g.に変更したいと思います。

変更する簡単なコードを次に示します。

library(shiny) 
ui <- fluidPage(
    sliderInput(inputId = 'slider1', 
       label = 'slider input', 
       min = 0, max =100, 
       value = c(10,90) 
      ) 
) 
server <- function(input, output) { 
} 
shinyApp(ui = ui, server = server) 

Answer 1

私はあなたがこれを行うことはできません。

library(shiny) 
ui <- fluidPage(
    tags$style(
    '#test { 
    cursor: crosshair; 
    color: red; 
    }' 
), 

    div(id="test",sliderInput(inputId = 'slider1', 
          label = 'slider input', 
          min = 0, max =100, 
          value = c(10,90)) 
) 
) 
server <- function(input, output) { 
} 

shinyApp(ui = ui, server = server) 

このコードは、スライダーでdivの内側にカーソルを変更し、あなたが青いバーにカーソルを合わせると、カーソルがまだ特殊な光沢のあるスライダーカーソルに戻ります。光沢のあるソースコードには、すでにスライダ用にプログラムされた一意のカーソルがあるので、少なくとも簡単に無効にすることはできません。