class Tk::Scale