摘要：
class bb { inherit itk::Widget itk_option define -activeClientOnly activeClientOnly ActiveClientOnly 1 constructor { args } { eval itk_initialize $args}}configbody bb::activeClientOnly { puts "abc" if { $itk_option(-activeClientOnly) == 0 } {puts "zero" } else { }}class aa { inhe 阅读全文
posted @ 2012-08-04 17:27
greencolor
阅读(133)
评论(0)
推荐(0)
摘要：
puts $itk_component(button) .pw.pane0.childsite.bluce.n.canvas.notebook.cs.page1.cs.h.hutch.c.control.entryring.start.bregisterComponent $itk_component(button) DCS::ComponentGateExtension::registerComponent { args } { foreach component $args { if {[lsearch $listOfComponents $component] < 0} { lap 阅读全文
posted @ 2012-08-04 15:30
greencolor
阅读(164)
评论(0)
推荐(0)
浙公网安备 33010602011771号