Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
    
    ...
    $image->start_animation;
    
    MainLoop;
    
  2. or download this
    package Tk::Animation;
    
    ...
       $obj->set_frame(0);
      }
    }