Help for this page

Select Code to Download


  1. or download this
    $text = $mw->TextConfig('Text');       # or
    $text = $mw->TextConfig('SuperText');  # or
    $text = $mw->TextConfig('ROText');
    # etc
    
  2. or download this
    package Tk::TextConfig;
    use strict;
    ...
      # Anyway, it seems that Tk::Text tag bindings has noting common with
    + widget's bindings
      # Actually we cannot do Tk->break from sub keyLink
    }
    
  3. or download this
    use strict;
    use Tk;
    ...
    }
    
    MainLoop();