I've done a good deal with Perl's Tkx library, which basically forces you to understand Tcl, but I haven't used it beyond that.