go语言 html按钮例子,Go语言和Tcl/Tk GUI库的例子1 按钮

a 用vtcl建立一个新project，然后制作界面并保存

我自己做的 如图1

b 用文本编辑器打开vtcl产生的main.tcl文件，我们即将进行提取和界面相关的代码

复制如下匹配的n行代码到一个新建的文本文件，

###################

# CREATING WIDGETS

###################

。。。此处省略Tcl/Tk代码n行

###################

# SETTING GEOMETRY

###################

。。。此处省略Tcl/Tk代码n行

#############################################################################

##

我复制出来的大概100多行，接着要进行删除和精简

1 把第一行 到 最后一个以wm起头的行 【1-18行】之间的所有内容 删除，如下图

2 把所有以  vTcl:DefineAlias起头的行删除

3 把 -in $top 全部去掉【或者替换成 -in . 】

4 把$top全部去掉

5 把倒数第三第四行的

vTcl:FireEvent $base <>

}

去掉

完成后如下图(抓图早了，还有$top还没去掉，懒得换正确的图了)，总计大概50行，这些就是可以用在go里的界面代码 了

c 打开LiteIDE，新建一个go文件，把刚才得到的50行界面代码复制到init_script字符串常量里面，完成代码如下

package main

import "github.com/nsf/gothic"

const init_script = `

#把界面代码复制到这里，注释行使用#符号，\符号是续行符

wm geometry . 500x400+100+100

#上面wm起头的行是我自己增加的，目的是撑大界面大小

button .but69 \

-pady 0 -text 默认

button .but70 \

-background {#0000ff} -foreground {#ffffff} -pady 0 -text 蓝背景

button .but71 \

-cursor X_cursor -pady 0 -text 光标变化

button .but73 \

-borderwidth 10 -pady 0 -text {bd 10px}

button .but74 \

-activeforeground {#ff00ff} \

-font "-family 黑体 -size 28 -weight bold -slant roman -underline 0 -overstrike 0" \

-pady 0 -text 黑体28px

#前面一行在vtcl原句如下，经修改去掉【vTcl。。。 和 】，只保留双引号之间的内容即可

# -font [vTcl:font:getFontFromDescr "-family 黑体 -size 28 -weight bold -slant roman -underline 0 -overstrike 0"] \

button .but75 \

-foreground {#ff0000} -pady 0 -text 按钮

button .but76 \

-foreground {#000000} -pady 0 -text raised

button .but77 \

-pady 0 -relief flat -text flat

button .but78 \

-pady 0 -relief groove -text groove

button .but79 \

-pady 0 -relief ridge -text ridge

button .but80 \

-pady 0 -relief sunken -text sunken

###################

# SETTING GEOMETRY

###################

place .but69 \

-x 40 -y 30 -anchor nw -bordermode ignore

place .but70 \

-x 130 -y 30 -anchor nw -bordermode ignore

place .but71 \

-x 30 -y 120 -anchor nw -bordermode ignore

place .but73 \

-x 210 -y 105 -anchor nw -bordermode ignore

place .but74 \

-x 255 -y 15 -anchor nw -bordermode ignore

place .but75 \

-x 360 -y 120 -anchor nw -bordermode ignore

place .but76 \

-x 25 -y 320 -anchor nw -bordermode ignore

place .but77 \

-x 175 -y 275 -anchor nw -bordermode ignore

place .but78 \

-x 95 -y 275 -anchor nw -bordermode ignore

place .but79 \

-x 30 -y 275 -anchor nw -bordermode ignore

place .but80 \

-x 95 -y 320 -anchor nw -bordermode ignore

#############################################################################

##

`

func main() {

ir := gothic.NewInterpreter(init_script)

}

【其实还可以进一步精简，比如去掉 -bordermode ignore 和去掉大部分续行符，省下来一共才30来行的界面代码】

运行效果如下图

d 如果需要响应按钮事件，请参考库目录下的例子

我的是在C:\go\src\github.com\nsf\gothic\_examples

或者前往GUI库的作者主页是看 https://github.com/nsf/gothic/tree/master/_examples

如果您精通Tcl/Tk，界面的制作当然可以不依赖vTcl工具，就如用记事本写html文件那样