摘要： class Destroyer {inherit ::itk::Widget constructor {args} { } destructor {killFast} private method killFast {} { global errorInfo #check for an error message that is always there on clean shutdown if { [string first .help_shell $errorInfo] == -1 } { #print the last error puts $errorInfo } #kill this 阅读全文