Hello, SWT(Tcl/Java) World!
Posted on 12月 15th, 2012 by cx20
SWT(Tcl/Java)
SWT(Standard Widget Toolkit) は Java で GUI を扱うためのライブラリである。
IBM により AWT や Swing を置き換える目的で作成された。
以下は Tcl/Java による SWT の使用例となっている。
ソースコード
package require java java::import org.eclipse.swt.SWT java::import org.eclipse.swt.widgets.Display java::import org.eclipse.swt.widgets.Shell java::import org.eclipse.swt.widgets.Label java::import org.eclipse.swt.layout.FillLayout set display [java::new Display] set shell [java::new Shell $display] $shell setText "Hello, World" set layout [java::new FillLayout [java::field SWT VERTICAL]] $shell setLayout $layout set label [java::new Label $shell [java::field SWT BORDER]] $label setText "Hello, SWT World!" $shell setSize 640 480 $shell open while { ![$shell isDisposed] } { if { ![$display readAndDispatch] } { $display sleep } } $display dispose |
実行方法
C:¥> SET CLASSPATH=bsh-2.0b4.jar;org.eclipse.swt.win32.win32.x86_3.6.1.v3655c.jar;%CLASSPATH% C:¥> jaclsh hello.bsh |
実行結果
+------------------------------------------+ |Hello, World! [_][~][X]| +------------------------------------------+ |Hello, SWT World! | | | | | | | | | | | | | | | | | | | +------------------------------------------+ |
Tags: SWT