🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

4 total messages Started by XFUJII Sun, 15 Mar 1998 00:00
graphical icon button
#33
Author: XFUJII
Date: Sun, 15 Mar 1998 00:00
16 lines
1117 bytes
X藤井と申します。最近Tcl/Tkで遊んでいます。

同梱されていたdemosを見てcanvasにimageを貼り付ける方法がわかりました。
なかなか簡単にできて驚きです。

そこで質問なのですが、Tcl/Tk 8.0以降で、特殊な拡張を組み込まずに、
ボタンのフレーム内にgifなどを貼り付けることはできないのでしょうか。

個人的な結論は「できない」んだと思います。-bitmapにimage photoで
作ったものをくっつけられると思ったんですが。

#やっぱりcanvasに絵を貼り付けて、button1のpressを拾って、座標を
#計算して、絵を囲むrectを作って....としなければいけないのでさうか。

Help me!
Re: graphical icon button
#34
Author: kuno
Date: Sun, 15 Mar 1998 00:00
16 lines
1014 bytes
$B5WLn$G$9!#(B

X$BF#0f$5$s(B:
> $B$=$3$G<ALd$J$N$G$9$,!"(BTcl/Tk 8.0$B0J9_$G!"FC<l$J3HD%$rAH$_9~$^$:$K!"(B
> $B%\%?%s$N%U%l!<%`Fb$K(Bgif$B$J$I$rE=$jIU$1$k$3$H$O$G$-$J$$$N$G$7$g$&$+!#(B

  $B<j85$NK\$O(Btcl7.6+tk4.2$BBP>]$G$9$,!"$=$&$$$&NcBj$,:\$C$F$^$9$M!#(B

> $B8D?ME*$J7kO@$O!V$G$-$J$$!W$s$@$H;W$$$^$9!#(B-bitmap$B$K(Bimage photo$B$G(B
> $B:n$C$?$b$N$r$/$C$D$1$i$l$k$H;W$C$?$s$G$9$,!#(B

  image photo$B$G:n$C$?$b$N$O(Bbitmap$B$8$c$J$$$G$9$+$i(B-image$B%*%W%7%g(B
$B%s$r;H$o$J$1$l$P$$$1$J$$$=$&$G$9!#(B

		tcl8.x+tk8.x$B$G$O;n$7$F$J$$(B		    $B5WLn(B
Re: graphical icon button
#36
Author: Takaaki TATEISHI
Date: Mon, 16 Mar 1998 00:00
29 lines
1360 bytes
$BN)@P$G$9!#(B

>> X$BF#0f$H?=$7$^$9!#:G6a(BTcl/Tk$B$GM7$s$G$$$^$9!#(B

$BKM$b$=$&$G$9!#(B

>> $BF1:-$5$l$F$$$?(Bdemos$B$r8+$F(Bcanvas$B$K(Bimage$B$rE=$jIU$1$kJ}K!$,$o$+$j$^$7$?!#(B
>> $B$J$+$J$+4JC1$K$G$-$F6C$-$G$9!#(B
>> 
>> $B$=$3$G<ALd$J$N$G$9$,!"(BTcl/Tk 8.0$B0J9_$G!"FC<l$J3HD%$rAH$_9~$^$:$K!"(B
>> $B%\%?%s$N%U%l!<%`Fb$K(Bgif$B$J$I$rE=$jIU$1$k$3$H$O$G$-$J$$$N$G$7$g$&$+!#(B
>> 
>> $B8D?ME*$J7kO@$O!V$G$-$J$$!W$s$@$H;W$$$^$9!#(B-bitmap$B$K(Bimage photo$B$G(B
>> $B:n$C$?$b$N$r$/$C$D$1$i$l$k$H;W$C$?$s$G$9$,!#(B

image photo $B$G$G$-$^$9$h!#(B

$B$?$H$($P!"(B

button .b -image [image create photo -file huge.gif]
pack .b

$B$H$9$l$P(Bhuge.gif$B$,I=<($5$l$^$9!#(B

--------------------------------------------------
Takaaki Tateishi [tateishi@sy.is.noda.sut.ac.jp]
		 [http://syyk11.is.noda.sut.ac.jp/~tateishi/]
-------------------------------------------------- 
Re: graphical icon button
#37
Author: XFUJII
Date: Mon, 16 Mar 1998 00:00
16 lines
913 bytes
久野さん立石さんありがとうございました。
調査不足がバレバレですね。ごめんなさい。

base64に変換したgifを作って

set gifimg1 {base64変換後の文字列}

image create photo img1 -format gif -data $gifimg1
button .b -image img1
pack .b

で、望んでいた事ができました。
うーむ、これでまた一歩野望に近づいた :-)

#いやゲーム作りたいだけなんすけどね。
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads