diff options
Diffstat (limited to 'examples/03-controlled-inputs/src/app.gleam')
-rw-r--r-- | examples/03-controlled-inputs/src/app.gleam | 74 |
1 files changed, 74 insertions, 0 deletions
diff --git a/examples/03-controlled-inputs/src/app.gleam b/examples/03-controlled-inputs/src/app.gleam new file mode 100644 index 0000000..8e713ea --- /dev/null +++ b/examples/03-controlled-inputs/src/app.gleam @@ -0,0 +1,74 @@ +import gleam/int +import gleam/string +import lustre +import lustre/attribute +import lustre/element.{type Element} +import lustre/event +// These examples are written with lustre_ui in mind. They'll work regardless, +// but to see what lustre_ui can do make sure to run each of these examples with +// the `--include-styles` flag: +// +// $ gleam run -m lustre/try -- --include-styles +// +// In your own apps, make sure to add the `lustre_ui` dependency and include the +// stylesheet somewhere. +import lustre/ui +import lustre/ui/aside + +// MAIN ------------------------------------------------------------------------ + +pub fn main() { + let app = lustre.simple(init, update, view) + let assert Ok(_) = lustre.start(app, "#app", Nil) +} + +// MODEL ----------------------------------------------------------------------- + +type Model { + Model(value: String, length: Int, max: Int) +} + +fn init(_) -> Model { + Model(value: "", length: 0, max: 10) +} + +// UPDATE ---------------------------------------------------------------------- + +pub opaque type Msg { + GotInput(value: String) + Reset +} + +fn update(model: Model, msg: Msg) -> Model { + case msg { + GotInput(value) -> { + let length = string.length(value) + case length <= model.max { + True -> Model(..model, value: value, length: length) + False -> model + } + } + Reset -> Model(..model, value: "", length: 0) + } +} + +// VIEW ------------------------------------------------------------------------ + +fn view(model: Model) -> Element(Msg) { + let styles = [#("width", "100vw"), #("height", "100vh")] + let length = int.to_string(model.length) + + ui.centre( + [attribute.style(styles)], + ui.aside( + [aside.content_first(), aside.align_centre()], + ui.field( + [], + [element.text("Write a message:")], + ui.input([attribute.value(model.value), event.on_input(GotInput)]), + [element.text(length <> "/10")], + ), + ui.button([event.on_click(Reset)], [element.text("Reset")]), + ), + ) +} |