Question

我正在开发一个ubuntu系统。我的目标是使用TCL / TK中的GUI工具基本上用C语言创建IDE。我安装了tcl 8.4，tk8.4，tcl8.4-dev，tk8.4-dev并在我的系统中安装了tk.h和tcl.h头文件。但是，当我运行一个基本的hello world程序时，它显示出很多错误。

#include "tk.h"
#include "stdio.h"
void hello() {
     puts("Hello C++/Tk!");
}
int main(int, char *argv[])
{
     init(argv[0]);
     button(".b") -text("Say Hello") -command(hello);
     pack(".b") -padx(20) -pady(6);
}

有些错误是

tkDecls.h:644: error: expected declaration specifiers before ‘EXTERN’

/usr/include/libio.h:488: error: expected ‘)’ before ‘*’ token

In file included from tk.h:1559,
                 from new1.c:1:
tkDecls.h:1196: error: storage class specified for parameter ‘TkStubs’
tkDecls.h:1201: error: expected ‘=’, ‘,’, ‘;’, ‘asm’ or ‘__attribute__’ before ‘*’ token

/usr/include/stdio.h:145: error: storage class specified for parameter ‘stdin’

tk.h:1273: error: declaration for parameter ‘Tk_PhotoHandle’ but no such parameter

任何人都可以告诉我如何纠正这些错误？请帮忙......

Answer 1

你在那里写Tcl或C吗？对此的困惑是造成所有这些错误的原因。

假设您只是编写Tcl来弹出一个可以执行某项操作的Tk GUI，您可以使用以下内容创建一个名为hello.tcl的文件：

package require Tk
proc hello {} {
    puts "Hello C++/Tk!"
}
button .b -text "Say Hello" -command hello
pack .b -padx 20 -pady 6

然后你用它运行它：

wish hello.tcl

要在C程序中运行它，您需要做更多的工作。

#include <tcl.h>
#include <tk.h>
int main(int argc, char **argv) {
    Tcl_Interp *interp;

    Tcl_FindExecutable(argv[0]);
    interp = Tcl_CreateInterp();
    Tcl_Eval(interp,
        "package require Tk\n"
        "proc hello {} {\n"
            "puts \"Hello C++/Tk!\"\n"
        "}\n"
        "button .b -text \"Say Hello\" -command hello\n"
        "pack .b -padx 20 -pady 6\n");
    Tk_MainLoop();
    Tcl_DeleteInterp(interp);
    return 0;
}

字符串文字，分成几行，应该可以从之前识别出来。您可能希望使用Tcl_EvalFile来引入脚本以从另一个文件运行，因为将所有这些反斜杠写入引用会变得乏味。还有Tk_MainLoop的替代方法，所有这些方法都涉及Tcl_DoOneEvent某处（Tk_MainLoop也是一个包装轮）但是我不知道到目前为止哪些方面最适合你

编译上面的代码，按顺序链接libtk和libtcl 。我不记得你是否必须明确链接X11库，或者是否足够链接到Tk。

在c程序中包括tk.h和tcl.h

1 个答案: