eval constructor $args

class bb {
# inherit aa
 inherit itk::Widget
 constructor { args } {
  puts $itk_component(hull)
 }
}

class cc {
 inherit bb
 constructor { args } {
   eval bb::constructor $args
 } {
  puts $itk_component(hull)
 }
}

cc .c abt acd ad

posted @   greencolor  阅读(121)  评论(0编辑  收藏  举报
努力加载评论中...
点击右上角即可分享
微信分享提示