🚀 go-pugleaf

$B$3$s$I$&$H?=$7$^$9!#(B
ruby $B$+$i(B Tk $B$r;H$*$&$H$7$F!"$o$+$i$J$$$3$H$,=P$F$-$^$7$?!#(B

$B:n@.$7$h$&$H$7$F$$$k%"%W%j%1!<%7%g%s$O!"(B

o ruby $B$+$i(B Tk $B$r;H$&$*3(=q$-%=%U%H(B
o . (root windows) $B$OI=<($7$J$$(B
o $B%U%!%$%kKh$K(B toplevel window $B$rI=<($7$F!"(B
  $B$=$NAk$,%a%K%e!<$dIA2h%(%j%"$r;}$D(B

$B$H$$$&$b$N$G$9!#(B

Q1 . $B$rI=<($7$J$$$?$a$K!"(B

  class Manager
    def initialize
      @root = TkRoot.new;
      @root.withdraw;
    end;
    def get_root
      return @root;
    end;
  end;

$B$H$d$C$F$$$k$N$G$9$,!"(B. $B$,I=<($5$l$F$7$^$$$^$9!#(B
$B$I$&$9$l$P!"(B. $B$rI=<($7$J$$$h$&$K$J$k$G$7$g$&$+!#(B

Q2 $B%a%K%e!<$N:n$jJ}$,$o$+$j$^$;$s!#:#$O!"(B

  $manager = Manager.new;

  class DrawApp
    def initialize(filename)
      @toplevel = TkToplevel.new($manager.get_root);
      @toplevel.title(filename);
      @menuframe = TkFrame.new(@toplevel, {"border" => 1, "relief" => "raised"});
      @menu_file = TkMenubutton.new(@menuframe, {"text" => "File", "underline" => 0, "menu" => @menu_file_m});
      @menu_file_m = TkMenu.new(@menu_file);
      @menu_file_m.add("command", {"label" => "New"});
      @menu_file_m.add("separator");
      @menu_file_m.add("command", {"label" => "End"});
    end;
  end;

$B$H$d$C$F$$$k$N$G$9$,!"(Bmenu $B$,(B post $B$5$l$^$;$s!#(B

$B2r7h:v$r$4B8CN$NJ}$O!"65$($F2<$5$$!#(B

$B$^$?!"(Bruby $B$G$D$/$C$?!"%"%W%j%1!<%7%g%s$d$=$N:n$jJ}$K4X$9$k>pJs$O(B
$B$I$N$h$&$K$7$?$i<j$KF~$l$i$l$k$N$G$7$g$&$+!)(B


--
*** $B%a%$%k%"%I%l%9JQ$o$j$^$7$?(B ***
$B6aF#Lw9@(B <nkon@osk2.3web.ne.jp>
http://www2.osk.3web.ne.jp/~nkon/3web/
http://tsl.pe.u-tokyo.ac.jp/~kon/tslhome/