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