Progress
Active
Statement import68% · about 20 seconds remaining
The application supplies current progress and task status.
open System
open FSharp.ViewEngine
open Acme.Components.Primitives
open Acme.Components.Application
open type Html
open type Svg
open type Datastar
let operationalProgressExample =
Progress.create "Statement import" 68 100
|> Progress.withValueText "68% · about 20 seconds remaining"
|> Progress.withDetail "The application supplies current progress and task status."
|> Progress.renderComplete
Statement import100%
Complete
open System
open FSharp.ViewEngine
open Acme.Components.Primitives
open Acme.Components.Application
open type Html
open type Svg
open type Datastar
let completedProgressExample =
Progress.create "Statement import" 100 100
|> Progress.withValueText "100%"
|> Progress.complete
|> Progress.renderFailed
Statement importStopped at 68%
The application can provide a retry action beside the progress component.
Failed
open System
open FSharp.ViewEngine
open Acme.Components.Primitives
open Acme.Components.Application
open type Html
open type Svg
open type Datastar
let failedProgressExample =
Progress.create "Statement import" 68 100
|> Progress.withValueText "Stopped at 68%"
|> Progress.withDetail "The application can provide a retry action beside the progress component."
|> Progress.failed
|> Progress.render