$win->Change(-background=>[255, 0, 0]); 
    $win->InvalidateRect(1);