Posted to tcl by Stu at Tue Sep 01 02:53:24 GMT 2020view pretty
This Guhb code: f @f0 info >info -keys {@la@ @en@} -values {Name nam Address addr Telephone tel} l e .l0 -text @la@ :l0 -sticky w /e0 @en@ Generates this Tcl code: grid [frame .f0] -row 0 -column 0 grid [label .f0.l0 -text Name] -sticky w -row 1 -column 0 grid [set gui(nam) [entry .f0.e0]] -row 1 -column 1 grid [label .f0.l1 -text Address] -sticky w -row 2 -column 0 grid [set gui(addr) [entry .f0.e1]] -row 2 -column 1 grid [label .f0.l2 -text Telephone] -sticky w -row 3 -column 0 grid [set gui(tel) [entry .f0.e2]] -row 3 -column 1