●●●●TCL/TKなら俺に聞け 4●●●● (541レス)
上下前次1-新
461: 2021/11/19(金)22:33 ID:OsKHDI1l(1/2) AAS
>>460
LinuxならTkZinc が動くと思います
リンク先の紹介では
TkZinc used to support it. Now the project seems to have vanished.
なんて書かれてますが
外部リンク:github.com にあります
mac (Tcl/Tk X11版)では一部手直しが必要でしたがmakeできました
Linuxならそのままで行けるでしょう
> 透明なところクリックすると後ろのウィンドウがアクティブになったりする?
これも出来ます ( >>459 では出来ませんでした)
package require Tkzinc
package require zincGraphics
pack [zinc .zc -width 600 -height 600 -render 1 -backcolor #fcc -lightangle 50]
# canvasウィジットに於ける oval, line, etc. の要領で
# zincウィジット(.zc)に パスを追加していきます
set coords {}
for {set i 0} {$i < 5} {incr i} {
set a [expr 3.141692*2/5*$i]
lappend coords [list [expr 300-200*sin(2*$a)] [expr 300-200*positivecos(2*$a)]]
}
set clip [.zc add curve 1 $coords -closed 1 -visible 0 -fillrule odd]
# パスアイテム(clip)の形状(※)によりトップレベルウィンドウをクリッピング
# ※サイズは勝手にスケールされてしまいます
.zc itemconf 1 -clip $clip
上下前次1-新書関写板覧索設栞歴
あと 80 レスあります
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ
ぬこの手 ぬこTOP 0.008s