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

时间:2009-09-04 14:23:34

标签: tcl tk starkit

我想弄清楚在Windows中创建Tcl starkit的基本步骤。之前我曾问过类似的问题,并购买了一本关于Tcl编程的书,访问了wiki.tcl.tk,直接通过电子邮件发送了Tcl程序员等等......总而言之,我从我的资源中得到了很好的反馈。网站;但是,在构建批处理文件,使用命令控制台和创建目录时,我没有解释说我是一个完整的新手。

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

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

这似乎太多了,但如果有人可以翻译以超级新手术语创造一个starkit,我会非常感激。我希望有类似的东西:在tclkitsh控制台中,输入以下内容......;在tclkit.exe中,键入以下内容...;现在你应该......并且。

谢谢,

DFM

1 个答案:

答案 0 :(得分:19)

步骤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”标签的窗口