Python 中的 TK编程

可爱的 Python:Python 中的 TK编程

http://www.ibm.com/developerworks/cn/linux/sdk/python/charm-12/

 

python checkbox 用法详解

http://www.android100.org/html/201407/13/39698.html

 

Tkinter GUI编程——pack

http://blog.sina.com.cn/s/blog_4b5039210100epkl.html

 


环境安装:

sudo apt-get install python-t

 python tkinter 窗口居中对齐:

 1     from Tkinter import *
 2     def center_window(w=300, h=200):
 3         # get screen width and height
 4         ws = root.winfo_screenwidth()
 5         hs = root.winfo_screenheight()
 6         # calculate position x, y
 7         x = (ws/2) - (w/2)   
 8         y = (hs/2) - (h/2)
 9         root.geometry('%dx%d+%d+%d' % (w, h, x, y))
10     root = Tk()
11     center_window(500, 300)
12     root.mainloop()

https://www.centos.bz/2013/01/python-tkinter-center-windows/

 

滚动条的使用:
 python入门 
http://blog.chinaunix.net/uid-13231588-id-2904121.html


http://tkinter.unpythonic.net/wiki/ScrolledFrame
A ScrolledFrame, with several bugs. 

python使用Tk时固定窗口大小:

1 from Tkinter import *
2 root=Tk()
3 root.minsize(50,50)
4 root.maxsize(150,150)
5 Label(root,text="I'm lly365").pack()
6 root.mainloop()

 

python使用Tkinter做Gui如何显示用forget隐藏的控件:

创建控件
bt=tkinter.Button(root,text='button')
bt.place(x=5,y=5)
bt.place_forget()  #隐藏控件

再次bt.place() 还有传入x=5,y=5 不然不会显示 

http://bbs.csdn.net/topics/320137780

 

 
 
  1 #!/usr/bin/env python
  2 # coding:   utf-8
  3 
  4 import os
  5 import sys
  6 import string
  7 import operator
  8 import re
  9 import threading
 10 import csv
 11 
 12 import Tkinter # import the Tkinter module
 13 
 14 from time import sleep,ctime
 15 from collections import defaultdict
 16 from collections import Counter
 17 from Tkinter import *
 18 
 19 from Tkinter import *
 20 
 21 COL_COUNT=8
 22 GM_KEYS = set(
 23         vars(Tkinter.Place).keys() +
 24         vars(Tkinter.Pack).keys() +
 25         vars(Tkinter.Grid).keys()
 26         )
 27 
 28 class ScrolledFrame(object):
 29     _managed = False
 30     # XXX These could be options
 31     x_incr = 5
 32     y_incr = 5
 33 
 34     def __init__(self, master=None, **kw):
 35         self.width = kw.pop('width', 200)
 36         self.height = kw.pop('height', 200)
 37 
 38         self._canvas = Tkinter.Canvas(master, **kw)
 39         self.master = self._canvas.master
 40         self._hsb = Tkinter.Scrollbar(orient='horizontal',
 41                 command=self._canvas.xview)
 42         self._vsb = Tkinter.Scrollbar(orient='vertical',
 43                 command=self._canvas.yview)
 44         self._canvas.configure(
 45                 xscrollcommand=self._hsb.set,
 46                 yscrollcommand=self._vsb.set)
 47 
 48         self._placeholder = Tkinter.Frame(self._canvas)
 49         self._canvas.create_window(0, 0, anchor='nw', window=self._placeholder)
 50 
 51         self._placeholder.bind('<Map>', self._prepare_scroll)
 52         for widget in (self._placeholder, self._canvas):
 53             widget.bind('<Button-4>', self.scroll_up)
 54             widget.bind('<Button-5>', self.scroll_down)
 55 
 56     def __getattr__(self, attr):
 57         if attr in GM_KEYS:
 58             if not self._managed:
 59                 # Position the scrollbars now.
 60                 self._managed = True
 61                 if attr == 'pack':
 62                     self._hsb.pack(side='bottom', fill='x')
 63                     self._vsb.pack(side='right', fill='y')
 64                 elif attr == 'grid':
 65                     self._hsb.grid(row=1, column=0, sticky='ew')
 66                     self._vsb.grid(row=0, column=1, sticky='ns')
 67             return getattr(self._canvas, attr)
 68 
 69         else:
 70             return getattr(self._placeholder, attr)
 71     def yscroll(self, *args):
 72         self._canvas.yview_scroll(*args)
 73     def scroll_up(self, event=None):
 74         self.yscroll(-self.y_incr, 'units')
 75     def scroll_down(self, event=None):
 76         self.yscroll(self.y_incr, 'units')
 77     def see(self, event):
 78         widget = event.widget
 79         w_height = widget.winfo_reqheight()
 80         c_height = self._canvas.winfo_height()
 81         y_pos = widget.winfo_rooty()
 82 
 83         if (y_pos - w_height) < 0:
 84             # Widget focused is above the current view
 85             while (y_pos - w_height) < self.y_incr:
 86                 self.scroll_up()
 87                 self._canvas.update_idletasks()
 88                 y_pos = widget.winfo_rooty()
 89         elif (y_pos - w_height) > c_height:
 90             # Widget focused is below the current view
 91             while (y_pos - w_height - self.y_incr) > c_height:
 92                 self.scroll_down()
 93                 self._canvas.update_idletasks()
 94                 y_pos = widget.winfo_rooty()
 95 
 96 
 97     def _prepare_scroll(self, event):
 98         frame = self._placeholder
 99         frame.unbind('<Map>')
