Archive for 3月 31st, 2013

  1. Hello, Windows Forms(Tcl/CSharp) World!

    Posted on 3月 31st, 2013 by cx20

    Windows Forms(Tcl/CSharp)

    Windows フォーム（Windows Forms）は .NET Framework におけるユーザーインターフェイス基盤である。Windows アプリケーションにおけるウィンドウやダイアログに対応する。
    以下は Tcl/CSharp における Windows フォーム の例となっている。

    ソースコード

    Hello.tcl
    raw download
    package require java
 
java::load -gac System.Windows.Forms.dll
java::import -package System.Windows.Forms Form Application Label
set form [java::new Form]
java::prop $form Text "Hello, World!"
java::prop $form Size [java::new System.Drawing.Size 640 480]
set label1 [java::new Label]
java::prop $label1 Text "Hallo, Tcl/CSharp World!"
java::prop $label1 Size [java::new System.Drawing.Size 320 20]
[java::prop $form Controls] Add $label1
 
java::call Application Run $form

    コンパイル方法

    C:¥> tclsh Hello.tcl

    実行結果

    +------------------------------------------+
|Hello, World!                    [_][~][X]|
+------------------------------------------+
|Hello, Windows Forms(Tcl/CSharp) World!   |
|                                          |
|                                          |
|                                          |
|                                          |
|                                          |
|                                          |
|                                          |
|                                          |
|                                          |
+------------------------------------------+