在 Windows 平台上创建 Tcl Starkit 的步骤

Question

我正在尝试找出在 Windows 中创建 Tcl starkit 的基本步骤。我之前问过一个类似的问题，还买了一本关于 Tcl 编程的书，访问了 wiki.tcl.tk，直接给 Tcl 程序员发了电子邮件，等等……总之，我从我的资源中得到了很好的反馈，这网站;但是，在构建批处理文件、使用命令控制台和创建目录方面，我没有说明我是一个完全的新手。

我真的需要有人基本上为我拼写出来，因为我似乎无法解释任何人试图告诉我的内容。我认为 Visual Studio 和 .NET 让我变得愚蠢 :)

目前，我已经下载了 tclkit、tclkitsh 和 sdx.kit，以及创建了一个简单的程序（Test_App.tcl）。到目前为止，我知道我必须通过创建批处理文件（sdx.bat），通过控制台（tclkitsh）运行 sdx，创建一个 vfs 目录，然后使用 sdx wrap。我完全不知道如何执行这些简单的步骤。

这似乎问得太多了，但如果有人可以用超级新手的话来翻译创建一个starkit，我将非常感激。我希望是这样的：在 tclkitsh 控制台中，键入以下内容...；在 tclkit.exe 中，键入以下内容...；现在你应该有......;等等。

谢谢，

DFM

Answer 1

第 1 步：创建工作目录。 打开 Windows 命令提示符。这可能是在开始菜单，“附件”，“命令提示符”下。输入命令“mkdir temp”，然后用“cd temp” cd 到这个目录：

Microsoft Windows XP [Version 5.1.2600]
(C) Copyright 1985-2001 Microsoft Corp.

C:\Documents and Settings\Owner>mkdir temp

C:\Documents and Settings\Owner>cd temp

C:\Documents and Settings\Owner\temp>

记下这个目录的位置。它应该会在提示符下告诉您。

第 2 步：下载必要的文件。 您需要三样东西，base kit that inclues Tk（将成为打包应用程序的一部分），sdx.kit（具有执行以下操作的命令的 tclkit包装）和command line version of tclkit（将运行sdx.kit）。

下载这三个文件并将它们放在您创建的临时目录中。严格来说，这不是必需的，但它使本教程更容易。重命名命令行 tclkit，也是为了让本教程更容易：

C:\Documents and Settings\Owner\temp>dir
 Volume in drive C has no label.
 Volume Serial Number is F434-9FD3

 Directory of C:\Documents and Settings\Owner\temp

09/05/2009  04:32 PM    <DIR>          .
09/05/2009  04:32 PM    <DIR>          ..
09/05/2009  04:21 PM           105,528 sdx.kit
09/05/2009  04:31 PM         1,268,686 tclkit-win32.upx.exe
09/05/2009  04:27 PM           668,142 tclkitsh-win32.upx.exe
               3 File(s)      2,042,356 bytes
               2 Dir(s)  13,232,046,080 bytes free

C:\Documents and Settings\Owner\temp>rename tclkitsh-win32.upx.exe tclkit.exe

第 3 步：验证一切是否正常。 运行 sdx.kit，不使用其他参数。它应该会打印出一些帮助信息：

C:\Documents and Settings\Owner\temp>tclkit sdx.kit
Specify one of the following commands:
 addtoc    eval      fetch     ftpd      httpd     httpdist  ls        lsk
 md5sum    mkinfo    mkpack    mkshow    mksplit   qwrap     ratarx    rexecd
 starsync  sync      tgz2kit   treetime  unwrap    update    version   wrap

For more information, type:  sdx.kit help ?command?

C:\Documents and Settings\Owner\temp>

第 4 步：为您的代码创建一个目录。 sdx 假设对于名为“myapp”的应用程序存在一个名为“myapp.vfs”的目录：

C:\Documents and Settings\Owner\temp>mkdir myapp.vfs

C:\Documents and Settings\Owner\temp>dir
 Volume in drive C has no label.
 Volume Serial Number is F434-9FD3

 Directory of C:\Documents and Settings\Owner\temp

09/05/2009  04:37 PM    <DIR>          .
09/05/2009  04:37 PM    <DIR>          ..
09/05/2009  04:37 PM    <DIR>          myapp.vfs
09/05/2009  04:21 PM           105,528 sdx.kit
09/05/2009  04:31 PM         1,268,686 tclkit-win32.upx.exe
09/05/2009  04:27 PM           668,142 tclkit.exe
               3 File(s)      2,042,356 bytes
               3 Dir(s)  13,231,599,616 bytes free

C:\Documents and Settings\Owner\temp>

第 5 步：创建您的代码。创建一个名为“main.tcl”的文件并将其放在 myapp.vfs 目录中。使用记事本或您选择的文本编辑器。给文件以下内容：

package require Tk
label .l -text "Hello, world"
pack .l

验证 myapp.vfs 看起来像这样：

C:\Documents and Settings\Owner\temp>dir myapp.vfs
 Volume in drive C has no label.
 Volume Serial Number is F434-9FD3

 Directory of C:\Documents and Settings\Owner\temp\myapp.vfs

09/05/2009  04:40 PM    <DIR>          .
09/05/2009  04:40 PM    <DIR>          ..
09/05/2009  04:40 PM                60 main.tcl
               1 File(s)             60 bytes
               2 Dir(s)  13,231,456,256 bytes free

第 6 步：使用 sdx 包装代码。 将您的工作目录放在原始临时目录中，发出以下命令来包装您的代码。

C:\Documents and Settings\Owner\temp>tclkit sdx.kit wrap myapp -runtime tclkit-w
in32.upx.exe
1 updates applied

C:\Documents and Settings\Owner\temp>dir
 Volume in drive C has no label.
 Volume Serial Number is F434-9FD3

 Directory of C:\Documents and Settings\Owner\temp

09/05/2009  04:43 PM    <DIR>          .
09/05/2009  04:43 PM    <DIR>          ..
09/05/2009  04:44 PM         1,272,604 myapp
09/05/2009  04:40 PM    <DIR>          myapp.vfs
09/05/2009  04:21 PM           105,528 sdx.kit
09/05/2009  04:31 PM         1,268,686 tclkit-win32.upx.exe
09/05/2009  04:27 PM           668,142 tclkit.exe
               5 File(s)      3,315,000 bytes
               3 Dir(s)  13,229,654,016 bytes free

第 7 步：将打包文件重命名为具有 .exe 后缀。 sdx.kit 应该已经创建了一个名为“myapp”的文件。为了运行它，您需要将其重命名为“myapp.exe”。完成此操作后，您可以通过键入命令“myapp”或双击资源管理器窗口中的图标来运行它。

C:\Documents and Settings\Owner\temp>rename myapp myapp.exe

C:\Documents and Settings\Owner\temp>myapp

如果一切顺利，应该会弹出一个带有“Hello, world”标签的窗口