# NOT RUN {
### Grid layout forms
# Use responsive arguments to adjust form layouts based on viewport size.
# Be sure to adjust the size of your browser window between large and small.
card(
formRow(
formGroup(
width = c(md = 6), # <-
label = "Username",
textInput(
id = "user"
)
),
formGroup(
width = c(md = 6), # <-
label = "Password",
textInput(
type = "password",
id = "pass"
)
)
),
formGroup(
label = "Username",
groupTextInput(
id = "username",
left = "@"
)
),
buttonInput(
id = "go",
label = "Go!"
) %>%
background("blue")
) %>%
margin(3) %>%
background("grey")
# }
Run the code above in your browser using DataLab