package Ġcom . def lated pickle . fa os d ance . window Ċ Ċ import Ġcom . def lated pickle . fa os d ance . Global Values Ċ import Ġcom . def lated pickle . fa os d ance . settings . Settings Dialog Ċ import Ġcom . def lated pickle . fa os d ance . util . Lang Ċ import Ġjava . awt . event . Window Event Ċ import Ġjavax . swing . J Component Ċ import Ġjavax . swing . J MenuItem Ċ import Ġjavax . swing . J PopupMenu Ċ import Ġjavax . swing . J Separator Ċ Ċ class ĠContext Menu Ġ: ĠJ PopupMenu () Ġ{ ĊĠĠĠ Ġcompanion Ġobject Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġtr ay Items Ġ= Ġmutable ListOf < J Component >() ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġinit Ġ{ ĊĠĠĠĠĠĠĠ ĠJ MenuItem ( Lang . bundle . getString (" menu . move _ to _ centre ")). apply Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġthis @ ContextMenu . add ( this ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġtr ay Items . add ( this ) ĊĊĠĠĠĠĠĠĠĠĠĠĠ Ġadd ActionListener Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ ĠGlobal Values . frame !!. setLocation Relative To ( null ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġ} ĊĊĠĠĠĠĠĠĠ ĠJ Separator (). apply Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġthis @ ContextMenu . add ( this ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġtr ay Items . add ( this ) ĊĠĠĠĠĠĠĠ Ġ} ĊĊĠĠĠĠĠĠĠ ĠJ MenuItem ( Lang . bundle . getString (" menu . settings ")). apply Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġthis @ ContextMenu . add ( this ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġtr ay Items . add ( this ) ĊĊĠĠĠĠĠĠĠĠĠĠĠ Ġadd ActionListener Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġdialog Ġ= ĠSettings Dialog ( Global Values . frame !! ) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġdialog . trigger Widgets () ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġdialog . setLocation Relative To ( Global Values . frame !! ) ĊĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġdialog . isVisible Ġ= Ġtrue ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġ} ĊĊĠĠĠĠĠĠĠ ĠJ Separator (). apply Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġthis @ ContextMenu . add ( this ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġtr ay Items . add ( this ) ĊĠĠĠĠĠĠĠ Ġ} ĊĊĠĠĠĠĠĠĠ ĠJ MenuItem ( Lang . bundle . getString (" menu . exit ")). apply Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġthis @ ContextMenu . add ( this ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġtr ay Items . add ( this ) ĊĊĠĠĠĠĠĠĠĠĠĠĠ Ġadd ActionListener Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ ĠGlobal Values . frame !!. dispatchEvent ( Window Event ( Global Values . frame !! , ĠWindow Event . WINDOW _ CLO SING )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} Ċ }