package Ġnet . d ank ito . bank ing . java fx . dialogs . tan . controls Ċ Ċ import Ġjavafx . beans . property . Simple Boolean Property Ċ import Ġjavafx . beans . property . Simple Double Property Ċ import Ġjavafx . scene . Node Ċ import Ġjavafx . scene . paint . Color Ċ import Ġnet . d ank ito . utils . java fx . ui . extensions . setBackground To Color Ċ import Ġt orn ad of x . View Ċ import Ġt orn ad of x . h box Constraints Ċ import Ġt orn ad of x . label Ċ import Ġt orn ad of x . use Pref Width ĊĊ Ċ open Ġclass ĠCh ip Tan F lick er Code Stripe View ( protected Ġval Ġpaint Stripe White : ĠSimple Boolean Property , ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġprotected Ġval Ġstripe Width : ĠSimple Double Property , ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġprotected Ġval Ġstripe Height : ĠSimple Double Property , ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġprotected Ġval ĠmarginRight : ĠSimple Double Property ): ĠView () Ġ{ ĊĊĠĠĠ Ġcompanion Ġobject Ġ{ ĊĠĠĠĠĠĠĠ Ġval ĠBlack Ġ= ĠColor . BLACK ĊĠĠĠĠĠĠĠ Ġval ĠWhite Ġ= ĠColor . WHITE ĊĠĠĠ Ġ} ĊĊĊĠĠĠ Ġinit Ġ{ ĊĠĠĠĠĠĠĠ Ġpaint Stripe White . addListener Ġ{ Ġ_, Ġ_, ĠnewValue Ġ-> ĊĠĠĠĠĠĠĠĠĠĠĠ Ġpaint Stripe White Changed ( newValue ) ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} ĊĊĊĠĠĠ Ġoverride Ġval Ġroot Ġ= Ġlabel Ġ{ ĊĠĠĠĠĠĠĠ Ġpref Height Property (). bind ( stripe Height ) ĊĊĠĠĠĠĠĠĠ Ġuse Pref Width Ġ= Ġtrue ĊĠĠĠĠĠĠĠ Ġpref Width Property (). bind ( stripe Width ) ĊĊĠĠĠĠĠĠĠ ĠmarginRight . addListener Ġ{ Ġ_, Ġ_, ĠnewValue Ġ-> Ġset Margin Right ( this , ĠnewValue . toDouble ()) Ġ} ĊĠĠĠĠĠĠĠ Ġset Margin Right ( this , ĠmarginRight . value ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġprivate Ġfun Ġset Margin Right ( node : ĠNode , Ġright Margin : ĠDouble ) Ġ{ ĊĠĠĠĠĠĠĠ Ġnode . h box Constraints Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ ĠmarginRight Ġ= Ġright Margin ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} ĊĊĊĠĠĠ Ġprotected Ġopen Ġfun Ġpaint Stripe White Changed ( paint White : ĠBoolean ) Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġnew Color Ġ= Ġif Ġ( paint White ) ĠWhite Ġelse ĠBlack ĊĊĠĠĠĠĠĠĠ Ġroot . setBackground To Color ( new Color ) ĊĠĠĠ Ġ} Ċ Ċ }