DefaultButton.re

open Revery;
open Revery.UI;
open Revery.UI.Components;

module DefaultButtonWithCounter = {
  let%component make = () => {
    let%hook (count, setCount) = Hooks.state(0);
    let increment = () => setCount(_ => count + 1);

    let containerStyle =
      Style.[justifyContent(`Center), alignItems(`Center)];

    let countContainer =
      Style.[
        width(300),
        height(300),
        alignItems(`Center),
        justifyContent(`Center),
      ];

    let countStyle = Style.[margin(24), color(Colors.black)];

    let countStr = string_of_int(count);

    <View style=containerStyle>
      <View style=countContainer>
        <Text fontSize=50. style=countStyle text=countStr />
      </View>
      <Button title="click me!" onClick=increment />
      <Button disabled=true title="(disabled)" onClick=increment />
    </View>;
  };
};

let render = () => <View> <DefaultButtonWithCounter /> </View>;