class MessageInfo 

  itk_component add message {
            label $itk_interior.mesg -width 20
        } {
        usual
        keep -text
        }

MessageInfo .m -text "aaa"    // initial set message text as "aaa"