🚀 go-pugleaf

$B:#0f!w(BNEC $B$G$9!#(B

listbox$B$N(Bselection$B$N<ALd$G$9!#(B

listbox$B$r(B2$B$D:n$C$F(B
1$B$D$NJ}$G(Bselection$B$r$7$F(B
$B$b$&(B1$B$D$NJ}$G$b(Bselection$B$r(B
$B$9$k$H(B1$B$DL\$NJ}$N(Bselection$B$,>C$($F$7$^$$$^$9$,!"(B
$BN>J}(Bselection$B$9$kJ}K!$O$J$$$N$G$7$g$&$+(B?

#!/usr/local/bin/wish8.0b1

listbox .l1
.l1 insert end "font1"
listbox .l2
.l2 insert end "style1"
pack .l1 .l2 -side left

$B$d$j$?$$$3$H$O(B
Windows95$B$N%a%bD"$N%U%)%s%HA*Br%@%$%"%m%0(B
$B$N$h$&$J$b$N$r:n$m$&$H;W$C$F$$$^$9!#(B
$B3F(Blistbox$B$N%U%)%s%HL>$H%9%?%$%k$H%5%$%:$r(B
$B0l=o$K(Bselection$B$G$-$J$$$b$N$G$7$g$&$+(B?
--
--------
// NEC $B%7%9%F%`(BLSI$B;v6HK\It(B
// $B%^%$%/%m%3%s%T%e!<%?;v6HIt(B
// $B3+H/%D!<%k5;=QIt(B
// $B:#0f(B $BCR(B ($B%^%$%i%$%s(B 22-43695)