swipeout: Framework7 swipeout element

In shinyMobile: Mobile Ready 'shiny' Apps with Standalone Capabilities

Framework7 swipeout element

Description

f7Swipeout is designed to be used in combination with f7ListItem.

f7SwipeoutItem is inserted in f7Swipeout.

Usage

f7Swipeout(
  tag,
  ...,
  left = NULL,
  right = NULL,
  side = c("left", "right", "both")
)

f7SwipeoutItem(id, label, color = NULL)

Arguments

tag	Tag to be swiped.
...	When side is either "right" or "left" use this slot to pass f7SwipeoutItem.
left	When side is "both", put the left f7SwipeoutItem.
right	When side is "both", put the right f7SwipeoutItem.
side	On which side to swipe: "left", "right" or "both".
id	Item unique id.
label	Item label.
color	Item color.

Examples

if (interactive()) {
 library(shiny)
 library(shinyMobile)

 shinyApp(
   ui = f7Page(
     title = "Swipeout",
     f7SingleLayout(
       navbar = f7Navbar(title = "Swipeout"),
       # simple list
       f7List(
         lapply(1:3, function(j) {
           if (j == 1) {
             f7Swipeout(
               tag = f7ListItem(letters[j]),
               side = "left",
               f7SwipeoutItem(id = "alert", color = "pink", "Alert"),
               f7SwipeoutItem(id = "notification", color = "green", "Notif")
             )
           } else {
             f7ListItem(letters[j])
           }
         })
       )
     )
   ),
   server = function(input, output, session) {
     observe({
       print(input$alert)
       print(input$notification)
     })

     observeEvent(input$notification, {
       f7Notif(
         text = "test",
         icon = f7Icon("bolt_fill"),
         title = "Notification",
         subtitle = "A subtitle",
         titleRightText = "now"
       )
     })

     observeEvent(input$alert, {
       f7Dialog(
         title = "Dialog title",
         text = "This is an alert dialog"
       )
     })

   }
 )
}

shinyMobile documentation built on Nov. 25, 2022, 5:05 p.m.