packer1.tk

来自「linux的程序设计第二版 是学习LINUX下程序设计的好教程哦」· TK 代码 · 共 8 行

#!/usr/bin/wish -f

foreach i  {1 2 3 4 } {
    button .b$i -text "Btn $i"
    pack .b$i -side left -padx 2m -pady 1m
}