Hello, Swing(Tcl/Java) World!
Posted on 12月 14th, 2012 by cx20
Swing(Tcl/Java)
Swing は AWT(Abstract Window Toolkit) を拡張したものであり Java で GUI を扱うためのライブラリである。
J2SE 1.2 以降は AWT よりも Swing が使われることが多くなっている。
以下は Tcl/Java による Swing の使用例となっている。
ソースコード
package require java java::import javax.swing.JFrame java::import javax.swing.JLabel set frame [java::new JFrame] $frame setDefaultCloseOperation [java::field JFrame EXIT_ON_CLOSE] $frame setTitle "Hello, World" $frame setSize 640 480 set label [java::new JLabel "Hello, Swing World!"] $label setVerticalAlignment [java::field JLabel TOP] $frame add $label $frame setVisible true vwait done |
実行方法
C:¥> jaclsh Hello.tcl |
実行結果
+------------------------------------------+ |Hello, World! [_][~][X]| +------------------------------------------+ |Hello, Swing World! | | | | | | | | | | | | | | | | | | | +------------------------------------------+ |
Tags: Swing