100 
101         if not frame.children:
102             # Nothing to scroll.
103             return
104         for child in frame.children.itervalues():
105             child.bind('<FocusIn>', self.see)
106 
107         width, height = frame.winfo_reqwidth(), frame.winfo_reqheight()
108         self._canvas.configure(scrollregion=(0, 0, width, height),
109                 yscrollincrement=self.y_incr, xscrollincrement=self.x_incr)
110         self._canvas.configure(width=self.width, height=self.height)
111 
112 
113 def test_04():
114     root = Tkinter.Tk()
115     
116     center_window(root,850,580) 
117     root.minsize(850,580)
118     root.maxsize(850,580)
119     sf = ScrolledFrame()
120     sf.grid(row=0, column=0, sticky='nsew')
121     sf.master.grid_columnconfigure(0, weight=1)
122     sf.master.grid_rowconfigure(0, weight=1)
123     
124     for _ in range(10):
125         lbl = Tkinter.Label(sf, text="Hi")
126         lbl.pack()
127         btn = Tkinter.Button(sf, text="Buh")
128         btn.pack()
129         entry = Tkinter.Entry(sf)
130         entry.pack()
131     
132     root.mainloop()
133 
134 def test_05():
135     root = Tkinter.Tk() # create a root window
136     root.title('demux and protocol of the ffmpeg config')
137     states = []      
138     #root['width']=1000
139     #root['height']=500
140     center_window(root,850,580) 
141     root.minsize(850,580)
142     root.maxsize(850,580)
143     sf = ScrolledFrame()
144     sf.grid(row=0, column=0, sticky='nsew')
145     sf.master.grid_columnconfigure(0, weight=1)
146     sf.master.grid_rowconfigure(0, weight=1)
147     Label(sf,text = 'please select demux type:').place(x=5,y=10)
148     #frame = Frame(root, width=500, height=400, bd=1)
149     #frame.pack()
150     #iframe1 = Frame(frame, bd=2, relief=SUNKEN)
151     chk_demux_list=[]
152     for i in range(10):
153         var = IntVar()
154         chk = Checkbutton(sf, text=str(i), variable=var)
155         if i+1<=COL_COUNT:
156             chk.place(x=i*100+30,y=10+30*(i/COL_COUNT+1))
157         else:
158             chk.place(x=(i%COL_COUNT)*100+30,y=10+30*(i/COL_COUNT+1))
159         #chk.pack(side=LEFT)
160         states.append(var)
161         chk_demux_list.append(chk)
162     #Label(root,text = 'please select protocol type:').place(x=5,y=30+chk_demux_list[len(chk_demux_list)-1].winfo_y())
163     Label(sf,text = 'please select protocol type:').place(x=5,y=250)
164     root.mainloop() # create an event loop
165     #print states
166     #for var in states:
167     #    print var.get()
168     #print map((lambda var: var.get()), states) 
169 def center_window(root,w=300, h=200):
170     # get screen width and height
171     ws = root.winfo_screenwidth()
172     hs = root.winfo_screenheight()
173     # calculate position x, y
174     x = (ws/2) - (w/2)   
175     y = (hs/2) - (h/2)
176     #80x80代表了初始化时主窗口的大小,0,0代表了初始化时窗口所在的位置
177     root.geometry('%dx%d+%d+%d' % (w, h, x, y))
178 def test_02():
179     root = Tkinter.Tk() # create a root window
180     root.title('demux and protocol of the ffmpeg config')
181     states = []      
182     #root['width']=1000
183     #root['height']=500
184     Label(root,text = 'please select demux type:').place(x=5,y=10)
185     center_window(root,850,580) 
186     root.minsize(850,580)
187     root.maxsize(850,580)
188     #frame = Frame(root, width=500, height=400, bd=1)
189     #frame.pack()
190     #iframe1 = Frame(frame, bd=2, relief=SUNKEN)
191     chk_demux_list=[]
192     for i in range(100):
193         var = IntVar()
194         chk = Checkbutton(root, text=str(i), variable=var)
195         if i+1<=COL_COUNT:
196             chk.place(x=i*100+30,y=10+30*(i/COL_COUNT+1))
197         else:
198             chk.place(x=(i%COL_COUNT)*100+30,y=10+30*(i/COL_COUNT+1))
199         #chk.pack(side=LEFT)
200         states.append(var)
201         chk_demux_list.append(chk)
202     #Label(root,text = 'please select protocol type:').place(x=5,y=30+chk_demux_list[len(chk_demux_list)-1].winfo_y())
203     Label(root,text = 'please select protocol type:').place(x=5,y=250)
204     root.mainloop() # create an event loop
205     #print states
206     #for var in states:
207     #    print var.get()
208     #print map((lambda var: var.get()), states) 
209 
210 
211 
212 
213 def test_03():
214     root = Tk()
215     root.title("Note Taker")
216     def Button1():
217         listbox.insert(END, "button1 pressed")
218     def Button2():
219         listbox.insert(END, "button2 pressed")
220     def Button3():
221         text_contents = text.get()
222         listbox.insert(END, text_contents)
223         text.delete(0,END)
224     button1 = Button(root, text="button1", command = Button1)
225     button2 = Button(root, text="button2", command = Button2)
226     button3 = Button(root, text="button3", command = Button3)
227     text = Entry(root)
228     scrollbar = Scrollbar(root, orient=VERTICAL)
229     listbox = Listbox(root, yscrollcommand=scrollbar.set)
230     scrollbar.configure(command=listbox.yview)
231     text.pack()
232     button1.pack()
233     button2.pack()
234     button3.pack()
235     listbox.pack()
236     scrollbar.pack()
237     root.mainloop() 
238 
239 def test_01():
240     #content  ==>  ###pos=350143600,pts=2676718###
241     #filename="F:\\yingc\\work\\goxceed-dvbs-hd\\6605\\solution\\aa"
242     filename="./aa"
243     pos=-1
244     dts=-1
245     poslist=[]
246     dtslist=[]
247     
248     str1="###pos="
249     str2=",pts="
250     
251     f = open(filename)
252     for line in f:
253         aa=line[0:len(str1)]
254         if aa == str1:
255             pos=line[len(str1):line.index(str2)]
256             dts=line[line.index(str2)+len(str2):len(line)-3-1]
257             poslist.append(pos)
258             dtslist.append(dts)
259     f.close()
260     
261     #s=[11,22,11,44,22,33]
262     d = defaultdict(list)
263     for k,va in [(v,i) for i,v in enumerate(poslist)]:
264         d[k].append(va)
265     #print  d.items()
266     count=0
267     for value in d.items():
268         if len(value[1])>1:
269             print value
270             count=count+1
271     print "poslen:"+str(len(poslist))+",dtslen"+str(len(dtslist))
272     print str(len(d))+","+str(count)
273 
274     #d = defaultdict(list)
275     #for k,va in [(v,i) for i,v in enumerate(dtslist)]:
276     #    d[k].append(va)
277     ##print  d.items()
278     #for value in d.items():
279     #    if len(value[1])>4:
280     #        print value
281 
282     ##print Counter([11,22,11,44,22,33])
283 
284 
285 
286 
287 if __name__ == "__main__":
288     test_02()
289     print "finish"
290 
291     
292     
293     
294 
295     
296 
297 
298     
299     
300     
301 
302     

 

