将ENTER键重新定义为TAB键

问题描述:

如何让ENTER像TAB一样工作,即当用户在输入字段中按ENTER时,光标跳到下一个字段,就像按TAB键时会发生的那样?将ENTER键重新定义为TAB键

参见下面的示例:

library(shiny) 
library(shinyjs) 
# Define UI for application that draws a histogram 
ui <- fluidPage(
    useShinyjs(), 
    sidebarLayout(
     sidebarPanel(
     textInput("txt1", "Text: "), 
     textInput("txt2", "Text: ")   
    ), 
     mainPanel() 
    ) 
) 

# Define server logic required to draw a histogram 
server <- function(input, output) { 
observe({ 
    runjs(" 
    var inputs = $(':input').keypress(function(e){ 
    if (e.which == 13) { 
     e.preventDefault(); 
     var nextInput = inputs.get(inputs.index(this) + 1); 
     if (nextInput) { 
     nextInput.focus(); 
     } 
    } 
    }); 
    ") 
}) 
} 

# Run the application 
shinyApp(ui = ui, server = server) 

的JavaScript是从here并且包括在光泽与shinyjs