Asimpledemoformasdf14{1234567891011121314}377x315+170+155{labellabel1{15369957}{}{Selectedcolor}{}}{entryentry2{1113622554}{}entry2color}{radiored{2492134236}{}{Redascherry}color}{radiogreen{2494534260}{}{Greenasamelon}color}{radioblue{2496934284}{}{Blueasthesky}color}{buttonbutton6{456919899}{setcolorspooky}{Setaweirdcolor}{}}{labellabel7{24129138147}{}{Thecheckbox's value} {}} {entry entry8 {162 129 172 147} {} entry8 cbvalue} {checkbox checkbox9 {180 126 279 150} {} {Check me :-)} cbvalue} {button button10 {219 273 366 303} {destroy .asdf} {Close that simple form} {}} {button button11 {219 237 366 267} {open_form "Phone book"} {Open my phone book} {}} {listbox lb {12 192 162 267} {} listbox12 {}} {button button13 {12 156 162 186} {.asdf.lb insert end red green blue cyan white navy black purple maroon violet} {Add some information} {}} {button button14 {12 273 162 303} {.asdf.lb delete 0 end} {Clear this listbox} {}}
Phonebookpb26{1234567891011121314151617181920212223242526}444x310+284+246{labellabel1{33126330}{}Name{}}{entryname_entry{87921730}{}entry2pbqs(name)}{labellabel3{33397354}{}Phone{}}{entryentry4{873619557}{}entry4pbqs(phone_nr)}{labellabel5{33667884}{}City{}}{entryentry6{876319584}{}entry6pbqs(city)}{queryqs{363333}{}query7{}}{buttonbutton8{126177198203}{.pb.qs:setsql"select oid,* from phonebook where name ~* '$what' order by name"\
.pb.qs:open\
@ -56,32 +56,32 @@ tk_messageBox -title Information -message "A new record has been added!"\