Adds a flex

This commit is contained in:
Roman Galochkin 2020-02-26 15:33:30 +03:00
parent 4daa45962d
commit b37d052b4f

View File

@ -36,6 +36,12 @@ module FieldString = {
}; };
}; };
module Styles = {
open Css;
let row =
style([display(`flex), selector("div > div", [flex(`num(1.))])]);
};
module FieldFloat = { module FieldFloat = {
[@react.component] [@react.component]
let make = (~field, ~label) => { let make = (~field, ~label) => {
@ -84,6 +90,8 @@ let make = () => {
field=FormConfig.GuesstimatorString field=FormConfig.GuesstimatorString
label="GuesstimatorString" label="GuesstimatorString"
/> />
<div className=Styles.row>
<div>
<Form.Field <Form.Field
field=FormConfig.DomainType field=FormConfig.DomainType
render={({handleChange, value}) => render={({handleChange, value}) =>
@ -105,11 +113,17 @@ let make = () => {
</Antd.Form.Item> </Antd.Form.Item>
} }
/> />
<FieldString field=FormConfig.XPoint label="xPoint" /> </div>
<div> <FieldString field=FormConfig.XPoint label="xPoint" /> </div>
<div>
<FieldString <FieldString
field=FormConfig.ExcludingProbabilityMass field=FormConfig.ExcludingProbabilityMass
label="excludingProbabilityMass" label="excludingProbabilityMass"
/> />
</div>
</div>
<div className=Styles.row>
<div>
<Form.Field <Form.Field
field=FormConfig.UnitType field=FormConfig.UnitType
render={({handleChange, value}) => render={({handleChange, value}) =>
@ -125,6 +139,8 @@ let make = () => {
</Antd.Form.Item> </Antd.Form.Item>
} }
/> />
</div>
<div>
<Form.Field <Form.Field
field=FormConfig.Zero field=FormConfig.Zero
render={({handleChange, value}) => render={({handleChange, value}) =>
@ -140,6 +156,8 @@ let make = () => {
</Antd.Form.Item> </Antd.Form.Item>
} }
/> />
</div>
<div>
<Form.Field <Form.Field
field=FormConfig.Unit field=FormConfig.Unit
render={({handleChange, value}) => render={({handleChange, value}) =>
@ -176,6 +194,8 @@ let make = () => {
</Antd.Form.Item> </Antd.Form.Item>
} }
/> />
</div>
</div>
<Antd.Form.Item> <Antd.Form.Item>
{reform.state.formState == Submitting {reform.state.formState == Submitting
? "Loading" |> E.ste ? "Loading" |> E.ste