package Ġcom . github . kw ing Ċ Ċ import Ġcom . github . kw ing . layouts . op cr Ċ import Ġjavax . swing . J Component Ċ import Ġjavax . swing . J Frame Ċ import Ġjavax . swing . JPanel Ċ Ċ fun Ġframe ( title : ĠString Ġ= Ġ"", Ġwidth : ĠInt , Ġheight : ĠInt , Ġblock : ĠJ Frame . () Ġ-> ĠUnit ): ĠJ Frame Ġ{ ĊĠĠĠ Ġval Ġframe Ġ= ĠJ Frame () ĊĠĠĠ Ġframe . title Ġ= Ġtitle ĊĠĠĠ Ġframe . setSize ( width , Ġheight ) ĊĠĠĠ Ġframe . apply ( block ) Ċ // ĠĠĠ Ġframe . pack () ĊĠĠĠ Ġreturn Ġframe Ċ } Ċ Ċ fun ĠJ Component . panel ( op : ĠJPanel . () Ġ-> ĠUnit Ġ= Ġ{} ): ĠJPanel Ġ{ ĊĠĠĠ Ġval Ġpanel Ġ= ĠJPanel () ĊĠĠĠ Ġreturn Ġopc r ( this , Ġpanel , Ġop ) Ċ } Ċ Ċ /* Ċ fun Ġfile cho oser ( current Directory : ĠFile ? Ġ= Ġnull , Ġop : ĠJ FileChooser . () Ġ-> ĠUnit Ġ= Ġ{} ): ĠJ FileChooser Ġ{ ĊĠĠĠ Ġval Ġfile cho oser Ġ= Ċ }*/ Ċ