我想弄清楚在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
答案 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”标签的窗口