package Ġexample Ċ Ċ import Ġjava . awt .* Ġ// Ġk tl int - disable Ġno - wildcard - imports Ċ import Ġjava . awt . datat rans fer . Data Flavor Ċ import Ġjavax . swing .* Ġ// Ġk tl int - disable Ġno - wildcard - imports Ċ Ċ fun Ġmake UI (): ĠComponent Ġ{ ĊĠ Ġval Ġlabel Ġ= ĠJLabel () ĊĊĠ Ġval Ġbutton Ġ= ĠJButton (" get ĠClip board ĠData Flavor ") ĊĠ Ġbutton . addActionListener Ġ{ ĊĠĠĠ Ġvar Ġstr : ĠString ? Ġ= Ġ"" ĊĠĠĠ Ġvar Ġimage : ĠImage Icon ? Ġ= Ġnull ĊĠĠĠ Ġrun Catch ing Ġ{ ĊĠĠĠĠĠ Ġval Ġt Ġ= ĠToolkit . getDefault Toolkit (). system Clipboard . get Contents ( null ) ĊĠĠĠĠĠ Ġif Ġ( t Ġ== Ġnull ) Ġ{ ĊĠĠĠĠĠĠĠ ĠToolkit . getDefault Toolkit (). be ep () ĊĠĠĠĠĠĠĠ Ġstr Ġ= Ġ" the Ġcurrent Ġtransfer able Ġobject Ġon Ġthe Ġclipboard Ġis Ġnull " ĊĠĠĠĠĠ Ġ} Ġelse Ġ{ ĊĠĠĠĠĠĠĠ Ġif Ġ( t . is Data Flavor Supported ( Data Flavor . image Flavor )) Ġ{ ĊĠĠĠĠĠĠĠĠĠ Ġimage Ġ= ĠImage Icon ( t . get Transfer Data ( Data Flavor . image Flavor ) Ġas ? ĠImage ) ĊĠĠĠĠĠĠĠ Ġ} Ġelse Ġif Ġ( t . is Data Flavor Supported ( Data Flavor . string Flavor )) Ġ{ ĊĠĠĠĠĠĠĠĠĠ Ġstr Ġ= Ġt . get Transfer Data ( Data Flavor . string Flavor ). toString () ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ}. on Failure Ġ{ ĊĠĠĠĠĠ ĠToolkit . getDefault Toolkit (). be ep () ĊĠĠĠĠĠ Ġstr Ġ= Ġit . message ĊĠĠĠĠĠ Ġimage Ġ= Ġnull ĊĠĠĠ Ġ} ĊĠĠĠ Ġlabel . text Ġ= Ġstr ĊĠĠĠ Ġlabel . icon Ġ= Ġimage ĊĠ Ġ} ĊĊĠ Ġreturn ĠJPanel ( Border Layout ()). also Ġ{ ĊĠĠĠ Ġit . add ( J ScrollPane ( label )) ĊĠĠĠ Ġit . add ( button , ĠBorderLayout . SO UTH ) ĊĠĠĠ Ġit . preferred Size Ġ= ĠDimension ( 3 2 0 , Ġ 2 4 0 ) ĊĠ Ġ} Ċ } Ċ Ċ fun Ġmain () Ġ{ ĊĠ ĠEvent Queue . invoke Later Ġ{ ĊĠĠĠ Ġrun Catch ing Ġ{ ĊĠĠĠĠĠ ĠUI Manager . set Look And Feel ( UI Manager . getSystem Look And Feel ClassName ()) ĊĠĠĠ Ġ}. on Failure Ġ{ ĊĠĠĠĠĠ Ġit . printStackTrace () ĊĠĠĠĠĠ ĠToolkit . getDefault Toolkit (). be ep () ĊĠĠĠ Ġ} ĊĠĠĠ ĠJ Frame (). apply Ġ{ ĊĠĠĠĠĠ Ġdefault Close Operation Ġ= ĠWindow Constants . EXIT _ ON _ CLOSE ĊĠĠĠĠĠ Ġcontent Pane . add ( make UI ()) ĊĠĠĠĠĠ Ġpack () ĊĠĠĠĠĠ Ġset Location Relative To ( null ) ĊĠĠĠĠĠ Ġis Visible Ġ= Ġtrue ĊĠĠĠ Ġ} ĊĠ Ġ} Ċ } Ċ