滚动条小部件是无需文本或画布小部件即可工作的滚动小部件。滚动条小部件的语法如下所示。 scrollbarscrollbarNameoptions Scrollbar参数 下表列出了可用于滚动条小部件的选项。 Sr.No. Syntax&Remark 1 -backgroundcolor用于设置小部件的背景颜色。 2 -borderwidthwidth用于在3D效果中使用边框绘制。 3 -orienorientation设置小部件的方向。它可以是水平或垂直的。 4 reliefcondition设置此小部件的3D浮雕。 5 -reliefcondition...

比例小部件用于通过滑块选择数字值。scale小部件的语法如下所示 scalescaleNameoptions Scale参数 下表中列出了可用于缩放窗口小部件的选项 Sr.No. Syntax&Remark 1 -backgroundcolor用于设置小部件的背景颜色。 2 -borderwidthwidth用于在3D效果中使用边框绘制。 3 -fontfontDescriptor用于设置小部件的字体。 4 -foregroundcolor用于设置小部件的前景颜色。 5 -frompadynumber小部件的范围起始值。 6 -variablevar...

顶层窗口小部件用于创建一个框架，该框架是新的顶层窗口。顶级小部件的语法如下所示 topleveltopLevelNameoptions Toplevel参数 下表列出了顶级窗口小部件可用的选项: Sr.No. Syntax&Remark 1 -backgroundcolor用于设置小部件的背景颜色。 2 -borderwidthwidth用于在3D效果中使用边框绘制。 3 heightnumber用于设置小部件的高度。 4 -padxnumber设置小部件的padx。 5 -padynumber设置小部件的pady。 6 reliefconditio...

位图小部件用于将位图添加到画布。位图小部件的语法如下所示 canvasNamecreatebitmapxyoptions x和y设置位图的位置 Bitmap参数 下表在下面列出了可用于位图小部件的选项 Sr.No. Syntax&Remark 1 -anchorposition位图将相对于x和y位置定位。中心默认为默认值，其他选项为n，s，e，w，ne，se，sw和nw。 2 -bitmapname定义要显示的位图。  位图小部件的一个简单示例如下所示 !/usr/bin/wish canvas.myCanvas-backgroundred-wid...

Combobox小部件是将条目与可供使用的选项列表结合在一起的小部件。组合框窗口小部件的语法如下所示 comboboxcomboboxNameoptions Combobox参数 下表中列出了可用于组合框窗口小部件的选项。 Sr.No. Syntax&Remark 1 -backgroundcolor用于设置小部件的背景颜色。 2 -borderwidthwidth用于在3D效果中使用边框绘制。 3 -fontfontDescriptor用于设置小部件的字体。 4 -foregroundcolor用于设置小部件的前景颜色。 5 -textvariable...

