🚀 go-pugleaf

$B:#B<!wEl<G(B $B$H?=$7$^$9(B

  $BJX>h<ALd$5$;$FD:$-$^$9!#(B

>   > $B;H$C$F$b0LCV9g$o$;$,;]$/$$$+$J$$$h$&$J5$$,$7$F$$$^$9!#(B
>   >   $B$3$&$$$&>l9g!"$J$K$+>e<j$J2r7hJ}K!$O$J$$$b$N$G$7$g$&$+!)(B
>
>   canvas $B$N>e$K(B window $B$rE=$C$F$=$NCf$K(B button $B$rCV$/$H$h$$$G$9!%(B
>   $B:#<j85$K(B manual $B$,$J$$$N$G6qBNE*$J$d$jJ}$O=q$1$^$;$s$,!$(B
>   canvas $B$N(B online manual $B$rFI$a$PJ,$+$k$G$7$g$&!%(B

  $B$3$s$J46$8$G$7$g$&$+!)(B

-------8<-------8<-------8<-------8<-------8<-------8<-------8<

set WIDTH  200
set HEIGHT  200

set canvas_path .c
canvas $canvas_path -width $WIDTH -height $HEIGHT
pack $canvas_path

set button1_path .c.b1
set button2_path .c.b2
button $button1_path -text "button1"
button $button2_path -text "button2"

$canvas_path create window 50 75 -window $button1_path
$canvas_path create window 150 75 -window $button2_path
$canvas_path create line  75 75 150 75

-------8<-------8<-------8<-------8<-------8<-------8<-------8<

$B$H!"0l1~>pJsDs6!$7$??6$j$r$7$F!D!#(B

>   $B!t(B $B$?$@$3$&$7$A$c$&$H!$(Bcanvas $B$r(B PostScript $B$KMn$7$F$b(B
>   $B!t(B window $B$NCf?H$O8+$($J$$$s$@$h$J$!!%$^!$$=$j$c$=$&$@$m$&$1$I(B (; ;)

  $B$=$&$J$N$G$9$h$M!#$3$l$C$F!"(Bcanvas$B$N>e$K$*$$$?(Bwindow item$B$r(B
postscript$B=PNO$9$k%Q%C%A$H$+$C$F=P$F$$$J$$$b$N$J$N$G$7$g$&$+!)(B

  $B$=$l$H$b!"(Bcreate window ... $B$H$+8@$o$;$F$*$$$F!"<B$OCf?H$G$O(B
canvas$B$O4IM}$7$F$$$J$$$H$+!#(B

  $B$=$l$+$i(B, canvas$B$KIA$$$?3($r(Bcanvas$B$r(Bpack($B87L)$K$O(Bexpose)$B$7$J$$$G(Bps$B$K(B
$BMn$H$9$d$j$+$?$4B8$8$NJ}$$$i$C$7$c$$$^$;$s$G$7$g$&$+!)(B

  $B$h$m$7$/$*4j$$CW$7$^$9!#(B
-- 
$B"v"v"v"v"v"v"v"v"v"v"v"v"v"v"v"v"v"v"v"v"v"v"v"v"v"v"v"v"v"v(B
     $B:#B<!!BgJe!!(B<daisuke@ssel.toshiba.co.jp>
     ($B3t!KEl<G!!8&5f!&3+H/%;%s%?!<(B            $B!{(B 
      $B%7%9%F%`!&%=%U%H%&%(%"@8;:5;=Q8&5f=j(B   o-\B_
      $BI\Cf9)>l(B $BH/EE7W;;5!%7%9%F%`It(B $BCs:_(B    / -\/ =3 =3
      Tel: 0423-33-4680  FAX:0423-40-8029  $B!}(B ^ $B!}(B  $B$V$m$m!D(B