class TktMarkCurrent