Python:tkinter-Parent获取弹出窗口的返回值
http://blog.sina.com.cn/s/blog_ac9fdc0b0101naol.html


Tkinter里没有messagebox,
在Python2.5里,要从 tkMessageBox导入
from tkMessageBox import * 然后直接用showinfo()来实现输出 showinfo(message=“hello”) 这个时候不需要使用任何窗口路径来调用它,直接调用它就可以了。

 







aa
Tcl_TK编程权威指南pdf 内容简介回到顶部↑Tcl/Tk是第一种能通过Windows、Macintosh和Solaris等主要平台处理企业级任务的脚本语言。本书共分为55章,依次详细讲述了Tcl基础、Tcl高级特性、TK基础、TK组件、TK详解、C语言编程、各版本之间的差异等方面的知识,并通过大量实例,生动翔实地向读者介绍了Tcl/Tk编程,是读者掌握Tcl/Tt的必备参考书。 本书适合各个层次的读者阅读。 目录回到顶部↑第1部分 tcl基础 第1章 tcl的基本知识 tcl命令 hello,world! 变量 命令替换 数学表达式 反斜杠替换 使用花括号和双引号进行分组 过程 一个阶乘的例子 更多有关变量的知识 更多有关数学表达式的内容 注释 有关替换与分组的总结 要点 参考 第2章 开始使用 source命令 unix上的tcl脚本程序 .windows 95的开始菜单 macintosh与resedit console命令 命令行变元 预定义变量 第3章 cgi应用程序--顾客留言簿 html简介 使用cgi创建动态页面 guestbook.cgi脚本程序 定义表单以及处理表单数据 cgi.tcl软件包 接下去的几步 第4章 tcl的字符串处理 string命令 append命令 format命令 scan命令 binary命令 相关章节 第5章 tcl列表 tcl列表 构建列表 获取列表元素 修改列表 搜索列表 对列表进行排序 split命令 join命令 相关章节 第6章 控制结构命令 if then else switch while foreach for break与continue catch error return 第7章 过程与作用域 proc命令 使用rename来改变命令名 作用域 global命令 通过upvar以名字进行调用 使用upvar来处理变量别名 第8章 tcl数组 数组的语法 array命令 使用数组来构建数据结构 第9章 对文件和程序的操作 使用exec运行程序 file命令 跨平台的文件命名方式 操作文件和目录 文件属性 对i/o命令的总结 打开文件用于i/o操作 读写操作 当前目录-cd和pwd 使用glob来匹配文件名 exit和pid命令 环境变量 registry命令 第2部分tcl高级特性 第10章 引用问题与eval 使用list命令来构建代码 在eval内部利用concat uplevel命令 subst命令 第11章 正则表达式 何时使用正则表达式 正则表达式的语法 高级正则表达式(are) 语法总结 regexp命令 rgsub命令 使用regsub将数据转换为程序 其他使用正则表达式的命令 第12章 脚本库及软件包 确定软件包的位置:auto-path变量 使用软件包 对软件包加载的总结 package命令 基于文件tclindex的库 unknown命令 方便交互 tclshell的库环境 编码风格 第13章 反射与调试 clock命令 info命令 跨平台支持 跟踪变量的值 交互式命令历史记录 调试 scriptics的tclpro 其他工具 性能调校 第14章 名字空间 使用名字空间 名字空间变量 命令查找 嵌套名字空间 过程的进口与输出 回调与名字空间 内省(introspection) namespace命令 转换现有的软件包以使用名字空间 [incrtcl]对象系统 注意事项 第15章 国际化(internationalization) 字符集与编码 消息目录 第16章 事件驱动的编程 tcl事件循环 after命令 fileevent命令 vwait命令 fconfigure命令 第17章 套接字编程 客户端套接字 服务器端套接字 回送(echo)服务 使用http获取一个url http软件包 基本认证 第18章 tclhttpd web服务器 将 tclhttpd与你的应用程序集成 域处理程序 应用执导的url 文档类型 html+tcl模板 表单处理程序 编程参考 标准应用执导(application-dirct)的url tclhttpd发行版 服务器配置 第19章 多解释器与 safe-tcl interp命令 创建解释器 安全解释器 命令别名 隐藏命令 替换 从安全解释器执行i/o操作 安全基础 安全策略 第20章 safe-tk与浏览器插件 子解释器tk 浏览器插件 安全策略与浏览器插件 配置安全策略 第3部分 tk基础 第21章 tk的基本知识 th的hello,world! tk组件的命名 配置tk组件 tk组件属性与资源数据库 tk命令概要 第22章 tk实例解析 execlog example browser tcl shell 第23章 打包摆放布局管理器(pack) 朝一侧摆放 水平与垂直难叠 空腔模型( cavity model) 打包摆放空间(packing space)与显w空间(display space) 尺寸调整与一expand 挂靠 摆放顺序 选择用于摆放的父组件 取消一个组件的摆放 打包器总结 窗口的堆叠顺序 第24章 栅格摆放布局管理器( grid) 一种基本栅格 跨行列摆放 行列约束 grid命令 第25 章定位摆放布局管理器( place) place的基础知识 面板管理器 place命令 第26章 将命令与事件编联 bind命令 bindtags命令 事件的语法 修饰符 事件序列 虚拟事件 事件关键词 第4部分 tk组件 第27章 按钮与菜单 按钮命令与作用域问题 与tcl变量关联的按钮 按钮属性 按钮操作 菜单和菜单按钮 键盘遍历 操纵菜单和菜单条目 菜单属性 通过名字来指定菜单的软件包 第28章 资源数据库 有关资源的介绍 加载选项数据库 添加单一的数据库条目 存取数据库 用户定义的按钮 用户定义的菜单 第29章 简单的tk组件 框架组件与顶层窗口 标签组件 消息组件 标尺组件 bell命令 第30章 滚动条 使用滚动条 滚动条协议 滚动条组件 第31章 输入条组件 使用输入条组件 输入条组件 第32章 列表框组件 使用列表框组件 列表框组件的编联 列表框组件的属性 第33章 文本组件 文本索引 文本标记 文本标签 文本信息的选择( selection) 标签的编联 文本搜索 嵌入组件 图片的嵌入 查看文本组件的内部信息 文本组件的编联 文本组件的操作 文本组件的属性 第34章 画布组件 画布坐标 hello, world! 最小和最大标尺的例子 画布对象 画布组件的操作 产生postscript输出 画布组件的属性 建议 第5部分 tk详解 第35章 选择和剪贴板 选择模型 selection命令 clipboard命令 选择处理程序 第36章 焦点、焦点的捕获和对话框 标准对话框 定制对话框 使用update命令实现动画 第37章 tk组件的属性 配置属性 尺寸 边界与浮雕效果 焦点的高亮显示 补自(padding)与挂靠(anchor) 第38章 颜色、图片和鼠标指针 颜色 色彩映射与视频种类 位图和图片 文本插入光标 鼠标指针 第39章 字体与文本属性 字体命名 x字体名 字模 font命令 文本属性 栅格化、尺寸调整和布局 一个字体选择应用程序 第40章 send send命令 发送者脚本 通信进程 通过套接字来实现远程eval 第41章 窗口管理器与窗口信息 win命令 winfo命令 tk命令 第42章 管理用户首选项 应用默认设置文件 定义首选项 首选项的用户界面 管理首选项文件 跟踪对首选项变量的修改 对该软件包的改进 第43章 一种操作编联的用户界面 一对协调工作的列表框 编辑界面 保存与加载编联 第6部分 c语言编程 第44章 c语言编程与tcl 基本概念 创建可加载软件包 一个用c语言实现的命令过程 blob命令的例于 字符串与国际化 tolmain和tcl-applnit tk_main 事件循环 从c调用脚本 第45章 编译tci及扩展模块 标准目录结构 从源代码建立tci 使用占位函数库(stub library) 使用autoconf 扩展模块范例 makefile.in 第46章 使用c语言编写tk组件 初始化扩展模块 组件的数据结构 组件的类命令 组件实例命令 配置和重新配置属性 指定组件属性 时钟的显示 窗口事件过程 最后的清除工作 第47章 c函数库概览 tclc函数库概览 tk c函数库概览 第7部分 各版本之间的差异 第48章 tcl 7.4/tk 4.0 wish 过时废弃的功能 cgct操作 输入焦点的高亮显示 编联 滚动条接日 pack info 焦点 send命令 按钮的内部补白 单选按钮的值 输入条组件 菜单 列表框 没有了geometry属性 文本组件 颜色属性 颜色分配与tk colormodel 画布组件的scrollincrement 选择 bell命令 第49章 tcl 7.5/tk 4.1 跨平台脚本 clock命令 load命令 package命令 多个foreach循环变量 事件循环从tk转移到了tcl 网络套接字 多解释器与safe-tcl grid布局管理器 文本组件 输入条组件 第50章 tcl7.6/tk 4.2 更多的file操作 虚拟事件 标准对话框 新的grid布局管理器 macintosh的unsupportedl命令 第51章 tcl/tk 8.0 tcl编译器 名字空间 safe-tcl 新的lsort tcl_precision变量 2000年约定 http软件包 串行线i/o 独立于平台的字体 tk scaling命令 应用程序的嵌入 本地化菜单与菜单条 cde的边界宽度 本地化的按钮和滚动条 文本组件的图片 destroy不再产生错误 grid rowconfigure 补丁版本 第52章 tcl/tk 8.1 unicode与国际化 线程安全 高级正则表达式 新字符串命令 dde扩展模块 杂类 第53章 tcl/tk 8.2 trf补丁 更快的字符串操作 空数组名 浏览器插件的兼容性 第54章 tcl/tk 8.3 关于tcl的修改建议 关于tk的改动建议 第55章 有关本书的cd-rom ↓展开全部内容 序言回到顶部↑Tcl为工具命令语言(Tool Command Language)的缩写。它其实是指两样东西:一种脚本语言,以及该脚本语言的解释器。该解释器可以很容易地嵌入到你的应用程序。Tcl和与之关联的图形用户界面工具包(Tk)是由加州大学的John Ousterhout教授设计并编写的。尽管它是个商用软件包,但你也可以在Internet上找到它(见第VII页),而且可以在自己的应用程序自由使用这个软件包。Tcl解释器已经从Unix平台移植到了DOS、Windows、OS/2、NT以及Macintosh环境,而TK工具包也从X window系统移植到了Windows和Macintosh环境。 1988年,当我在Berkeley做ousterhout教授的博士生时,第一次听说了Tcl。我们当时正在设计一种名为Sprite的网络操作系统。同学们在努力编制一个新式的内核程序,而John编写了一个新的编辑器和终端仿真程序。他使用Tcl作为这两种工具的命令语言,这样用户就可以定义菜单或者对那些程序进行定制。那时还处在使用X10的时代,他计划编写一个基于Tcl的X工具包,以使程序之间通过Tcl命令进行通信,彼此相互协作。对我来说,这种工具之间的相互协作就是Tcl的实质。 这种早期的设想就是让应用程序由包含编译代码的大块实体和一小部分用于进行配置和编写高级命令的Tcl代码组成。John的编辑器皿,还有终端仿真程序tx就遵循了这种模式。虽然这种模式仍然是有效的,但结果表明用Tcl来编写整个应用程序也是可能的。这是因为Tcl/Tk的shell程序wish提供了对其他程序、文件系统和网络套接字的存取功能,同时还能够创建图形用户界面。不管怎样,现在发现包含几千行Tcl脚本的应用程序并不稀奇。 我编写这本书的原因就是,虽然自己觉得使用Tcl与Tk既有乐趣又高效,但是也有令人头痛的时候。此外,在Xerox PARC工作,那里有许多语言和系统上的专家,我不得不强迫自己去理解Tcl/Tk的长处和弱点。我的许多同事都在他们的项目采用了Tcl和Tk,但是他们也很快指出了它的缺点。因此,我就总结了一套编程技巧以充分利用Tcl/Tk的强大功能,同时回避一些棘手的问题。这本书就是一本帮助你最大限度地利用Tcl/Tk并回避一些我所经历过的令人头痛的问题的实用编程指南。 我接触Tcl语言大概已经有10年的时间了,而本书的第一版也已经出版5年了。在过去的几年,我一直在John Ousterhout的手下工作,最初是在Sun微系统公司,而现在是在Scriptics公司。我一直使自己在很大程度上保持着一个Tcl程序员的角色,而我们工作组的其他人员则埋头于Tcl本身的C语言实现。我创建的应用程序有HTML编辑器、EMAIL比用户接口程序、Web服务器以及用户数据库,我们的商务应用就建立在它们的基础上。这些经历在本书有所反映。本书的大部分内容是有关Tcl脚本编程的,而有关使用C语言来创建Tcl扩展模块的内容没有着重讲述。我有幸一直参与Tcl核心技术的开发活动,希望通过本书能够将自己使用Tcl时获得的切身体会表达出来。 为什么要使用Tcl 作为一种脚本语言,Tcl与其他的Unix shell语言,如Bourne Shell(sh)、C Shell(csh)、Korn Shell以及Perl类似。Shell程序可以让你执行其他的程序。它们提供了足够的可编程特性(变量、流程控制和过程),使你可以将现有程序组装成符合自己需要的复杂的脚本程序。Shell程序非常适用于一些日常任务的自动化处理工作。 Tcl解释器可以很容易地添加到你的应用程序,这种能力将它与其他的shell语言区分开来。Tcl扮演了一种扩展语言的角色,用来配置和定制应用程序。你没有必要再去为自己的新应用程序发明一种命令语言,或是费力为自己的工具提供某种用户可编程特性。其实,你可以通过添加一个Tcl解释器,来将自己的应用程序组织成一组操作原语,并使用这些原语来构造最符合用户需求的脚本程序。这样还可以允许其他的程序通过编程来控制你的应用程序,以使套装应用程序能够很好地在一起工作。 Tcl的C函数库拥有清晰的接口而且便于使用。该函数库实现了基本的解释器,它有一套实现变量、流程控制和过程的核心脚本命令,而且还有一组用来存取操作系统服务以运行其他程序、存取文件系统和使用网络套接字的命令。Tcl和Tk提供了一台可以在UNIX、Windows和Macintosh环境可移植的"虚拟机"。 因为你的应用程序可以定义新的Tcl命令,所以Tcl虚拟机是可扩展的。这些命令与你的应用程序所提供的C或C++过程关联。结果应用程序就分割成一组用编译语言编写的原语,并输出成为相应的Tcl命令。使用Tcl脚本程序可以将这些原语组装成完整的应用程序。脚本语言层可以存取与shell类似的功能以运行其他的程序,可以存取文件系统,还可以直接通过自己定义的Tcl命令来调用应用程序编译的代码部分。此外,从C编程的层面上来说,你还可以调用Tcl脚本程序、设置和询问Tcl变量,甚至跟踪Tcl解释器的执行。 在Internet上有许多可自由使用的Tcl扩展模块。许多扩展模块都包含了一个提供某种新功能的C函数库,以及该函数库的Tcl接口。这样的例子包括数据库存取、电话控制、MIDI控制器存取,还有expect,它为控制交互式程序增加了一组Tcl命令。 最为著名的扩展模块就是Tk,这是一种图形用户界面工具包。Tk定义了用来创建和操作用户界面组件的Tcl命令。这种基于脚本的用户界面编程方法有三个好处: . 由于快速的响应周期,所以开发迅速,不存在漫长的编译等待过程。 . Tcl命令提供了一种比绝大多数由标准C函数库实现的用户界面工具包更为高级的接口。它只需一小组命令就可以定义简单的用户界面,同时又可以对用户界面进行细化以恰当地实现每一个细节。快速的响应周期又为这种细化过程提供了帮助。 用户界面处理可以从你的应用程序的其余部分分离出来。因而开发人员能够专心致志地实现应用程序的核心部分,然后再颇为轻松地构建出用户界面。Tk组件的核心功能通常能够满足你所有的用户界面需求。不过,你还可以用C语言来编写定制的Tk组件,而且网上还有许多大家提供的Tk组件可以使用。 还有其他可以用做扩展语言的选择,这包括VisualBasic、Scheme、Elisp、Perl;Python和Javascript等,你可以依照个人喜好从进行选择。Tcl拥有简单的结构,而且还有些地方类似于C语言,可以通过编制C过程来增添新的Tcl原语。Tcl非常易学,许多有关用户使用Tcl在很短的时间内(例如几个星期)就完成了相当难度的项目,并且他们以前压根就没有接触过Tcl。 当本书第一次出版时,Java轰动了计算机界。Java是一种极为优秀的系统编程语言,长远来看还有可能代替C和C什语言。这对Tcl来说挺好,它在设计时就被用来将由任意系统编程语言编写的构件粘连起来。Tcl过去被设计与C语言一起工作,但是现在已经被改造成能够与Java虚拟机一起工作。在我们提到"C或C++"的地方,现在也可以说"C、C++或Java"了,但是对于Java来说,其细节上还多少存在些差异。这本书并没有描述TcVJava接口,但是你可以在CD-ROM上找到TclBlend。TclBlend将Java虚拟机加载到你的Tc3应用程序并允许你调用Java方法,它还可以让你使用Java而不是C或C十十来实现Tcl命令。 Javascript是一种来自于Netscape的语言,它被设计用来编写与w曲页面进行交互的脚本程序。由于Netscape的广泛使用,Javascript就显得很重要,然而Tcl提供了一种更为通用的脚本方案,可以在更为广泛的范围使用。Tcl/Tk的Web浏览器插件提供了一种在浏览器运行Tcl的方式,结果使得Tcl更像是一种Java的替代品而不是Javascript的替代品。该插件可以让你在浏览器执行Tcl应用程序,而Javascript则为你提供了对浏览器和HTML显示的精细控制。这种插件将在第20章有所描述。TcI与Tk的版本 Tcl与Tk仍在继续演变。请参看http://www.beedub.com/book/来了解有关最新的Tcl版本的更新和消息。由于历史原因,Tcl与Tk曾各有各的版本号,但是它们成对发行,并一起工作。这本书的原始版本基于Tcl7.4和Tk 4.0并有几处引用了Tk 3.6的功能。第三版已经进行了更新,它反映了直到Tcl/Tk8.2以来所增添的各种新特性: . Tcl7.5和Tk 4.1的最终发布在1996年5月。这些版本的特点是将Tk移植到了Windows和Macintosh环境。它引入了Safe-Tcl安全机制,以支持网络小应用程序(Applet)的 .安全执行。它还提供了对网络套接字的支持以及一种新的输入输出(I/O)子系统,以支持高性 能的事件驱动I/O。 . Tcl7.6和Tk4.2的最终发布是在1996年的10月。这些版本包含了对S池-Tcl的改进,以及对在Tk 4.1引进的grid布局管理器的改进。跨平台的支持包括虚拟事件(例如,以<<Copy>>宋代表<Control-c>=、标准对话框,还有更多的文件操作命令。 . Tcl 7.7和Tk 4.3是内部版本,用于开发NetscapeNavigator和MicrosoftInternetExplorer Web浏览器的Tcl/Tk插件。它们的开发工作实际上与Tcl7.6和Tk 4.2并行进行。Tcl/Tt插件已经发布了许多各种平台上的版本,其包括Solaris/SPARC、Solaris/INTEL、SunOS、Linux、Digital UNIX、IRIX、HP/UX、Windows95、Windows NT以及Macintosh。该浏览器插件支持Web页面的Tcl小应用程序(Applet),同时使用Safe-Tcl复杂的安全机制来提供安全保证。 . Tcl8.0为Tcl新增了一个运行时用的编译器,这个编译器提供了数倍于Tcl脚本的执行速度。Tcl8.0支持内嵌空字符的字符串。编译器对脚本来说是透明的,但是扩展模块编写入员需要学习一些新的C API才能发挥它的潜力。由于John Ousterhout从Sun微系统公司到了Scriptics公司,发布8.0版的时间推迟了几年。广泛使用的版本8.0p2是在1997年完成的,但是最终的补丁版本8.0.5直到1999年春才发布。 . 在8.0时,Tk更改了版本号以与Tcl相匹配。Tk 8.0包含了一种新的独立于平台的字体机制,它还包含了本地化菜单和菜单条,以及更多的本地化组件,它们在Windows和Macintosh上拥有更好的本地化外观。 Tcl/Tk8.1新特性主要包括对Unicode的完整支持,以及线程安全,这样你就可以将Tcl嵌入到多线程的应用程序。Unicode是一种新的正则表达式引擎,它提供了在Perl5所能找到的所有功能。Tk为找到正确的用于显示Unicode字符的字体完成了卓越的工作,它还增加了一种信息目录设施,这样你就可以编写国际化的应用程序。Tcylk 8.1的发布史还包括了Sun到Scriptics的过渡。第一个alpha版本完成于1997年秋,而最终的补丁版本完成于1999年5月。 Tcl/Tk 8.2主要是一个进行bug修正和稳固化的版本。它对TclC函数库API进行了几处微小增补,这样无须核心补丁程序也能支持更多的扩展模块。Tcl/Tk 8.2很快在1999年夏进入最终版本。 谁应当阅读本书 本书不仅适用于熟练的编程人员,同样也适用于初学者。对于初学者和熟练编程人员来说,我建议大家仔细学习一下策1章"Tcl的基本知识"。Tcl的编程模型被设计成一种简单的模式,它与许多编程语言存在差异。该模型基于字符串替换,你对这一点的正确理解很重要,这样才能避免在复杂情况下遇到麻烦。这本书的其余部分则包含了演示如何高效地使用Tcl与Tt的例子。每一章都有对其所描述的Tcl命令和Tk组件进行总结的表格,以供参考。 本书假定你有一些编程经验,但是你如果是个彻头彻尾的新手也能够读下去。对Unix shell的了解将会对你有所帮助,但这并不是必须的。在那些涉及Windows系统的地方,我会提供一些背景信息。第2章详细描述了在UNIX、Windows和Macintosh上使用Tcl与Tk的内容。 如何阅读本书 本书最好能在上机实习使用,可以在计算机上尝试一下书的例子。Tcl与Tk的命令手册尽管完整但却缺少上下文的的相关信息和例子,本书就试图填补在简明手册与现有的文档化或没有很好文档化的Tcl程序之间的空隙。 我推荐使用联机手册来查阅有关的Tcl/Tk命令。它为每个命令都提供了详细的参考指南,但是它没能提供完整的细节,这在每一次发布的版本都有所不同。HTML版本的联机手册可以在随书的CD-ROM找到。
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值