addIncrementButtonOn: aCount

| button buttonArea |

button := self makeButton: 'increment'

on: aCount for: #increment.

buttonArea := self constraintFrame: 0 @ 0

corner: 1/3 @ (1/3).

self addView: button in: buttonArea.

addResetButtonOn: aCount

| button buttonArea |

button := self makeButton: 'reset' on: aCount for: #reset.

buttonArea := self constraintFrame: 2/3 @ 0

corner: 1 @ (1/3).

self addView: button in: buttonArea.