switch语句可以让一个变量值的列表进行相等测试。每个值被称为一个的情况(case)，该变量被接通检查每个switchcase。 switch语法 switchswitchingString{ matchString1{ body1 } matchString2{ body2 } ... matchStringn{ bodyn } } switch流程图 switch-示例 !/usr/bin/tclsh setgradeB; switch$grade{ A{ puts"Welldone!" } B{ puts"Excellent!" } C{ puts"Youpassed!"...

Tcl允许在另一个循环中嵌套循环。 nestedloops语法 Tcl语言中嵌套nestedfor循环语句的语法如下 for{initialization}{condition}{increment}{ for{initialization}{condition}{increment}{ statement(s); } statement(s); } Tcl语言中的嵌套nestedwhile循环语句的语法如下 while{condition}{ while{condition}{ statement(s); } statement(s); } nestedloops示例 以下程序使用嵌套...

图像小部件用于创建显示的图像项目。可以从GIF，PNG，PPM，PGM或X位图图像创建图像。图像小部件的语法如下所示。 canvasNamecreateimagexyoptions x和y设置位图的位置。 Image选项 下表中列出了图像小部件可用的选项 Sr.No. Syntax&Remark 1 -iamgeimageName保存要显示的图像的变量。 图像小部件的一个简单示例如下所示 !/usr/bin/wish canvas.myCanvas-backgroundred-width100-height100 pack.myCanvas setmyImage...

Progressbar窗口小部件用于提供长时操作(如文件上传)进度的视觉反馈。进度栏小部件的语法如下所示 progressbarprogressbarNameoptions Progressbar参数 下表在下表中列出了Progressbar小部件可用的选项 Sr.No. Syntax&Remark 1 -lengthnumber设置小部件的长度。 2 -maximumnumber设置最大可能值。默认值为100。 3 -modemode模式可以是不确定的或不确定的。 4 -orienorientation设置小部件的方向。它可以是水平或垂直的。 5 -v...

nestedswitch语法 switchswitchingString{ matchString1{ body1 switchswitchingString{ matchString1{ body1 } matchString2{ body2 } ... matchStringn{ bodyn } } } matchString2{ body2 } ... matchStringn{ bodyn } }  nestedswitch示例 !/usr/bin/tclsh seta100 setb200 switch$a{ 100{ puts"Thisispartofouter...

pack小部件是一个矩形容器小部件，将用于设计GUI的小部件分组。打包小部件的语法如下所示。 packpackNameoptions Pack参数 下表中列出了可用于pack小部件的选项 Sr.No. Syntax&Remark 1 -sideside将小部件打包到父窗口的给定侧。它可以是顶部，底部，左侧和右侧。默认值为top。 2 -anchoredge如果宽度小于分配的空间，则Pack小部件将锚定到特定侧。有效边为n，e，w和s。 3 -expandboolean用于使小部件具有可用空间。 4 -padxnumber设置小部件的padx。 5 -pa...

Tcl语言中的break语句用于终止循环。当在循环内遇到break语句时，循环立即终止，程序控制在循环后的下一条语句处恢复。 breakstatement语法 Tcl中break语句的语法如下 break; breakstatement流程图 breakstatement示例 !/usr/bin/tclsh seta10 while循环执行 while{$a<20}{ puts"valueofa:$a" incra if{$a>15}{ 使用break语句终止循环 break } } 编译并执行上述代码后，将产生以下输出 valueofa:10 valueofa:11 ...

画布文本小部件用于在画布中绘制文本。画布文本小部件的语法如下所示 canvasNamecreatetextxyoptions x和y用于确定文本的位置 Text参数 下表中列出了画布文本小部件可用的选项 Sr.No. Syntax&Remark 1 -anchorposition文本将相对于x和y位置定位。中心是默认设置，其他选项是n，s，e，w，ne，se，sw和nw。 2 -justifystyle确定多行，应右对齐，左对齐或居中对齐。默认为左。 3 -fillcolor填充颜​​色用该颜色填充椭圆形。 4 -texttext文本小部件的文本。 5 ...

对话框小部件用于显示对话框 tk_dialogwindowtitledetailTextbitmapdefaultstring1...stringn 下表中列出了窗口小部件的上述每个选项的使用，并且需要以相同的顺序使用它们 Sr.No. Syntax&Remark 1 window确定对话框的顶级窗口的名称，并删除所有以此名称命名的现有窗口。 2 title小部件的标题。 3 detailText小部件的详细信息文本。 4 bitmap位图(以适合Tk_GetBitmap的形式)显示在对话框的顶部，文本的左侧。如果这是一个空字符串，则对话框中不会显示任何位图...

多边形小部件用于在画布中绘制多边形。多边形小部件的语法如下所示 canvasNamecreatepolygonx1y1x2y2...xnynoptions x1y1和x2y2...xnyn用于确定多边形的端点。 Polygon参数 下表列出了可用于多边形小部件的选项 Sr.No. Syntax&Remark 1 -outlinecolor确定轮廓颜色。 2 -fillcolor填充颜​​色用该颜色填充椭圆形。 3 -stipplebitmap如果使用-fill选项，则使用点画模式。 4 widthnumber确定宽度。 5 -smoothboolean可...

消息小部件用于显示多行文本。消息小部件的语法如下所示 messagemessageNameoptions Message参数 下表中列出了消息小部件可用的选项 Sr.No. Syntax&Remark 1 -backgroundcolor用于设置小部件的背景颜色。 2 -borderwidth宽度用于在3D效果中使用边框绘制。 3 -fontfontDescriptor用于设置小部件的字体。 4 -foregroundcolor用于设置小部件的前景颜色。 5 -padxnumber设置小部件的padx。 6 -padynumber设置小部件的pady...

线小部件用于在画布中绘制线。行小部件的语法如下所示 canvasNamecreatelinex1y1x2y2...xnynoptions x1y1，x2y2...xnyn用于确定线段的终点。 Line参数 下表在下面列出了可用于行小部件的选项 Sr.No. Syntax&Remark 1 -arrowend确定线是否在末端具有箭头。结束可以是第一个，最后一个和都不是。 2 -fillcolor填充颜​​色用该颜色填充线段。 3 -smoothboolean可以将其设置为true，以使用一组贝塞尔曲线样条线渲染线段。 4 -splinestepsnumber确...

Tcl语言中的continue语句的工作原理与break语句类似。但是，continue不是强制终止，而是强制循环的下一次迭代发生，从而跳过两者之间的任何代码。 continuestatement语法 Tcl中continue语句的语法如下 continue; continuestatement流程图 continuestatement示例 !/usr/bin/tclsh seta10 do循环执行 while{$a<20}{ if{$a15}{ 跳过迭代 incra continue } puts"valueofa:$a" incra } 编译并执行上述代码后，将产生以下输出...

输入窗口小部件用于接受一行文本作为输入。在所有Tk应用程序中，几乎都必须获得用户输入。条目小部件的语法如下所示 entryentryNameoptions Entry参数 下表中列出了条目小部件可用的选项 Sr.No. Syntax&Remark 1 -backgroundcolor用于设置小部件的背景颜色。 2 -borderwidthwidth用于在3D效果中使用边框绘制。 3 -fontfontDescriptor用于设置小部件的字体。 4 -foregroundcolor用于设置小部件的前景颜色。 5 -padynumber设置小部件的pady。...

框架小部件是一个矩形容器小部件，将用于设计GUI的小部件分组。框架小部件的语法如下所示 frameframeNameoptions Frame参数 下表列出了可用于框架小部件的选项 Sr.No. Syntax&Remark 1 -backgroundcolor用于设置小部件的背景颜色。 2 -borderwidthwidth用于在3D效果中使用边框绘制。 3 heightnumber用于设置小部件的高度。 4 -padxnumber设置小部件的padx。 5 -padynumber设置小部件的pady。 6 reliefcondition设置此小部件...