package Ġcom . github . mv ys ny . k ari but esting . v 8 Ċ Ċ import Ġcom . github . mv ys ny . dyn atest . Dyn a Test Ċ import Ġcom . github . mv ys ny . dyn atest . expect Throws Ċ import Ġcom . github . mv ys ny . k ari bud sl . v 8 . button Ċ import Ġcom . github . mv ys ny . k ari bud sl . v 8 . checkBox Ċ import Ġcom . github . mv ys ny . k ari bud sl . v 8 . textField Ċ import Ġcom . vaadin . ui .* Ċ import Ġkotlin . test . expect Ċ import Ġkotlin . test . fail Ċ Ċ class ĠBasic UtilsTest Ġ: ĠDyn a Test ({ ĊĠĠĠ ĠbeforeEach Ġ{ ĠMock V aad in . setup () Ġ} ĊĠĠĠ ĠafterEach Ġ{ ĠMock V aad in . te ar Down () Ġ} ĊĊĠĠĠ Ġgroup (" HasValue . setValue () ") Ġ{ ĊĠĠĠĠĠĠĠ Ġtest (" enabled Ġcheck Ġbox ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġexpect ( true ) Ġ{ ĠCheckBox (). apply Ġ{ Ġvalue Ġ= Ġtrue Ġ} Ġ. value Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġexpect ( true ) Ġ{ ĠCheckBox (). apply Ġ{ Ġ_ value Ġ= Ġtrue Ġ} Ġ. value Ġ} ĊĠĠĠĠĠĠĠ Ġ} ĊĊĠĠĠĠĠĠĠ Ġtest (" disabled Ġcheck Ġbox ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ// ĠV aad in Ġignores Ġthe Ġenabled Ġflag Ġand Ġupdates Ġthe Ġvalue Ġhapp ily . ĊĠĠĠĠĠĠĠĠĠĠĠ Ġexpect ( true ) Ġ{ ĠCheckBox (). apply Ġ{ Ġis Enabled Ġ= Ġfalse ; Ġvalue Ġ= Ġtrue Ġ} Ġ. value Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ// ĠHowever , Ġcalling Ġ_ value Ġwill Ġfail ĊĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġcb Ġ= ĠCheckBox (). apply Ġ{ Ġis Enabled Ġ= Ġfalse Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġexpect Throws ( IllegalStateException :: class , Ġ" The ĠCheckBox [ DISABLED , Ġvalue =' false '] Ġis Ġnot Ġenabled ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġcb ._ value Ġ= Ġtrue ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġexpect ( false ) Ġ{ Ġcb . value Ġ} ĊĠĠĠĠĠĠĠ Ġ} ĊĊĠĠĠĠĠĠĠ Ġtest (" invisible Ġcheck Ġbox ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġexpect ( true ) Ġ{ ĠCheckBox (). apply Ġ{ Ġis Visible Ġ= Ġfalse ; Ġvalue Ġ= Ġtrue Ġ} Ġ. value Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ// ĠHowever , Ġcalling Ġ_ value Ġwill Ġfail ĊĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġcb Ġ= ĠCheckBox (). apply Ġ{ Ġis Visible Ġ= Ġfalse Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġexpect Throws ( IllegalStateException :: class , Ġ" The ĠCheckBox [ IN VIS , Ġvalue =' false '] Ġis Ġnot Ġeffectively Ġvisible ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġcb ._ value Ġ= Ġtrue ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġexpect ( false ) Ġ{ Ġcb . value Ġ} ĊĠĠĠĠĠĠĠ Ġ} ĊĊĠĠĠĠĠĠĠ Ġtest (" check Ġbox Ġwith Ġparent Ġdisabled ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġlayout Ġ= ĠVertical Layout (). apply Ġ{ Ġis Enabled Ġ= Ġfalse Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ// ĠV aad in Ġignores Ġthe Ġenabled Ġflag Ġand Ġupdates Ġthe Ġvalue Ġhapp ily . ĊĠĠĠĠĠĠĠĠĠĠĠ Ġexpect ( true ) Ġ{ Ġlayout . checkBox Ġ{ Ġvalue Ġ= Ġtrue Ġ} Ġ. value Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ// ĠHowever , Ġcalling Ġ_ value Ġwill Ġfail ĊĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġcb Ġ= Ġlayout . checkBox () ĊĠĠĠĠĠĠĠĠĠĠĠ Ġexpect Throws ( IllegalStateException :: class , Ġ" The ĠCheckBox [ value =' false '] Ġis Ġnested Ġin Ġa Ġdisabled Ġcomponent ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġcb ._ value Ġ= Ġtrue ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġexpect ( false ) Ġ{ Ġcb . value Ġ} ĊĠĠĠĠĠĠĠ Ġ} ĊĊĠĠĠĠĠĠĠ Ġtest (" read - only Ġcheck Ġbox ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġvar Ġcb Ġ= ĠCheckBox (). apply Ġ{ Ġis ReadOnly Ġ= Ġtrue Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ// Ġsur prising ly Ġthis Ġworks Ġtoo . ĠI 'm Ġpretty Ġsure Ġit Ġfailed Ġwith ĠReadOnly Exception Ġin ĠV aad in Ġ 7 ... ĊĠĠĠĠĠĠĠĠĠĠĠ Ġcb . value Ġ= Ġtrue ĊĠĠĠĠĠĠĠĠĠĠĠ Ġexpect ( true ) Ġ{ Ġcb . value Ġ} ĊĊĠĠĠĠĠĠĠĠĠĠĠ Ġcb Ġ= ĠCheckBox (). apply Ġ{ Ġis ReadOnly Ġ= Ġtrue Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġexpect Throws ( IllegalStateException :: class , Ġ" The ĠCheckBox [ RO , Ġvalue =' false '] Ġis Ġread - only ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġcb ._ value Ġ= Ġtrue ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġexpect ( false ) Ġ{ Ġcb . value Ġ} ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġgroup (" check Editable ByUser ") Ġ{ ĊĠĠĠĠĠĠĠ Ġtest (" disabled Ġtext field Ġfails ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġexpect Throws ( java . lang . IllegalStateException :: class , Ġ" The ĠTextField [ DISABLED , Ġvalue =' '] Ġis Ġnot Ġenabled ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ ĠTextField (). apply Ġ{ Ġis Enabled Ġ= Ġfalse Ġ}. check Editable ByUser () ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġtest (" invisible Ġtext field Ġfails ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġexpect Throws ( java . lang . IllegalStateException :: class , Ġ" The ĠTextField [ IN VIS , Ġvalue =' '] Ġis Ġnot Ġeffectively Ġvisible ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ ĠTextField (). apply Ġ{ Ġis Visible Ġ= Ġfalse Ġ}. check Editable ByUser () ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġtest (" text field Ġin Ġinvisible Ġlayout Ġfails ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġexpect Throws ( java . lang . IllegalStateException :: class , Ġ" The ĠTextField [ value =' '] Ġis Ġnot Ġeffectively Ġvisible ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ ĠVertical Layout (). apply Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġis Visible Ġ= Ġfalse ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġtext Field (). also Ġ{ Ġit . check Editable ByUser () Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġtest (" text field Ġsucceeds ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ ĠTextField (). check Editable ByUser () ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġgroup (" expect Not Editable ByUser ") Ġ{ ĊĠĠĠĠĠĠĠ Ġtest (" disabled Ġtext field Ġfails ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ ĠTextField (). apply Ġ{ Ġis Enabled Ġ= Ġfalse Ġ}. expect Not Editable ByUser () ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġtest (" invisible Ġtext field Ġfails ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ ĠTextField (). apply Ġ{ Ġis Visible Ġ= Ġfalse Ġ}. expect Not Editable ByUser () ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġtest (" text field Ġin Ġinvisible Ġlayout Ġfails ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ ĠVertical Layout (). apply Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġis Visible Ġ= Ġfalse ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġtext Field (). also Ġ{ Ġit . expect Not Editable ByUser () Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġtest (" text field Ġsucceeds ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġexpect Throws ( AssertionError :: class , Ġ" The ĠTextField [ value =' '] Ġis Ġeditable ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ ĠTextField (). expect Not Editable ByUser () ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġtest (" current Ġtheme ") Ġ{ ĊĠĠĠĠĠĠĠ Ġexpect (" val o ") Ġ{ Ġcurrent Theme Ġ} ĊĠĠĠĠĠĠĠ ĠMock V aad in . te ar Down () ĊĠĠĠĠĠĠĠ ĠMock V aad in . setup ({ ĠMy Theme UI () Ġ}) ĊĠĠĠĠĠĠĠ Ġexpect (" my theme ") Ġ{ Ġcurrent Theme Ġ} ĊĠĠĠĠĠĠĠ ĠUI . getCurrent (). theme Ġ= Ġ" pink " ĊĠĠĠĠĠĠĠ Ġexpect (" pink ") Ġ{ Ġcurrent Theme Ġ} ĊĠĠĠ Ġ} ĊĊĊĠĠĠ Ġtest ("_ focus ") Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġf Ġ= ĠTextField () ĊĠĠĠĠĠĠĠ ĠUI . getCurrent (). content Ġ= Ġf ĊĠĠĠĠĠĠĠ Ġvar Ġcalled Ġ= Ġfalse ĊĠĠĠĠĠĠĠ Ġf . add Focus Listener Ġ{ Ġcalled Ġ= Ġtrue Ġ} ĊĠĠĠĠĠĠĠ Ġf ._ focus () ĊĠĠĠĠĠĠĠ Ġexpect ( true ) Ġ{ Ġcalled Ġ} ĊĠĠĠĠĠĠĠ Ġexpect ( f ) Ġ{ ĠUI . getCurrent (). _ pending Focus Ġ} ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġtest ("_ blur ") Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġf Ġ= ĠTextField () ĊĠĠĠĠĠĠĠ Ġvar Ġcalled Ġ= Ġfalse ĊĠĠĠĠĠĠĠ Ġf . add Blur Listener Ġ{ Ġcalled Ġ= Ġtrue Ġ} ĊĠĠĠĠĠĠĠ Ġf ._ blur () ĊĠĠĠĠĠĠĠ Ġexpect ( true ) Ġ{ Ġcalled Ġ} ĊĠĠĠ Ġ} Ċ }) Ċ