Help for this page

Select Code to Download


  1. or download this
    
   my ($what) = @_;
...

 $canvas ->createText($range[0],$range[1], -text=>"$what_val\n");
  2. or download this
     elsif ($drawItem eq "text"){

...


     )->pack;