Hello, Tcl/Tk(C言語) World!
Posted on 5月 12th, 2013 by cx20
Tcl/Tk(C言語)
Tcl はシンプルな構文を持つスクリプト言語である。名前は「ツールコマンド言語（Tool Command Language）」に由来する。
Tcl スクリプト用の GUI ツールキットとして Tk が開発され、バンドルされたものを Tcl/Tk と呼ぶ。Tk の人気は高く、Tcl/Tk 以外に Perl/Tk、Ruby/Tk と言った他の言語にも移植されている。
以下は C言語 による Tcl/Tk の呼出し例となっている。
ソースコード
#include <tcl.h> #include <tk.h> int main( int argc, char* argv[] ) { Tcl_Interp* interp; char command[] = "wm title . \"Hello, World!\"\n" "wm geometry . \"640x480\"\n" "label .label -text \"Hello, Tcl/Tk World!\"\n" "pack .label -side top -anchor w"; interp = Tcl_CreateInterp(); Tcl_Init(interp); Tk_Init(interp); Tcl_Eval( interp, command ); Tk_MainLoop(); return 0; } |
コンパイル方法（Visual C++）
C:¥> cl hello.c /link tcl85.lib tk85.lib |
実行結果
+------------------------------------------+ |Hello, World! [_][~][X]| +------------------------------------------+ |Hello, Tcl/Tk World! | | | | | | | | | | | | | | | | | | | +------------------------------------------+ |
Tags: Tcl/Tk