●●●●TCL/TKなら俺に聞け●●●●
レス数が950を超えています。1000を超えると書き込みができなくなります。
0001TCL神
NGNGこの最強言語のことなら俺に聞け
0002デフォルトの名無しさん
NGNG概要を教えて下さい。
0003デフォルトの名無しさん
NGNG0004デフォルトの名無しさん
NGNG0005デフォルトの名無しさん
NGNG0006デフォルトの名無しさん
NGNG0007TCL神
NGNGhttp://www.activestate.com/Products/ActiveTcl/
0008デフォルトの名無しさん
NGNG0009デフォルトの名無しさん
NGNG0010デフォルトの名無しさん
NGNGというかCとの連携は最初からかなり考えて作られてる
00115
NGNG0013デフォルトの名無しさん
NGNG一番簡単なのはWildC++かも。C/C++インタプリタのCINTに付属している機能。
インタプリタが嫌ならTcl APIを使うしかない。
0014デフォルトの名無しさん
NGNG識者は適当に入門解説でもしてください。
00155
NGNGTcl_Evalに萎えますた。(´･ω･`)
0016デフォルトの名無しさん
NGNGたとえばTcl_Eval(interp, "set str hogehoge");は
Tcl_SetVarで置き換えられるとかそういう感じになっておるよ。
0017デフォルトの名無しさん
NGNG00185
NGNGCからlabelとかpackって呼べないものなんでしょうか？
#include <stdio.h>
#include <tcl.h>
#include <tk.h>
int init(Tcl_Interp *interp)
{
int stat = TCL_OK;
if (Tcl_Init(interp) == TCL_OK &&
Tk_Init(interp) == TCL_OK) {
/*
Tcl_Eval(interp,
"label .l -text \"Hello, World!\"\n"
"pack .l\n");
*/
} else
stat = TCL_ERROR;
return stat;
}
int main(int argc, char **argv)
{
Tk_Main(argc, argv, init);
return 0;
}
00195
NGNG反応は Tcl_CreateCommand で関連付け
ってのが流儀なのかな？
0020アホの戯言かもしれませんが聞いてやってください。
NGNG0021デフォルトの名無しさん
NGNG0022デフォルトの名無しさん
NGNG枠 が る な よ
0023デフォルトの名無しさん
NGNGアフォは放置汁。
0024デフォルトの名無しさん
NGNG0025デフォルトの名無しさん
NGNG0026デフォルトの名無しさん
NGNG0027デフォルトの名無しさん
NGNG0028デフォルトの名無しさん
NGNG0029デフォルトの名無しさん
NGNG0030デフォルトの名無しさん
NGNGｔｃｌｔｋ8.3でATOKXの入力ができましぇん、どうすればいいでしょうか。
0031デフォルトの名無しさん
NGNG0032デフォルトの名無しさん
NGNGお好みでどうぞ
http://aspn.activestate.com/ASPN/Tcl/
http://members10.tsukaeru.net/bitwalk/download_mingw.html
http://www.equi4.com/tclkit/
0033デフォルトの名無しさん
NGNG0034デフォルトの名無しさん
NGNG0035デフォルトの名無しさん
NGNG0036デフォルトの名無しさん
NGNG0037デフォルトの名無しさん
NGNGWindows 環境のときに、ADO を使ってデータベースの処理ができますか。
使えるとしたら、JScript から Tcl に乗り換えたいのですが。
0038デフォルトの名無しさん
NGNG0039デフォルトの名無しさん
NGNG0040デフォルトの名無しさん
NGNG0041デフォルトの名無しさん
NGNG0042デフォルトの名無しさん
NGNG今8.4だよねえ。
0043デフォルトの名無しさん
NGNG8.4.1からは日本語入力にも対応して、そのままでも特に問題ない様だが
ttp://www.interq.or.jp/japan/s-imai/tcltk/
0044デフォルトの名無しさん
NGNG0045デフォルトの名無しさん
NGNG0046過去スレ
NGNGhttp://piza2.2ch.net/tech/kako/966/966300886.html
0047デフォルトの名無しさん
NGNGcygwinのdos窓と違ってWin用のIMEで日本語打てるし。
しかし、やはりよく落ちる。
0048デフォルトの名無しさん
NGNG0049デフォルトの名無しさん
NGNG今更言われても……。
0050名無しさん＠Ｅｍａｃｓ
NGNG0051デフォルトの名無しさん
NGNG0052名無しさん＠Ｅｍａｃｓ
NGNG0053名無しさん＠Ｅｍａｃｓ
NGNGPythonよりマイナーなんでしょうか？
0054デフォルトの名無しさん
NGNG洋書見れ。それとpythonはマイナーじゃない。(日本ではマイナーだけど)
0055デフォルトの名無しさん
NGNGあの・・・もうちょっと安くなりませんでしょうか
0056デフォルトの名無しさん
NGNGhttp://www.amazon.co.jp/exec/obidos/ASIN/4756112935/qid=1040665216/sr=1-4/ref=sr_1_2_4/249-7631955-1678748
こっちは2000円だよ。
(ボリュームに比べたら高いけど)
0057デフォルトの名無しさん
NGNGTcl/Tkの概説とコマンド一覧が載ってるんですが、
これ見るかぎり、融通のきかないシェルスクリプトって感じがしますが。
覚えやすそうではあります。
0058デフォルトの名無しさん
NGNGこの本は役に立ちません。オンラインソフトのお試し版のようなものです。
Tcl/Tkをかじる程度しか理解できないので、まともにGUIプログラムを書け
ません。(内容も古すぎます。ソースコードも汚いです。)
やっぱり 56 の本は必要かと思います。(これも内容が古いですが、基本的
な事を詳しく説明されています。)
>>57
入門書には参考程度しか書いていません。
この言語は接着剤のようなプログラミング言語で融通のきかないところは、
C言語等で書いて呼び出して使うようになっています。
http://www.geocities.co.jp/SiliconValley/4137/tcltk.html
ここのサイトがけっこう役にたちます。
0059デフォルトの名無しさん
NGNG0060デフォルトの名無しさん
NGNG0061デフォルトの名無しさん
NGNG0062デフォルトの名無しさん
NGNG0063デフォルトの名無しさん
NGNGhttp://live2.2ch.net/test/read.cgi/news/1042014951/
0064デフォルトの名無しさん
NGNG２ちゃんねるのお勧めな話題と
ネットでの面白い出来事を配送したいと思ってます。。。
===============================読者数： 138720人 発行日：2003/1/9
年末年始ボケがそろそろ収まり始めた今日このごろのひろゆきです。
そんなわけで、年末に予告したIP記録ですが実験を開始しています。
「２ちゃんねる20030107」
こんな感じで各掲示板の最下部に日付が入ってるんですが、
20030107以降になってるところはログ記録実験中ですー。
んじゃ！
────────────────────────Age2ch─
■この書き込みは、Age2chを使って配信されています。
────────────────────────────
Keep your thread alive !
http://pc3.2ch.net/test/read.cgi/software/1041952901/l50
────────────────────────────
0065デフォルトの名無しさん
NGNG0066デフォルトの名無しさん
NGNG奇遇だね
0067デフォルトの名無しさん
NGNGすいません。
「即決は無理でも」
かなり短期的に、「貸しを作って下さるか」お返事をお願いします。
現段階では、検討が厳しいかとは思いますが。
一先ず
背後は覗いて、「その件は」長きにわたって感謝申し上げるです・・うう
0068デフォルトの名無しさん
NGNG0069デフォルトの名無しさん
NGNG>>97-98>>100>>107>>109>>111
>>118-119>>122>>125-129>>132
>>134>>138-139>>143>>147>>154
>>160-164>>167
>>169-170>>172>>185>>187-188
>>190-191>>193>>204-207
0070デフォルトの名無しさん
NGNGそれはないと思う。
そんなことしたらログの量がすんごいことに……
0071デフォルトの名無しさん
NGNG0072デフォルトの名無しさん
NGNGオナニーでもしてこよっと
0073デフォルトの名無しさん
NGNG0074デフォルトの名無しさん
NGNGお前空気嫁よ
0075デフォルトの名無しさん
NGNG0076デフォルトの名無しさん
NGNG0077デフォルトの名無しさん
NGNG0078デフォルトの名無しさん
NGNG60 障害者A 2003/01/10 01:11:36 ID:PXY+/W3vq5
2チャンネルは障害者とひきこもり輩の溜まり場
2ちゃんねるで他人に「馬鹿だのアホだの精神異常者キチガイ」呼ばわり
している輩は旧PC-VANをつぶした障害者とその関係者です。
こいつらはこのようにして他人を罵ってきた障害者です。
こいつら障害者は他人の「氏名」「住所」「電話番号」等を
平気で掲載すると言う違法行為を繰り返して居る障害者です。
こんな障害者とその関係者が管理者を落し入れて居る経緯は下記のURL
旧PC-VANをつぶした障害者とその関係者が2ちゃんねるの管理者を落とし入れて居るのです。
■ http://www1.ryucom.ne.jp/papa/newpage2chsaiban.htm
旧PC-VAN(AWC)をつぶした障害者とその関係者がたむろして居るURLは下記
下記URLに居る者達はすべて障害者とその関係者です。
■ http://www.awcjapan.net/forum.cgi?bd=fa&md=title
0079デフォルトの名無しさん
NGNGサイエントロジーとネットコミュニティのバトルはサイエントロジーの
勝利に終わったからね。
0080デフォルトの名無しさん
NGNGそういうところが訴えてきそうで怖いな
ちびくろサンボを差別だ、といったりカルピスの黒人が描いてあるラベルを
問題だと騒ぎ立てるような連中だからな
0081デフォルトの名無しさん
NGNG0082デフォルトの名無しさん
NGNG0083デフォルトの名無しさん
NGNG２ちゃんねるのお勧めな話題と
ネットでの面白い出来事を配送したいと思ってます。。。
===============================読者数： 138720人 発行日：2003/1/9
年末年始ボケがそろそろ収まり始めた今日このごろのひろゆきです。
そんなわけで、年末に予告したIP記録ですが実験を開始しています。
「２ちゃんねる20030107」
こんな感じで各掲示板の最下部に日付が入ってるんですが、
20030107以降になってるところはログ記録実験中ですー。
んじゃ！
─────────────────────── 2ch-net─
メルマガ登録・解除 http://www.2ch.net/mag.html
http://www.2ch.net/2ch.html / [email protected]
───────────────────────────
0084デフォルトの名無しさん
NGNG0085デフォルトの名無しさん
NGNG600,000,066
0086デフォルトの名無しさん
NGNGなにやら、連日メルマガだしてるひろゆきです。
そんなわけで、ログ記録実験ですが、いちいちサーバ指定するのが
面倒なので、全部のサーバに入れてみました。
重くなって落ちたりしてもご愛嬌ってことで。。。
実にさらっとひろゆきらしいでつ。。。
0087デフォルトの名無しさん
NGNG株式会社すずめのおやど開発
民事再生法を申請
負債57億円
0088デフォルトの名無しさん
NGNG0089デフォルトの名無しさん
NGNG逆転も何もないって。
勢いで上告なんかしても一発で上告却下(門前払い)だよ。
二審も一審を支持。これに対して上告しようにも、
刑事訴訟と同様、自由に上告できるってもんでもないのです。
民事訴訟法312条 （上告の理由） 1項
「上告は、判決に憲法の解釈の誤りがあること
その他憲法の違反があることを理由とするときに、することができる。」
http://www.m-net.ne.jp/~doba/goto/hon.htm
ようするに上告しても今の制度では100％無駄。
これで完全終了ってことか。
0090デフォルトの名無しさん
NGNG0091デフォルトの名無しさん
NGNG0092デフォルトの名無しさん
NGNG0093山崎渉
NGNG0094デフォルトの名無しさん
NGNGオレも記念カキコ！
警察！ オレが味方だ。 射殺許可！！！！
いいよ、こんなクズ。この世からいなくなっても！
小さい子の命のほうが億倍たいせつだよ。
0095山崎渉
NGNG0096デフォルトの名無しさん
NGNGどんなＣコンパイラを使ってますか？
Digital Marsや OpenWatcom なんかのfreeなコンパイラでも使えますか？
0097デフォルトの名無しさん
NGNGＶＣ＋＋
0098山崎渉
NGNG0099デフォルトの名無しさん
NGNG0100デフォルトの名無しさん
NGNG>>> from anygui import*
>>> app = Application()
>>> win = Window(title='naitou',size=(300,140))
>>> app.add(win)
>>> app.run()
0101デフォルトの名無しさん
NGNG0102山崎渉
NGNG0103デフォルトの名無しさん
NGNGなにおかくそう、この本は生まれて始めて買った
プログラム本だったりするので、再びTck/Tkを
使うことにした。
0104デフォルトの名無しさん
NGNGBC5.5でOKだよ
0105＿
NGNG川o・-・）ノ ＜先生！こんなのがありました！
http://www.togoshi.ginza.st/hankaku/hankaku04.html
http://togoshi.ginza.st/zenkaku/index.html
http://www.togoshi.ginza.st/hankaku/hankaku01.html
http://togoshi.ginza.st/hankaku/hankaku10.html
http://www.togoshi.ginza.st/hankaku/hankaku07.html
http://togoshi.ginza.st/hankaku/hankaku08.html
http://www.togoshi.ginza.st/hankaku/hankaku05.html
http://togoshi.ginza.st/hankaku/hankaku03.html
http://www.togoshi.ginza.st/hankaku/hankaku06.html
http://togoshi.ginza.st/hankaku/hankaku02.html
http://www.togoshi.ginza.st/hankaku/hankaku09.html
0106デフォルトの名無しさん
NGNGなぜかとーとつにTcl/Tkを使いたくなってしまうプログラマではない漏れ
0107デフォルトの名無しさん
NGNGWin版ではCOMも使えるみたいだね。ﾅｶﾅｶ（･∀･）ｲｲ！
0108デフォルトの名無しさん
NGNG0110デフォルトの名無しさん
NGNG実行してexitしてもwish84.exeのタスクが消えない
んですが。。tclを実行するたびに終了されない
タスクが増えていくんですが、これって
僕の環境だけですか？
0111デフォルトの名無しさん
NGNG○プロセス
ごめりんこ
0112デフォルトの名無しさん
NGNG0113デフォルトの名無しさん
NGNG0114デフォルトの名無しさん
NGNGなんだったんだろう・・・。さんくす>>112
0115デフォルトの名無しさん
NGNGtkウィジェットオンリーなら拡張子を.tkにしてドラッグアンドドロップ
したほうが良いかも
0116デフォルトの名無しさん
NGNGどうすればいいんでしょうか
0117デフォルトの名無しさん
NGNG良いサンプルが見つかりません。
0118116
NGNGオーバーライドしただけだが、ここに記録しておく。。。
infoを書き換えてマウスの位置にこのウィンドウを
イベントで呼び出すだけだむにょ。
proc create_tooltip {} {
option add *Balloonhelp*background white widgetDefault
option add *Balloonhelp*foreground black widgetDefault
toplevel .tooltip -class Balloonhelp \
-background black -borderwidth 1 -relief flat
label .tooltip.info -pady 0
pack .tooltip.info -side left -fill y
wm overrideredirect .tooltip 1
wm withdraw .tooltip
}
0119デフォルトの名無しさん
NGNGhttp://mini.net/tcl/1256
0120デフォルトの名無しさん
NGNG0121デフォルトの名無しさん
NGNG指定したコマンドを実行させることが出来る
0122デフォルトの名無しさん
NGNG8.4.3
でていたよ
0123デフォルトの名無しさん
NGNG中に果物の名前が排他的に選択できる項目ができます。これで例えば
ばななを選択した場合に、”メニュー１”となってる部分を”メニュー１(ばなな)”
というふうにラベルを書き換えたいんですが、configとかでもラベルを書き換え
たりとか出来ないみたいなんです。似たウィジェットにtk_optionMenuというのが
あるんですが、トップレベルのメニューから階層的な位置に置く方法が
イマイチよくわかりません。
このような事を実現する方法はありませんか？
. configure -menu .mbar
menu .mbar
.mbar add cascade -label "メニュー１" -menu .mbar.m1
menu .mbar.m1
.mbar.m1 add radiobutton -label "みかん" -value 0 -variable select
.mbar.m1 add radiobutton -label "りんご" -value 1 -variable select
.mbar.m1 add radiobutton -label "ばなな" -value 2 -variable select
set select 0
0124デフォルトの名無しさん
NGNGhttp://219.96.231.242/wizonline/
２ｃｈスレ
http://game3.2ch.net/mmominor/dat/1053536167.dat
0125デフォルトの名無しさん
NGNGパッケージからインストール）
ttp://www.geocities.co.jp/SiliconValley/4137/dir1/tstart1.html
このページを見ながらやってるんですが，サンプルがうまく実行されません．
#! /usr/local/bin/tclsh8.3
label .la -text 出たよ
button .c -text 終了 -command exit
pack .la .c -side top
これを実行しようとすると，invalid command "label"となってしまいます．
Windows環境でtclshのパス以外同じソースではうまく実行できました．
ぐぐっても該当するようなエラーが見つからないのですが，どんな原因が
考えられますでしょうか？
0126デフォルトの名無しさん
NGNGそうだったら使ってみたいけど。
0127デフォルトの名無しさん
NGNG0128デフォルトの名無しさん
NGNG変換ライブラリもあるからラクチンだよ。
0129デフォルトの名無しさん
NGNGホントだ。thanx!!
0130デフォルトの名無しさん
NGNGTk使ってるんっだからwishで実行しろ
0131デフォルトの名無しさん
NGNG0132デフォルトの名無しさん
NGNGPythonやJava、C++とくらべどうですか？
0133デフォルトの名無しさん
NGNGPythonはTclと競合してるかもしれんが、
Java、C++ は使いどころが全然違うから
比較できん。
0134デフォルトの名無しさん
NGNG0135デフォルトの名無しさん
NGNG0137デフォルトの名無しさん
NGNGhttp://www.interq.or.jp/japan/s-imai/python/index.html
0138デフォルトの名無しさん
NGNGTclはウィジェットの取りまわしが楽だし、シェルっぽい
ところがお気楽だから使うだけ。そのお気楽さが解らずに
Pythonとどっちやろうか悩むというのは解せんな。
0139デフォルトの名無しさん
NGNG0140デフォルトの名無しさん
NGNGC/tk の良いサイト無いですか?
0141デフォルトの名無しさん
NGNGここなんかどう？
ttp://www.geocities.co.jp/SiliconValley/4137/dir4/namo.html
0142山崎渉
NGNGﾋﾟｭ.ｰ ( ＾＾ ） ＜これからも僕を応援して下さいね（＾＾）。
＝〔~∪￣￣〕
＝ ◎――◎ 山崎渉
0143デフォルトの名無しさん
NGNGthanx こ。
事前にググッてみたのですが、あんまり情報多くないですね。こんなに手軽そう
なのに。
ここに来る前は tcl/tk をちょっとバカにしていましたが、結構活発に開発されて
いるんですね。びくりしました。
0144デフォルトの名無しさん
NGNG0145デフォルトの名無しさん
NGNG0146デフォルトの名無しさん
NGNGhttp://freewrap.sourceforge.net/
そのままだと日本語のエンコーディングファイルが含まれないので
なんかする必要があると思った。忘れたけど
0147デフォルトの名無しさん
NGNGaiueo kakikukeko tatituteto
という文字列が変数に入ってたとして、
「kakikukeko」だけを取り出すにはどうすれば委員でしょうか？
0148デフォルトの名無しさん
NGNG0149デフォルトの名無しさん
NGNGどうもありがとう！
一生懸命考えて、Cで拡張しようかと思ったよ。。。
0150デフォルトの名無しさん
NGNGでも今の8.4.3にはコンパイラついてないよね。
あとfreewrapでラップしたのって、空白文字を
含んだパスが通らないような。
まんどくせーからwish.exeと一緒に配布でいいじゃん？
0151デフォルトの名無しさん
NGNGDigitalMars C でナゼか Tcl/Tk 付属のLIB（tk84.lib tcl84.lib) が
Not Valid とかいうエラーで弾かれてリンクしてくれない。
VC++ だと大丈夫なのに... だれか DMC + Tcl/Tk の構成で上手く動いた
ヒト居る？
0152デフォルトの名無しさん
NGNG知らないけど
0153デフォルトの名無しさん
NGNGActiveTclならDMCのcoff2omfでライブラリを変換すればできた気がした。
0154デフォルトの名無しさん
NGNGなんかglobalやっても駄目見たいなんですけど。
初心者丸出しの質問でもよろしこ。
0155デフォルトの名無しさん
NGNGうがっ!! 形式か... なるほど、それで Not Valid な訳...
Tcl/Tk はActiveTclでつ。うーん、しかしDMCのcoff2omfは
現在有料なんだよなぁ(^^;
確認したいけど手元に無いときたもんだ。
さて、どうやって遊んだものか...
0156デフォルトの名無しさん
NGNG質問の意味がわかんないので「こんな風に書けないの？」的コードを書いて見せて
0157デフォルトの名無しさん
NGNGプロシジャ内で定義された変数は、ローカル変数となりプロシジャ内でのみ参照できます。
0158154
NGNGｸﾗｲｱﾝﾄ作ろうと思ったんですけど、
proc test1 {} {
set sock [socket "hogehoge.com" 80]
}
proc test2 {} {
puts $sock "test"
}
これは無理っすかね？
0159デフォルトの名無しさん
NGNGそれを引数としてtest2に渡すんじゃなかろうか。
グローバル変数でもいいけどそしたらこうだよ。
proc test1 {} {
global sock
set sock [socket "hogehoge.com" 80]
}
proc test2 {} {
global sock
puts $sock "test"
}
0160デフォルトの名無しさん
NGNGサンクス。無理矢理ﾛｸﾞｲﾝはでけた。
あとは、動的にｻｰﾊﾞｰからメッセージを受け取る方法を
考えなきゃな欄。
どうも、メッセージがないのにgetsを使うとﾌﾘｰｽﾞするっぽい。
0161デフォルトの名無しさん
NGNG(*´Д`*)２人のつるつるワレメがっ！(*´Д`*)ハァハァ
http://plaza16.mbn.or.jp/~satchel/turuturu/
0162デフォルトの名無しさん
NGNG何をどう書き換えたら良いのか分かりません。
誰かいいページとか、ヒントください。
0163デフォルトの名無しさん
NGNG0164デフォルトの名無しさん
NGNGhttp://www.k-514.com/
0165デフォルトの名無しさん
NGNGttp://togl.sourceforge.net/
TkOGL
ttp://aquarius.lcg.ufrj.br/~esperanc/tkogl.html
0166デフォルトの名無しさん
NGNG亀レスだが、Cでつくった関数を呼び出すだけなら
Ffidl なんてどうでしょうか？
ttp://www.interq.or.jp/japan/s-imai/tcltk/ffidl.html
0167デフォルトの名無しさん
NGNGhttp://aquarius.lcg.ufrj.br/~esperanc/tkogl.html
0168デフォルトの名無しさん
NGNG0169デフォルトの名無しさん
NGNG0170デフォルトの名無しさん
NGNG0171デフォルトの名無しさん
NGNG0172デフォルトの名無しさん
NGNG変更してるプログラム見た。神だ（藁
0173デフォルトの名無しさん
NGNG0174山崎 渉
NGNG__∧＿∧_
|（ ＾＾ ）| ＜寝るぽ（＾＾）
|＼⌒⌒⌒＼
＼ |⌒⌒⌒~| 山崎渉
~￣￣￣￣
0175デフォルトの名無しさん
NGNG0176デフォルトの名無しさん
NGNGあるウィンドウから別ウィンドウを操作するってことは可能ですか？
0177デフォルトの名無しさん
NGNGハイパーリンクみたいのはできんのか？
0179デフォルトの名無しさん
NGNG0180デフォルトの名無しさん
NGNG0181デフォルトの名無しさん
NGNGCで使うのはどうやるんだろ
tcl_eval使うのはいやー
0182デフォルトの名無しさん
NGNG（cygwinとか使わずに。）
0183デフォルトの名無しさん
NGNG検索覚えようね
Google Search: Tcl/Tk
http://www.google.com/search?lr=lang_ja&q=Tcl%2FTk
ASPN : Downloads : ActiveTcl
http://aspn.activestate.com/ASPN/Downloads/ActiveTcl/
0184デフォルトの名無しさん
NGNGTcl/Tk
0185デフォルトの名無しさん
NGNGhttp://aspn.activestate.com/ASPN/Downloads/ActiveTcl/
で、Downloadしたものをインストールしようとすると、
Errorになってしまうんですが
0186デフォルトの名無しさん
NGNG0187デフォルトの名無しさん
NGNG早速、デモを見て感動しました。
Ｃと併せれば凄い武器になりますね。
0188山崎 渉
NGNG0189名無し募集中。。。
NGNGttp://tcl.activestate.com/software/plugin/download.html
のSelf-installing executable (~1080 k)からダウンロードして、
実行したんですが、IEが3.0または4.0もしくはネットスケープに
インストールしますかと出てきます。
IE6なんですが、IEの方を選択してもインストールできませんでした。
どうしたらインストールできます？
0190デフォルトの名無しさん
NGNGWindows98SEにインストールしてみた。インストールは出来た。
IE6ではセキュリティを最低にしても動かず、Opera7では動いた。
アンインストールしようと思ったが、アンインストーラが無かった。。。
0191デフォルトの名無しさん
NGNG0192デフォルトの名無しさん
NGNG0194デフォルトの名無しさん
NGNG0195デフォルトの名無しさん
NGNG他のGUIツールキットじゃなかなかできないぞ。
あと拡張ウィジェットセットはいくらでもあるから試すとよろしい
0196デフォルトの名無しさん
NGNGやっぱりインタープリタの速度に準じるのかな。内部的には Tk コマンドを
インタープリトしてるんだよね?
0197デフォルトの名無しさん
NGNGAPI直叩けば
直接触れるのでは？
けどCから使うならgtkの方が良さげ
0198デフォルトの名無しさん
NGNGなるほど、そうですね。
Gtk+ が使えれば良いのですけど、移植待ちです。スクリプト言語からの使用と
図形の描画は tk の方が楽だと思います。
0199デフォルトの名無しさん
NGNG0200デフォルトの名無しさん
NGNGみたいな感じ? C から直接 tk の widget 使えないのかなぁ。
0201デフォルトの名無しさん
NGNG激しく使える。
0203デフォルトの名無しさん
NGNGそれって Tcl_Eval 経由ですよね。あるいは generic の中身を全部リンクするか。
list とか button とかって直接呼ぶ方法あるのかな。
0204山崎 渉
NGNG│ ＾ ＾ │＜これからも僕を応援して下さいね（＾＾）。
⊂| |つ
（＿）（＿） 山崎パン
0205デフォルトの名無しさん
NGNGWindowsマシンでDiskDrive名のリストをgetするにはどうすればいいのか？
明日から会社で急ぎでつ。
0206＿
NGNG! i iﾉﾉﾘ）) 〉
i l l.´ヮ｀ﾉﾘ ＜先生！こんなﾉがありました！
l く/_只ヽ http://www.yakuyoke.or.jp/
http://www.hokekyoji.com/
http://members.tripod.co.jp/hossyoji/index/
http://www.honmonji.or.jp/
http://www.maap.com/tanjoh-ji/
http://www.kuonji.jp/
http://www.butsuzou.com/jiten/sanmen.html
http://www.butsuzou.com/list1/sanmen2.html
http://www.butsuzou.com/list1/sanmen3.html
http://www.butsuzou.com/keitai/sanmen-kz.html
0207デフォルトの名無しさん
NGNG0208デフォルトの名無しさん
NGNG0209デフォルトの名無しさん
NGNGhttp://nul.jp/tcl/
http://www.geocities.co.jp/SiliconValley/4137/tcltk.html
http://www.geocities.co.jp/SiliconValley-Oakland/1680/
http://www.interq.or.jp/japan/s-imai/tcltk/index.html
マルチプラットフォームで、GUI作れて、国際化もバッチリなんだよぅ。
拡張使えば出来ないことなんてほとんどない。ろくに国際化出来てない
糞言語はさようなら。
0210デフォルトの名無しさん
NGNGfile volume
じゃだめなの？ローカルのドライブリストが
返ってくるはずだけど。
0211205
NGNGOKでつ。 できました。
ありがとう。 OnlineHelp嫁ってことでつな。
0212デフォルトの名無しさん
NGNGtkで日本語の表示が化けるけれど、パッチ当てないとだめ？
8.4のpatchなんて見当たらないんだが。
当方,lin kernel 2.0.38,X11,tcl/tk8.4.4
0213デフォルトの名無しさん
NGNGどの辺で文字化けするの？
0214デフォルトの名無しさん
NGNGLANG以外にLC_ALLを設定したらtkのwidgetで日本語表示できました。
0215デフォルトの名無しさん
NGNGentryの日本語入力はunix場合できますか？XIMP辺りのpatchを当て
る必要あるのでしょうか?
0216デフォルトの名無しさん
NGNG不要。
日本語入力時下記を追加
tk useinputmethods 1
Shift + Space で漢字変換用のウインドウがでます
0217デフォルトの名無しさん
NGNGsample1
#!/bin/sh
# the next line restarts using wish \
exec wish8.4 "$0" "$@"
# echo1.tcl
# 日本語入力
tk useinputmethods 1
wm resizable . 1 0
set font k14
set t0 "" ;# ダミー
entry .e0 -font $font
label .l0 -text $t0 -font $font -relief groove
button .b0 -text "Enter" -command {
set t0 [.e0 get]
.l0 configure -text $t0
}
pack .e0 .l0 .b0 -fill x
0218デフォルトの名無しさん
NGNGsample2
#!/bin/sh
# the next line restarts using wish \
exec wish8.4 "$0" "$@"
# echo2.tcl
# 日本語入力
tk useinputmethods 1
wm resizable . 1 0
set font k14
set t0 "" ;# ダミー
entry .e0 -font $font
label .l0 -text $t0 -font $font -relief groove
bind .e0 <KeyPress-Return> {
set t0 [.e0 get]
.l0 configure -text $t0
}
pack .e0 .l0 -fill x
0219デフォルトの名無しさん
NGNG２ちゃんねるで今度はハイジャック予告
0220212
NGNGえー！本当ですか？私の所ではそうならないんですが、linuxのcannaかkinput2が
古いのかな。もうちょっと新しいdistで試してみます。ありがとう
0221216
NGNG>entryの日本語入力はunix場合できますか？
^^^^^^^^
と言う事だったので↓です。特に何もしないで入力できてます。
FreeBSD4.7
XFree86 4.2.1
Canna 3.5b2
kinput2 -version -> kinput2 version 3.1 -beta2-
tcl/tk 8.4.1
【参考】
・Ctrl+\, Ctrl+oで入力できるか
・他のアプリケーション(kterm等)では入力できるか
NG->1.Cannaが起動されているか確認。
psまたはcannastatで確認
2..xinitrcまたは.xsessionの確認
kterm -geometry 80x40+0+0 -sb -km euc &
kinput2 & <----これがあるか
exec fvwm2
・環境変数の設定を確認
csh,tcsh
setenv LANG ja_JP.eucJP
setenv XMODIFIERS @im=kinput2
sh,bash
export LANG=ja_JP.eucJP
export XMODIFIERS="@im=kinput2"
・Linux固有の問題
0222デフォルトの名無しさん
NGNG↑をドラッグして|1234|の領域を拡大すると
|abcd|の領域が縮小して|123456|ab|ABCD|になりますが
|1234|abcd|AB|みたいにしたいのですわ。(WinのExplorerみたいに)
TCLの神々、やりかた教えてください。
|1234|abcd|ABCD|
↑
0223デフォルトの名無しさん
NGNG0224デフォルトの名無しさん
NGNG0225デフォルトの名無しさん
NGNGこのへんで探してるものがなかったら帰ってこい
http://aspn.activestate.com/ASPN/Cookbook/Tcl
http://mini.net/tcl/
http://groups.google.com/groups?hl=en&lr=&ie=UTF-8&group=comp.lang.tcl
0226デフォルトの名無しさん
NGNGhttp://www.google.co.jp/search?q=tcl+%E3%82%BD%E3%82%B1%E3%83%83%E3%83%88&ie=UTF-8&oe=UTF-8&hl=ja
0227デフォルトの名無しさん
NGNGHTTPヘッダをもとに文字コードを内部エンコーディングに
変換してくれようとしてるのはいいんだけど
Tclの文字コード名(shiftjis, euc-jp...)そのままでやろうとするから
日本語の場合euc-jpはTcl名とIANA名が同じだからたまたまうまくいくけど
shift_jisはTcl名だとshiftjisだからうまくいかない。
こんな手抜き実装がなぜいつまでたっても直らないのか。
誰も指摘してないのだろうか。
0229デフォルトの名無しさん
NGNGファイルに吐き出しては、エクセルなどの表計算ソフトに読み込ませて
グラフに表示させ、結果が気に食わないとまたCのプログラムを走らせて・・・
なんてことをやっていたのですが、手作業の時間のほうが計算させる時間
より長くてムダだぁ と思っていたところに、Tcl/Tkなる接着剤言語（？）
があると聞きました。
そこで、Tcl/Tk の入門書を読んで試してみたいのですが、全く言語仕様を
知らない、そして他の言語でもGUI環境のプログラムを書いたことはないという
ドシロウトが読むといい本はないでしょうか？
0230デフォルトの名無しさん
NGNG数値計算の部分？
エクセルに読ませる作業の自動化？
グラフ表示の部分？
0231229
NGNGレスありがとうございます。
計算そのものはすでにあるCのプログラムを使い、Cが吐き出した
計算結果をTcl/tkでグラフ表示したり、その結果をみて、Tclの画面で
対話的にパラメータを与えて、もう一度Cのプログラムに計算させなおして、
再度Tclで表示する・・・
と、いうようなことを考えています。
エクセルはただグラフを描くだけのために使っていますので、特にエクセルで
なければならないという必然性は全くないです。
標準入出力とテキストファイルしか使ってない、Cで書き溜めた
数値計算のプログラムがいくつかあって、いままではバラバラに
計算させて作らせたファイルを、エクセルで読み画面上でコピー＆ペースト
して手作業で並べ替えてからグラフを描かせていたりしたのですが、
作業効率悪いなぁ というのが、そもそもの動機です。
シロウト考えなんですが、なにやらTcl/Tkというよいものがあるらしいと聞き、
勉強してみようかなと思っているところです。
0232229
NGNG『はじめてのTck/Tk』という本なのですが、買って読んでみたところ、
どうも Windows というのが Windows3.1 のことらしくて・・・
0233デフォルトの名無しさん
NGNGTcl好きの私の手元にも今Tcl本は何故か無い。
Webの情報だけで結構いけると思うんだけどなあ。
「Tcl/TK入門」ブレント・B・ウェルチ、という
入門の名にふさわしくない分厚い網羅的な本があって、良い本だけど、
Tcl8.0の時代ので国際化とかあつかってなくてもう古い。あと高い。
0234229
NGNGなるほど、ありがとうございます。
取りあえず、手元の本とウェブの情報で勉強してみます。
『はじめてのTck/Tk』をぱらぱらと読んでいるところですが、私のやりたい程度
のことなら、これで十分かも。
（やりたいことは素朴なもので、単にテキストボックスにパラメータを入れて
ボタンを押すと既存の .exe ファイルを実行して、できた結果を標準入出力か
一時ファイル経由で受け取って表示するという程度なので）
0235デフォルトの名無しさん
NGNG詳解Tcl/Tk GUIプログラミング
http://books.rakuten.co.jp/RBOOKS/NS/CSfLastGenGoodsPage_001.jsp?GOODS_NO=1061604&rbx=X
…わりと新しい
Tcl/Tk入門第2版
http://books.rakuten.co.jp/RBOOKS/NS/CSfLastGenGoodsPage_001.jsp?GOODS_NO=1204628&rbx=X
…古いけど一番詳しい
234程度のことならこれなんか参考になる
http://www.geocities.co.jp/SiliconValley-Oakland/1680/tcl_tk_doc/tcltk206.html#chapter17
0236デフォルトの名無しさん
NGNGうーん！オレなら
C/C++で数値計算->Perl/AWKで整形->Xgraph/gnuplotで表示
って具合に処理するよ。
0237デフォルトの名無しさん
NGNGhttp://www.interq.or.jp/japan/s-imai/tcltk/index.html
>>236
Tcl/Tkならその一連の流れを簡単にまとめられる。
ていうかTcl/Tkってこういう時のための接着剤（グルー）だし。
0238デフォルトの名無しさん
NGNG>C/C++で数値計算->Perl/AWKで整形->Xgraph/gnuplotで表示
これですむし、>>229のようにExcelに取り込んで云々程度であれば
Tcl/Tkでまとめるより、シェルスクリプトで十分じゃねぇか。
0239237
NGNGうーん。いや、わかるよ。
でも毎度3つのツールを使うんだったら、Cで書いた計算プログラム
をexecなりなんなりで実行して、その結果をTcl/Tkで受け取っ
て整形、最終的にBLTで表示っていうのをまとめたツールを作っ
ちゃえば、使う時に楽だと思うんだけど。頻繁に使うなら特に。
0240デフォルトの名無しさん
NGNGいや、だからね。接着剤の部分は
シェルスクリプトでちょいちょいと書けば十分でしょ？
って言ってるのよ。
tcl のexecもいらないよ。例えば数値計算実行ファイルをmysim、
それが吐き出すファイルをsimulate.dat, 整形プログラムをreform.pl
整形データをreform.datとすればこんな感じ。
#!/bin/sh
mysim > simulate.dat
reform.pl simulate.dat > reform.dat
xgraph reform.dat
でいいんだから。特に最後のグラフの部分をtcl/tkで書くとしても
細かいこと考えると結構面倒よ。2次元でいいならxgraphが一番手っ取り早い。
0241デフォルトの名無しさん
NGNGひとつだけ覚えてそれだけでなんでもかんでもやるもんだから
Tclじゃなくてもいいっていうのは正しい。
でも同じようにPerlじゃなくてもいいしawkじゃなくてもいい。
Tclでやろうかと思ってる人にあえて他のをすすめる理由は無いよ。
あとWindowsを使ってる（エクセルっていうからそうなんだろう）ようだから
awkやシェルスクリプトは環境的に馴染まないと思う。
「対話的にパラメータを与えて」っていう要件を考慮するとTcl/Tkは良い選択だと思うよ。
ところでExcelをCOM経由で（Tclならtcomを使う）オートメーションする
っていう方法もあるよ。
0242デフォルトの名無しさん
NGNGかわいい少女のツルツルオマンコに生姦、中出し！
映像の乱れは気になりますが挿入シーンはバッチリですよ。
オマンコからトローリ流れ出てくるザーメンはマニアには
たまらないでしょう。これは必見！
素人援交女ばかり！今すぐ無料ムービーを！
http://66.40.59.73/index.html
0243デフォルトの名無しさん
NGNGHDDを一台買って、LinuxなりFreeBSDをインストールしてメインの
開発環境はそちらに移行することをすすめるよ。研究用のメインマシン
としてWinはどうかと思うな。Winマシンは補助的には使うから不要って
わけじゃないけどね。
対話的にパラメータを与えてごちゃごちゃするならExcelで読み込んでるのと
何も変わりは無いだろ？そういうごちゃごちゃなしにザッと適当な処理を
するからオートメーションの意味があるわけよ。
まぁ、プレゼンや論文用のきれいな資料作らなきゃいけない場合もあるだろ
うから、そういう場合にはMatlabあたり使って計算しながら資料作ればいいよ。
0244237
NGNGはい、それの方が手っ取り早いと思います。
ただ、これらをまとめたhoge.tclを作れば、GUIもつけれるし、
シェルスクリプトも一行ですむな、と。241の言うように、状況
にあわせてツールを使い分けるのは大切だし、細かいところまで
作り込むのはたしかに手間かもしれません。
0245デフォルトの名無しさん
NGNGそれでやればいいってだけの話だよ。
環境が違う人には違うソリューションがあるよ。
面倒をかけずにさっさと済ませるためのスクリプティングなのに
「環境をかえろ」なんて本末転倒だよ。
0246デフォルトの名無しさん
NGNG>>245
ど素人はすっこんでな！
0247229
NGNGいくつかのサイトを見て、Tcl/Tkやいろんな人が入門用に作って
下さっているサンプルをダウンロードして試しているところなのですが、
数値計算の研究者はTcl/Tkを使ってはいけないのでしょうか・・・
そういうわけでは、ないですよね？ 今、ちょこまかとサンプルをいじって（壊して？）
楽しんでいるところなのですが、対話的に数値実験をする環境を作るのに、
よさそうなんじゃないか、という感触を持っているんですが。
混乱のタネのまいたようでしたら、すみません。おじゃましました。
0248229
NGNGいや、学位は持ってませんので、シロウトですね。お叱りが来る前に訂正して
おります。すみません。まあとにかく、「今よりマシ」になるなら十分ありがたいので、
まずは最初に思いついたように Tcl/Tkの勉強をやってみようと思います。
もちろん、FreeBSDやLinuxに興味がないわけではないのですが（そもそも、
Tclに興味を持った理由のひとつは、複数のOSで動くから、ということもあるので）、
何か知らないことに手を出すときは、一回に一つにしておきます。
0249デフォルトの名無しさん
NGNGMinGWで挑戦してるがどうもだめだ。
0250デフォルトの名無しさん
NGNG本家のココにWin用のバイナリあるけど、これじゃダメなのか？
http://www.tcl.tk/software/java/download.html
Tclのバージョンは8.3みたいだけど
0251デフォルトの名無しさん
NGNGTclはともかくとしてJavaのバージョンを選ぶんだよ。
0252デフォルトの名無しさん
NGNG0253デフォルトの名無しさん
NGNG創始者の先生の顔のビットマップ画像ファイル face.bmp って、
WindowsでいうBMP画像ではないのですね・・・
中味を見たら、Cのヘッダファイルみたい。
0254デフォルトの名無しさん
NGNGhttp://homepage1.nifty.com/runrun/second/xbm/
0255253
NGNGはい、それでーす。
いろんなTkの入門サイトを見る限りでは、BMPに対応してないはずなのに、
ファイル名は .bmp だし、デモのソースコードでも、-bitmap face.bmp と
書いてあるので「おや、BMPに対応しているんだ」不思議に思いつつ、
手元にある別のBMP画像のファイルを指定すると読めないし、
ぎゃくに、GIMPで face.bmpのほうを表示してみようとすると、これまた
読めないので、一瞬何事かと思ってしまいました。
0256デフォルトの名無しさん
NGNG0257デフォルトの名無しさん
NGNG0258デフォルトの名無しさん
NGNG計画はあったと思うけど。
最近追いかけてないので。
0259デフォルトの名無しさん
NGNG0260デフォルトの名無しさん
NGNG知らんかった。Thx!
Tclって全然
「オブジェクト指向スクリプト言語」として
見られてないよね。
もったいない。わりとこなれてるのにね。
0261デフォルトの名無しさん
NGNG0262デフォルトの名無しさん
NGNG0263デフォルトの名無しさん
NGNG0264デフォルトの名無しさん
NGNGドローツールによくある
図形（線）の端をドラッグするとマウスの動きにあわせて伸び縮みする
機能が実現できないでいます。
今はマウスの移動イベントが発生するたびに、前のlineオブジェクトをdeleteして
新しい座標でcreateすることを繰り返しているのですが、100ピクセルも動かす
と固まってしまいます。
おそらくオブジェクトの生成・破棄の回数が多すぎるからだと思うのですが、
正しい方法をお教えいただければ幸いです。
0265デフォルトの名無しさん
NGNGつい２週間まえからTclの勉強を始めたばかりなんで、
はずしていたらすみません。
解説書をみると、
キャンバスにあるアイテムの座標は、
(canvasName) coords tagOrId ?x1 y1? ... ?xn yn?
という書式で変更できるみたいですね。
canvas .c
pack .c
set myLine [.c create line 0 0 100 100 -arrow both]
for {set i 0} {$i < 200} {incr i 5} {
.c coords $myLine $i 0 100 100
update
after 100
}
0266デフォルトの名無しさん
NGNGありがとうございます！
まさに求めていた方法でした。
私もはじめたばかりで、ヘルプをみながら書いているのですが、
これが分かりにくくて…なにか本を買ったほうがよさそうですね。
0267デフォルトの名無しさん
NGNGUEsDBBQAAgAIALS0Vy+mXet/hAMAAG0KAAAIABUAdDAxYS50Y2xVVAkAA6PZlz+j2Zc/VXgEAOwD
AQKdVsFu2zgQPduA/2Eaq0CbwIlYtJe0KbDbusihXRTdHLZwjYKWGImoRHkpyrER+N93hpRkypay
QA+CJM68x+HM45DTZ1dVqa9WUl0JtQETZWU6Ga959IsnArT4t5JawN2vyXgyVjwXJZoEiA3P4C5k
8EjjG64lX2UCeGTkRtxyFWfik8wyxMcAUp2Mr7JKeLgii/+BEOj9HcK3AK0llqWBN55rytUrfHwf
GsqkEhTKWhcRFOrnWouyxMkfI65gC7s9RToaDNS32WCCbR1NsCPaUSkMSCNyWATEeC9VDA/SpIYn
EFVaC2WW6Cbv4XFRGi1VAplQiUkhINgSbm4g3GM+TKVVy4josmYkryjBMesPMzI1jM8aypybKIXz
2z/++vh5fg6BdeqwHrgKdS+TCmvnEcIChyNu4O/55/mHu/nHmqIJJxV3/x9RzxQt3eyeqhucpnfv
F0eLTPAnqnMqmKG1HU/ch3S4mCrVuB/FkxdGFmoomicV15WN70PqOVayXUaPRnpE1YS67JHOFPJi
Y6PARTYLtENtPhZiu9ao4llAcS2b/539/94UvJb64a/Vez1FvUgnDlm6tP7GHjiAB3bCdhfCItNc
JQ19VBQ6LrvQEFgbOopV1/EEdYleeM4vW2I2QOwxdJhpzY6Svo45OxTW1aV2gd+x2GI2cSXh8iKg
ei/7jKwx/hiNTszsKSxDLFyAM/sajrTgRvx0gvidnte7b06lS+nBSZpE2lmxkpHB9GbCE52/ABKd
+/+BFKPG6eLIqfkf3MkDvYcqVXc31xdtpCsSp/V+92dlTKG+0oEwY+/hDI+t62vviLBez7fwfHfW
B/zmmlUH2jawQewX21I8SN1jOgCEuG1gF9FTUKsvV84QUDpbBjvW356Oh5oD8SDpTtGcyJE1QNoA
eYMdG0qw1wScwnCrdhVnUTXbsuPKBlzbCWtXt31r+pdQfzHPwW3Gg0c3Kh/PWnw4gGct3iuBGzjU
IOcSzwSX7YccjDQY/iWcxZoniW1ulENqgPVaSQLF2paZxzGcf+Bqw8vLFd6lEl1U1C1TTC16RdYC
lxHMHmSMBK/CEGapkElq6JtcPAWg3xu8HeHD3LvXzkJnZwN4dnjQTjc8NDSq5bjn3s3LiK/Fe3gU
W2n2dS72b2EKPTe/KRmtuilRk/EUNjK/LnOuDTUsRbebVWmK9c1rUFW+Enoy/g9QSwECFwMUAAIA
CAC0tFcvpl3rf4QDAABtCgAACAANAAAAAAABAAAAtoEAAAAAdDAxYS50Y2xVVAUAA6PZlz9VeAAA
UEsFBgAAAAABAAEAQwAAAL8DAAAAAA==
0268デフォルトの名無しさん
NGNGサンプルコードを読んで学ぶのなら、
ソースdistributionの tk?.?.?/library/demos/* とか、
http://aspn.activestate.com/ASPN/Cookbook/Tcl/
http://wiki.tcl.tk
のへんに、参考になるものがたくさんあります。
特に Richard Suchenwirth さんの作品集は楽しくて、刺激されます。
http://mini.net/tcl/1683
0269デフォルトの名無しさん
NGNG> なにか本を買ったほうがよさそうですね。
検索エンジンで「Tcl 入門」とか探すと、結構いい情報が得られるよ。
本は、最近のバージョンに対応したものは、日本語ではないみたい。
おまけに、少し前にでた本も、軒並み絶版だったりして（涙）。
アマゾンで、Tcl/Tk: A Developer's Guide って本（英語）を買ったけど、
初心者向けに問題集が用意してある点なんかはいいけど、各コマンドの
オプションについて一部分しか記述していなかったり、付録CDのファイルに
抜けがあったりで、いい本を作ろうとして途中で力尽きているような感じが
したなぁ。
（CでTclを拡張するサンプル、インクルードすべきヘッダファイルがCDに
入っていない・・・ いや、実は違う名前のヘッダファイルの中味がそれだったり
する。５年前に出した本の付属CDのファイル名らしい）
同時に買った、Practical Programming in Tcl and Tk は、Tcl/Tkについて
網羅的に取り扱っている本で、amazon.comの読者の評判もかなり高い。
ただ、これはこれで何もかも載せているから、ひとつひとつの説明のページは
ちょっと少ない。
やっぱり、ウェブで情報を集めて、動かしながら試すのがいいのでは？
0270デフォルトの名無しさん
NGNGパスの指定などはどうやればいいのでしょうか？
あるサイトでTcl/TkとCで作ったオセロゲームがあるのを見つけて、ためしに
やってみようとダウンロードしたのですが、load コマンドのところでエラーに
なってしまいます。DLLはスクリプト本体と同じフォルダにあります。
（Dドライブの下に、TCLという名前のフォルダを作り、そこにダウンロードしました）
パスが通っていないのかと思って、ドライブ名からそのフォルダまで全部書いて
みたり、file join [pwd] などと付け加えてみたりしてもダメ。auto_path に今の
フォルダ名をlappendしてもダメ・・・
「this library or a dependent library could not be found in library path」
と、いうエラーメッセージが表示されるのですが、これって、そもそもどういう
意味なのでしょうか？
ActiveTcl 8.4.4を使っています。最初から付属してくるいろんなライブラリ（DLL）は、
load ファイル名.dll でロードできるので、パスの指定なのだろうなとは思うのですが、
それ以上のことが分かりません。
0271デフォルトの名無しさん
NGNG貴重な情報ありがとうございます。
おかげでドラッグ可能なグラフの表示ができました。
確かに、ウェブで検索すると説明ページがたくさんでてきますね。
キーイベントが拾えなかったり（.でなくcanvasオブジェクトにbindしていたため）、
起動時にウインドウがアクティブにならなかったり、packでのレイアウトが意図
通りにならなかったり…などなど、些細なところでいちいちつまずくので、
一度ちゃんとした本でtcl/tkの全体をおさえたいと思ったのですが、
ウェブのサンプルプログラムをたくさん見たほうがはやいかも知れません。
紹介されたページに行ってみます。
0272デフォルトの名無しさん
NGNG他のサーバとの通信のためにselect/pollと併用したい場合、
Tkのイベントハンドラとの関係はどのようになるのでしょうか？
１つの方法としては、自分でselect/pollを用いてメインループにし、
そこにTkが用いるものも登録して、そのイベント発生時にはTkを呼ぶ方法。
もう１つの方法としては、メインループはTk側のままであって、
自分が使いたいイベント（タイマーとか、通信ならファイルハンドラとか）を
Tk側に登録して、適時コールバックしてもらう方法。
こんなふうに２つほど考えられそうなのですが、現実としては、
どんな関数をどう用いればよいでしょうか。もしよければTcl/TkとPerl/Tkの場合を。
0273デフォルトの名無しさん
NGNGデフォルトのフォントは、どこで設定されているのでしょうか？
症状は、python + Tkinter で text 領域に日本語を表示させているのですが、
日本語の文字が全て□になって正常に表示されません。
Debian でごそっと X 関連のパッケージを入れ換えたら、何か変になってしまったのが原因で、
プログラムは動いていたものなので、フォント周りの設定か、パッケージ不足かだとにらんでいます。
0274デフォルトの名無しさん
NGNGTcl/Tk では、 fileevent コマンドで、ファイル
ディスクリプタまたはソケットディスクリプタに
対して、コールバックルーチンを登録します。
Perl/TkならPerlスレで訊くのがよいのでは。
0275デフォルトの名無しさん
NGNG--
1. The directory where the executable module for the current process is located.
2. The current directory.
3. The Windows system directory. The GetSystemDirectory function retrieves the path of this directory.
4. The Windows directory. The GetWindowsDirectory function retrieves the path of this directory.
5. The directories listed in the PATH environment variable.
0276デフォルトの名無しさん
NGNGそれって↓でダウソしたのかな。
ttp://www.geocities.co.jp/SiliconValley-Oakland/1680/
だとしたらTcl/Tkのバージョンが合ってないんじゃないかと。
0277デフォルトの名無しさん
NGNG0278270
NGNG>>275
なるほど、やっぱりカレントディレクトリも読み込みの対象になるのですね。
だとすると、読めないはずがない・・・ と、思ったら・・・
>>276
はい、そのサイトで勉強させてもらっているところでした。なるほど、再コンパイルが
必要なようですね。
どうもありがとうございます。
0279デフォルトの名無しさん
NGNG0280273
NGNG悪さをしているらしく、そいつを purge したら正常に表示するようになりました。
ちなみに問題をおこしていた(と思われる)のは Debian/sid の msttcorefonts パッケージです。
0281デフォルトの名無しさん
NGNG釣られてあげよう！
キミはTclの楽しさをしらないだけだぁ！
0282デフォルトの名無しさん
NGNG社会でてつかわないんだよ。使うような場面あるか？ウィンドウズだったらＶＢだし
0283デフォルトの名無しさん
NGNG518 名前： 文責：名無しさん 投稿日： 2001/04/13(金) 17:49
>>514
マスコミの範疇にはいる会社は、全部、盗聴／盗撮を利用していると
考えて差し支えない。たとえば、原作．．．．というドラマが放送さ
れたりしますが、実は、その原作の奥に、507みたいな本当の原作が隠
れていることがある。最近のNHKの朝の連続テレビ小説や夜のドラマに
はそのようなものがあるらしい。あえて有名作家の名前を冠するのは507
みたいなアイディア発想者のクレームを封殺するため。で、アイディアを
盗用したシナリオ・ライター（作家、編集者．．．等）は何かの媒体で
「自分」の作品を誉めることで、間接的にアイディア発想者を誉めて、
黙らせようとする。さもしい根性だよ。
591 名前： 文責：名無しさん 投稿日： 2001/04/16(月) 10:54
そう言えば、あがれの著名人が私についての盗聴内容やノートをネタにした
作品を読んだ時は、がっかりしたなあ・・・。
この人、この程度の人だったんだ、って・・・。
結構たくさん持っていた、その著者の本を、持っているのもつらくて
破棄してしまいました。
592 名前： 文責：名無しさん 投稿日： 2001/04/16(月) 10:56
>>591
＞あがれの著名人
「あがれ」ではなくて「憧れ」でした。（笑）
0284デフォルトの名無しさん
NGNG0285デフォルトの名無しさん
NGNGわたしはネットワークエンジニアですが、Tclを使いますよ。
以上です。
0286デフォルトの名無しさん
NGNGUSで売れてる業務アプリには何故かカスタマイズ言語が
Tclなのがいくつかあるので使う場面あるよ。
MatrixOneの製品とかAdexaの製品とか。
0287デフォルトの名無しさん
NGNG使いたい人だけが使えばいいので、使い道を思いつかないなら無理に使う必要は
ないんじゃない？
0288デフォルトの名無しさん
NGNG0289デフォルトの名無しさん
NGNGそのソフトを見たときは、Tｃｌってのがいったい何なのか、全然
知らなかったけど。
0290デフォルトの名無しさん
NGNGわかったけどTkは組み込めるの？
0291デフォルトの名無しさん
NGNG#include <stdio.h>
#include "tcl.h"
#include "tk.h"
void main(){
/*ここ不明*/
}
0292デフォルトの名無しさん
NGNG0293デフォルトの名無しさん
NGNG組み込める。
0294デフォルトの名無しさん
NGNG0295デフォルトの名無しさん
NGNG0296デフォルトの名無しさん
NGNGソースコードもあるけど、あらかじめコンパイル済みの
オブジェクトファイルも手に入るから、自作のCプログラムにヘッダをインクルードして、
Tcl インタプリタと Tk のライブラリの両方をリンクする。
0297デフォルトの名無しさん
NGNG0298デフォルトの名無しさん
NGNG0299デフォルトの名無しさん
NGNGJavaだとオブジェクトをシリアライズしたりするといったような
初期設定を簡単に保存する方法はありませんか？
0300デフォルトの名無しさん
NGNGputsで "set 変数名 $変数名" というように、今の変数の値と名前を
ディスクに保存してやれば、後からそのまま読み込んで使えないかな？
0301デフォルトの名無しさん
NGNG0302デフォルトの名無しさん
NGNG色々調べてたらTclで構造体みたいなのは連想配列で代用するそうですね。
300さんの方法はトリッキーだなあと思ったのですが、Tclではデータを
スクリプトで書くのが推奨されてるようでして、連想配列でやるならファイルに
array set MyData {Name 小倉優子 Age 20}みたいなのをputsで書くようです。
301さんのそのままっていうのはまだちょっとよくわかりません・・・。
ちょっその方向で調べてみます。ありがとうございました。
0303デフォルトの名無しさん
NGNGset freeze(abc) def
set freeze(ghi) jkl
set f [open frozen w]
puts $f [array get freeze]
close $f
set g [open frozen]
array set thaw [read $f]
foreach i [array names thaw] {
puts $i=$thaw($i)
}
0304デフォルトの名無しさん
NGNGarray set thaw [read $g]
のつもりだｔった
0305デフォルトの名無しさん
NGNG0306デフォルトの名無しさん
NGNG0307デフォルトの名無しさん
NGNG日本語を含むと実行できんのね・・・。
なんとかならん？
0308デフォルトの名無しさん
NGNGやってみたけど(Freewrap5.5 + WinXP JP)、確かに、
exeを日本語名フォルダの下に置いて実行すると
アボートしますね。cp932.enc をアーカイブに含めても
同様にだめです。mesgが出ないのでどこでエラーが
生じているか良くわからない。
Starpack <http://mini.net/tcl/3663>; の方は
どうだろうか??
0309デフォルトの名無しさん
NGNGうまくいったらどこかホームページにでもあげてよ
0310デフォルトの名無しさん
NGNGDev Kitでダメなので、Starpackも無理なんじゃないかと。
個人的にこの問題が解決されると助かるんですけどね。
Freewrapはfconfigureも何とかしていただきたい。
0311デフォルトの名無しさん
NGNGttp://reddog.s35.xrea.com/archives/000046.html
0312デフォルトの名無しさん
NGNG0313デフォルトの名無しさん
NGNGどうしたらいいですか？
exeファイルをクリックするとエラーが出ます。
フォルダ名に空白を含まないようにしたりしたけど駄目でした。
0314デフォルトの名無しさん
NGNG0315デフォルトの名無しさん
NGNGインストーラをc:\の下において実行してみては．
0316デフォルトの名無しさん
NGNGできました。ありがとうございました。
0317デフォルトの名無しさん
NGNG0318デフォルトの名無しさん
NGNG# 2003-11-07, This program has been placed in the public domain.
set width 300; set height 200
set x0 [expr $width/2]; set y0 [expr $height/2]
option add *Font SystemFont
pack [canvas .c -width $width -height $height] -side top
.c create rectangle [expr $x0-10] [expr $y0-20] [expr $x0+10] [expr $y0+20] -fill black
.c create oval [expr $x0-10] [expr $y0-40] [expr $x0+10] [expr $y0-20] -fill black
.c create line 0 0 -10 20 -15 20 -width 5 -tags {migiasi}
.c move migiasi $x0 [expr $y0+20]
.c create line 0 0 10 20 15 20 -width 5 -tags {hidariasi}
.c move hidariasi $x0 [expr $y0+20]
.c create line [expr $x0-10] [expr $y0-20] [expr $x0-20] [expr $y0+20] -width 5 -tags {migiude}
.c create line [expr $x0+10] [expr $y0-20] [expr $x0+20] [expr $y0+20] -width 5 -tags {hidariude}
frame .f
pack [button .f.aka -text "赤"] -expand yes -fill x -padx 1m -side left
pack [button .f.siro -text "白"] -expand yes -fill x -padx 1m -side right
pack .f -expand yes -fill x -side bottom
0319デフォルトの名無しさん
NGNGglobal x0 y0
if {$arg == "age"} {
.c delete tag migiude
.c create polygon [expr $x0-40] [expr $y0-50] [expr $x0-50] [expr $y0 - 40] [expr $x0 - 40] [expr $y0-30] [expr $x0-30] [expr $y0-40] -fill red -tags {migiude}
.c create line [expr $x0-10] [expr $y0-20] [expr $x0-40] [expr $y0-50] -width 5 -tags {migiude}
} {
.c delete tag migiude
.c create line [expr $x0-10] [expr $y0-20] [expr $x0-20] [expr $y0+20] -width 5 -tags {migiude}
}
}
proc siro {arg} {
global x0 y0
if {$arg == "age"} {
.c delete tag hidariude
.c create polygon [expr $x0+40] [expr $y0-50] [expr $x0+50] [expr $y0 - 40] [expr $x0 + 40] [expr $y0-30] [expr $x0+30] [expr $y0-40] -fill white -tags {hidariude}
.c create line [expr $x0+10] [expr $y0-20] [expr $x0+40] [expr $y0-50] -width 5 -tags {hidariude}
} {
.c delete tag hidariude
.c create line [expr $x0+10] [expr $y0-20] [expr $x0+20] [expr $y0+20] -width 5 -tags {hidariude}
}
}
bind .f.aka <ButtonPress-1> "aka age"
bind .f.aka <ButtonRelease-1> "aka sage"
bind .f.siro <ButtonPress-1> "siro age"
bind .f.siro <ButtonRelease-1> "siro sage"
bind . <Escape> exit
0320デフォルトの名無しさん
NGNGこんなパブリックドメインイラネ
0321デフォルトの名無しさん
NGNG0322デフォルトの名無しさん
NGNG試しに自分で作ってみれ。
03232ch.tcl(1)
NGNGfconfigure $f -translation {binary binary}
package require base64
puts $f [base64::decode {
UEsDBBQAAAAIANy6aS+oL9VrPwcAAMITAAAHAAAAMmNoLnRjbLVYS4/bRhI+
zwDzHyoMJ7E9ISWNHex6Mpbj2bG9BmIESGIkgKQMmmSLYobq5jabI2kFnXzZ
w15ySf7M/qL9Fanq5lOPiYPdAPMgq6vrXV+V9PFHvSJXvSARPS7uQIdpPjs5
zrmGF4EsNDjfcJZ6r4tV/ilcKbnIuYKpVHAeItt5v//YGwy8/lOA72ZJDpmS
sWJzmLEcAs4FZCkLeQSJAD3jkBVBmoQQyTlLhH9y7JwcZyy8ZTEHxf9RJIrD
d7fwV//JLn2mdbZLvZvmFxf2CI1eJDqcgYs+3KBejWbOH1QPD2F9crxIRIQu
HK1lphMpgEURPHolhYb1+u238O7Na6lnSbiBwWCzOTne2EB8WwQ/8VC/5nLO
tVqBc9Y/+7zv2MMrlvN333wFDllx0etl4bmPsfEF1z3Nw5nTyHgTwcC+vc3j
5uX65dW719AnDzB8IUhxo2eKs+iG/rAg5bCewmJDDhzFqQxYWgowN5GYTGE9
4nIK7nRi2Y4U14US+LShS1zneAZpInjJ7pq7JbO7wARhYjVwEYHjEt9YOKBZ
fM2DIi7F0L2PRorHfJnB+oH/6PnDy+HefxswMmDONAg2p4ck1RIipjkEMlrt
NRMl50UAHktTcC4ZoKxSYI8NHXDpIjjj8cAxMrZvfJLqL2quywM8cYtneIBH
BHnWcMEBLjZvMX2yn+kyUC3DRc1EaTfEUa5VImLAv3OVxDNtmSfIs50Um3K0
ZpQmuabcWMo8j+3Znku//Ofnry/ApRQ4sMYrr5ScN6ksladcxBr7xiZpAs+e
QX9/ZcBlyTTsitvsqgbUS+kmr4n1Gp932Wxo6PwKH/aIGQsUQAaLUNmqN21Z
tUrGxU1QotK6UGmnSdo4UHVJ6TIWJiIFduwjcPFaVY6UF3yFGRFLv34fVY5K
WIF1aMSu+ZKHgE2SSoV2OSTMITw5KkSy7HLdaq7m4HFIV2LZZo34lBUpApO+
vZnzPEfUu5JL8PQq4yBvwSuJsH6DeCo+1XAr5AJm+IuNlpv/iLgLHmTI5W/K
NG32wEwkEZZ5iMh8C+sFLGFlw0HRMG08wqQghoDzpbv8zF0ZYq6Z0k6HhAlz
JlWgK5gYDp8/GEdnD9uQgCWbRJOmxHLOTRkbuj9NVK6PvvgYYomekBOKT7lS
3NR6C4saKJo9x1TmzxF+R+Pl+cAbL//CJ12drSx3qqbJdBMa9LWMDcUjQISn
03242ch.tcl(2)
NGNGiOwDB0k91+j0iYUCOw2lmCZxgYMP0dzjIpQRVXOYPX18TudJyvkdR/F4XA8P
Z89AwXN34bR9rmohybG2Vzt+Q26HoPXfwgeW/VRinRMcuYsqulpmKRqRIole
aWLDSPMl8fgavBk3OPekD94qD5VM01DO58xg3MLPA6wG9Ba9W2ZEXPEcPHQs
RcBEkPLyJMJm4VPdCLdSAqbACvDaAjWs7hK+2Ctx1RVn4cc32ApNqGuk9bDj
eawwfxEEacGfEIV2h7/JQiVYS4NzNDKNDsshvOyIiZi6jRV2zsErhJt/8ApB
KXjpnKk4EQN4fF6/nIOpk/3XXnTUZIXCPB42i/aCzoU5wozQDG/gLonIvoBL
LPWcfz/jPB22kgun106b6++4Vg3LXBESYNd0zl+KqH1MKNM+fvU5nrY6FmlV
b4Htn660PGQZ6YsQwpRc2T5ozq8NGHqDYbtv2ghpDDldwumK7k1lWOQmDiE3
R0hbzEEnmrpsAc77H97/+33wHisX3LKHHMsTV/skso1omCBKOWenEf7gkMdi
VVC22BL8CZxVb4skwkYwlEF/UlFXSCGM6ETC19uxQA7Fkpzb7rTrl3nuDIbS
0HsW0GrtLffaezZRFGcJVuWfto/+2KygD9028iN6Vui1d+3saqszcfqEthjX
Ojgh3fZx54ZT5xUcjHF5w9nls5sMEqmbTME17HCJFTcm25wtJPbtO4EYuFXY
cQcUEV8i9mVpos2mRRWB5TCuzRk796l7IVbeS4HbR6W2ZGx1ecPd7nOcwwPw
AkTekpASnq94muLK4SGBKxP6we9p/4qzO/5Hta83Hd302qjs15tilaruTC8D
0xpunZqu89v9wPZhA73us0AyVQmph7kh9kr9vl7+r/N8p0F3B3rFsjvRO07b
T/lbH3FL83GUV/DSmupk+X1T3eKTeVIsAyExM/eOelMBRx8y8P+/895iPjn5
IZPK8N07qwzHfdPKMpQDCPemLSNe0dA5tO7biWKz1ez+riFstlTUI7Eq+M4k
sH25b6jv6be9e87TwxvOfXvB1qw8aU9KstvMyn/999dfaVa2jO3MSmJ0d8v1
oLcn7YHXdAd9AUXosTvSkGD72vqF+IIIbnyA9Vsp2D+xklgPE4+fkfFDChUe
0xJNmyY8jcx3Y2iMpj727Vpvq3aq6IsQn4ykAj204VLrbXVufafG/9ITcuLk
+DdQSwECFAsUAAAACADcumkvqC/Vaz8HAADCEwAABwAAAAAAAAABACAAAAAA
AAAAMmNoLnRjbFBLBQYAAAAAAQABADUAAABkBwAAAAA=
}]
close $f
0325デフォルトの名無しさん
NGNGこれ面白いね。
0326デフォルトの名無しさん
NGNG0327デフォルトの名無しさん
NGNGあんた神だ。
せっかくだから、さらに発展させてtcl版の2chブラウザ
作ってください。
0328デフォルトの名無しさん
NGNGおもろいな。何が出てくるのかちょっとびびったけどな。
0329デフォルトの名無しさん
NGNGうおぉ？？ こりゃ、確かに２ちゃんねるブラウザだ。
0330329
NGNGｔｃｌは全くの素人だから（ちょこっとGUIを作って、シェルスクリプト代わりに使う程度）
ネットワークプログラムとか全然わからないけど、package require http とかで
ライブラリを使えば、こんな規模でも一応２ちゃんねるブラウザになるんだ。
ちょっと、真面目に勉強してみようっと。
0331デフォルトの名無しさん
NGNGブラウザいらないし。
0332デフォルトの名無しさん
NGNGグローバル変数って、ファイルをまたがっても有効なのか？
わがんねぇ。
0333デフォルトの名無しさん
NGNGこのお言葉に甘えて、一つお伺いします。
Why you should not use Tcl
Richard Stallman, GNU Project
Tcl was not designed to be a serious programming language. It was
designed to be a "scripting language", on the assumption that a
"scripting language" need not try to be a real programming language.
So Tcl doesn't have the capabilities of one. It lacks arrays; it
lacks structures from which you can make linked lists.
It fakes having numbers, which works, but has to be slow. Tcl is ok
for writing small programs, but when you push it beyond that, it
becomes insufficient. Tcl has a peculiar syntax that appeals to
hackers because of its simplicity. But Tcl syntax seems strange to
most users. If Tcl does become the "standard scripting language",
users will curse it for years--the way people curse Fortran, MSDOS,
Unix shell syntax, and other de facto standards they feel stuck with.
For these reasons, the GNU project is not going to use Tcl in GNU
software. Please, if you want to use Tk, use it with STk, not with Tcl.
内容は既にOut of Dateですが、何故？ストールマンはTCLが嫌いなんでしょう？
0334デフォルトの名無しさん
NGNG0335デフォルトの名無しさん
NGNG0336デフォルトの名無しさん
NGNG漏れはTclのリストが好き。可読性が高いのも良い。
ちょっとしたテキスト処理には便利だと思うけど。
それ以上のことがしたい時はCで組めばいいだけで。
わかりやすい欠点あげてくれない？
>>333
理由はここに書いてなかったっけ？
ttp://www.os-omicron.org/~takano/private/trans/tcl_j.html
0337デフォルトの名無しさん
NGNGそれに対して弁明していたような気がしたなー。どこにその記事
あったか忘れた
0338デフォルトの名無しさん
NGNG0339デフォルトの名無しさん
NGNG0340デフォルトの名無しさん
NGNG>なげーよ
ゴメン。英語分からんから、どこで切ったら
良いやら…（藁）
>>335
Tclは良いところだらけです！キッパリ
>>336
あのぉ。一応原文を読んだつもりなんだけど…。
>>337
ttp://www.icemcfd.com/tcl/comparison.html
これを熟読玩味されることをお奨めします。
>>338,339
激しく同意。Perlの暗号みたいなプログラムの
どこが良いのかさっぱり分かりません。でもLispは
チョビ好き。（藁）
個人的な偏見ですが、ストールマンはLisperです。
Tclの関数言語的なところに、返って反発したんじゃ
ないだろうか？と…つまりLispのスクリプト言語は
Schemeが正統だとか？？？
0341デフォルトの名無しさん
NGNG諸君、私はTcl/Tkが好きだ
諸君、私はTcl/Tkが大好きだ
pgaccessが好きだ
インストーラが好きだ
Maximaが好きだ
CDR-Toasterが好きだ
Jaclが好きだ
データベースのメンテナンスで
グラフのプロットで
インストール作業で
GUIを必要とする作業で
この地上に存在するありとあらゆるTcl/Tkが大好きだ
0342デフォルトの名無しさん
NGNGしも技術的な面でantiしてたのではなくて、SUN
Microがousterさんを雇ってTclをコントロールしようと
したようにRMSにはみえたのが、気に食わなかったんじゃ
なかったですか。（これは単なる想像で、当時
ぼくにはそう思えたというだけです。）
ttp://www.vanderburg.org/Tcl/war/
0343デフォルトの名無しさん
NGNG0344デフォルトの名無しさん
NGNG0345デフォルトの名無しさん
NGNG0346デフォルトの名無しさん
NGNGとかも知らんのか…時代は変った。
0347デフォルトの名無しさん
NGNGスンマセン。「個人的な偏見ですが、」は「ストールマンはLisperです。」
じゃなく「Tclの関数言語的なところに、返って反発したんじゃ
ないだろうか？」に懸かっておるのです。
0348デフォルトの名無しさん
NGNG激しく同意。ところで皆さん、IDEはお使いではないので
しょうか？
例えば、VTCLとかSpecTclとか、お奨めはありますか？
もちろん無償のもので…（藁）
0349デフォルトの名無しさん
NGNG貴意納得。
参考URL深謝。
TCL対SCHEME的戦争乎。
日本語の不備を346さんに指摘され、なんか中国語みたいになりましたが…（藁）
コンピューター言語論争は大好きです。
それぞれの言語派の性格が出て、楽しい。
結構業界情報通のようなのでお伺いしますが、
ttp://homepage3.nifty.com/Aransk/
こんな言語論的な解説をしたHPをご存知ないでしょうか？
言語が人間に与える影響のようなものに興味をもって
おります。Tool for Human Thinking＝＞Tool Modifying
Human Conceptionみたいなイメージの。
0350デフォルトの名無しさん
NGNG覚えないといけなくってかったるい。なので未だにＩＤＥは
使っておりませぬ・・・
0351デフォルトの名無しさん
NGNGML スレへお帰り！
0352デフォルトの名無しさん
NGNG350に同意。エディタでいいんじゃない？
0353デフォルトの名無しさん
NGNG何か括弧が気持ち悪い。スキーム好きには括弧ないのが
気持ち悪いとは思うがね。
0354デフォルトの名無しさん
NGNG0355デフォルトの名無しさん
NGNGML は使った事があるんだろうか。
0356デフォルトの名無しさん
NGNG# ---- a.tcl ----------------------------------------
source b.tcl ;# グロ変数 b'data が定義される
set a'data AAA
proc main {} {
global a'data
global b'data
proc packit w {pack $w -expand yes -fill x}
packit [label .l0 -text "a'data: ${a'data}" -bg lightblue]
packit [label .l1 -text "b'data: ${b'data}" -bg lightgreen]
packit [label .l2 -text [join [info globals] \n] -bg pink1]
}
main
# ---- b.tcl ----------------------------------------
set b'data BBB
0357デフォルトの名無しさん
NGNG0358デフォルトの名無しさん
NGNGこの２ちゃんだけでも、プログラムー＞ML,TCL/TK、LISP
プログラマー＞COBOL 哲学ー＞言語論的転回 言語学でも…
最近あちこちで見かけるようになった。SARSか？WWW
不思議とJavaだけは近づかないが？
0359デフォルトの名無しさん
NGNGActiveTclのTkcon.tclで簡単にFontを設定するのは
どうしたら、良いのでしょうか？例えばMS P ゴシックに
したいとすれば？
0361デフォルトの名無しさん
NGNGset About {ex09ado.tcl - ADO (ActiveX Data Objects) handling
requires 'tcom' by Chin Huang <http://mini.net/tcl/1821>;
2003-11-22, this program has been published into the public domain.}
# tested on: WindowsXP/pro, MS Access 2000, ActiveTcl 8.4.4.0
package require tcom
# logging window
pack [scrollbar .sb -orient vertical -command ".t yview"] -fill y -side right
pack [text .t -yscrollcommand ".sb set"] -expand yes -fill both -side left
bind all <F1> {tk_messageBox -title about -message $About}
bind all <Escape> "destroy ."
proc log {{s ""}} {.t insert end "$s\n"; .t see end}
# format an adDate as "YYYY-MM-DD HH:MM:SS". maybe broken.
proc fmtdate adotv {
# adDate - days since from 1900-01-01 UTC.
# Tcl clock - seconds since from 1970-01-01 UTC.
set tcltv [expr ($adotv - 25569) * 86400]
scan $tcltv %dl tcltv
clock format $tcltv -format "%Y-%m-%d %H:%M:%S" -gmt true
}
# get an ADO Connection instance
set conn [::tcom::ref createobject ADODB.Connection]
0362デフォルトの名無しさん
NGNG# conn setup in 'DSN-less' style
$conn Provider "Microsoft.Jet.OLEDB.4.0"
$conn Open "C:/tmp/BUGS.mdb"
# exec an SQL, and yield a new recordset
set rs [$conn Execute "select * from Incident where status='Open'"]
# navigate the recordset
for {$rs MoveFirst} {![$rs EOF]} {$rs MoveNext} {
# enumerate a Fields Collection
tcom::foreach fld [$rs Fields] {
switch [$fld Type] {
7 {set value [fmtdate [$fld Value]]}
default {set value [$fld Value]}
}
log [format "%s: %s" [$fld Name] $value]
}
log
}
$rs Close
$conn Close
# おしまい
0363デフォルトの名無しさん
NGNG＞ Tkcon.tclで [...] 例えばMS P ゴシックに
(1) tkcon を起動する。
(2) Main interp に切り替える。
Ctrl+3
(3) 貴方の好きなフォントを指定。
.text configure -font {{MS PGothic} 12}
(4) 元のinterpに切り替える。
Ctrl+1
起動オプション tkcon.tcl -font "{{MS PGothic} 12}" も
指定可能ではあるが、なぜか意図どおりにはならない。
0364デフォルトの名無しさん
NGNG次のようなスクリプトを書けばよいようです。
# ---- %HOME%\tkcon.cfg -------------------
namespace eval ::tkcon {
set OPT(font) {{Lucida Console} 14}
set OPT(cols) 80
set OPT(rows) 32
set COLOR(bg) \#efffef
#set COLOR(blink) \#FFFF00
#set COLOR(cursor) \#000000
#set COLOR(disabled) \#4D4D4D
#set COLOR(proc) \#008800
#set COLOR(var) \#FFC0D0
#set COLOR(prompt) \#8F4433
#set COLOR(stdin) \#000000
#set COLOR(stdout) \#0000FF
#set COLOR(stderr) \#FF0000
} ;# namespace eval ::tkcon
0365デフォルトの名無しさん
NGNGproc pkgname {filename} { ;### retrieve pkg name & ver
set name ""; set ver ""
set fp [open $filename r]
while {![eof $fp]} {
set line [gets $fp]
regexp -- {(?i)package\s+(?:ifneeded)?\s+([:_0-9a-z]+)\s+([.0-9]+)?} $line mat name ver
if {$name != ""} {
break}}
close $fp
return [list $name $ver [file dirname $filename]]}
set pkglist {} ;### a list of {pkgname pkgver pkgdir}
foreach dir [lsort -uniq $auto_path] { ;### process directories in $auto_path
if {[catch {set paths [glob [file join $dir * pkgIndex.tcl]]}]} {
continue}
foreach path $paths {
set pkg [pkgname $path]
if {[lindex $pkg 0] != ""} {
lappend pkglist $pkg}}}
set FORMAT "%-20s %-10s %s" ;### display result
puts [format $FORMAT Name Version Directory]
puts ""
foreach pkg [lsort -dictionary -index 0 [lsort -uniq -index 2 $pkglist]] {
puts [format $FORMAT [lindex $pkg 0] [lindex $pkg 1] [lindex $pkg 2]]}
0366デフォルトの名無しさん
NGNGどうも有難う御座いました。
0367本田
NGNGｂｉｔ誌１９９５年５月号に、ＲＭＳが詳しく説明しています。
しかし、この説明も、ｔｃｌ８．０以降は、大幅に拡張されたので、
現在では、無意味な説明になっているのかも。
0368デフォルトの名無しさん
NGNGwindowsのサービスとして起動してほしいのですが、
方法をおしえていただけないでしょうか。
よろしくおねがいします。
0369デフォルトの名無しさん
NGNG0370デフォルトの名無しさん
NGNG0371デフォルトの名無しさん
NGNGやったことはないけどtclsvcっていうのを使えばいいらしいよ
http://wiki.tcl.tk/1795
http://wiki.tcl.tk/4757
0372デフォルトの名無しさん
NGNGこれか・・・
0373デフォルトの名無しさん
NGNG0374デフォルトの名無しさん
NGNG0375368
NGNG>372
うまくいきました。
ありがとうございました。
0376デフォルトの名無しさん
NGNG0377368
NGNG0378デフォルトの名無しさん
NGNGやってみたいのですが バカでもできますか？
0379デフォルトの名無しさん
NGNGそれはそうと8.4では標準Tkにpanedwindowが入ってたのか。
気がつかなかった
0380デフォルトの名無しさん
NGNGttp://www.hotwired.co.jp/news/news/culture/story/20020614205.html
最近Tcl始めたらしくてね、早速彼女のHPでウイルス公開してた。
ttp://coderz.net/gigabyte/
0381デフォルトの名無しさん
NGNG0382デフォルトの名無しさん
NGNGには、どうすればいいでしょうか？
つまり、一度、$c bind myTag <Button-1> "myProc" みたいな感じで、
myTag の上でボタンをクリックしたら myProc が呼ばれるように登録していたけど、
この登録を、なかったことにする（myTag の上でボタンを押しても、何も起こらない
ようにする）には、どうすればいいか？ と、いう質問です。
今のところ、 -state でdisable にしたりしていますが、それだと全部のイベントが
拾えなくなるので・・・
0383デフォルトの名無しさん
NGNGbind tag sequence script
INTRODUCTION
If script is an empty string then the current binding for sequence is destroyed, leaving sequence unbound.
0384デフォルトの名無しさん
NGNGフォントがでかくなる・・・。どうやって直すのか教えて欲しい。
8.4.5win版のActiveTclなんだけど。
そのコード↓
text .tx
pack .tx -fill both -expand yes
0386デフォルトの名無しさん
NGNGコピーっつーか先頭のポインタを付け替えたい！
0387デフォルトの名無しさん
NGNG0388デフォルトの名無しさん
NGNGめんどくせえよ！
しかたないからキーと値をコピーする関数書いたよ！
とりあえずこれで我慢じゃ
0389デフォルトの名無しさん
NGNG値のリストは取れないのかよ！
0390デフォルトの名無しさん
NGNG0391デフォルトの名無しさん
NGNGそれはわかってる。
めんどくせよ！Perlで出来るのになんでできねえんだ！
という気持ちの吐露。
0392デフォルトの名無しさん
NGNG0393デフォルトの名無しさん
NGNG競合のPerlに丸投げなんて恥も外聞も無いって感じだな。
ダサすぎ。
0394デフォルトの名無しさん
NGNG0395デフォルトの名無しさん
NGNGarray set
では？
0396デフォルトの名無しさん
NGNGset cap(a) A
set cap(b) B
set cap(c) C
array set values [concat [lreplace [array get cap] 0 0] dummy]
puts [array names values]
0397デフォルトの名無しさん
NGNG1 ：番組の途中ですが名無しです ：03/12/26 20:22 ID:lrG9BAF+
２ちゃんねらーは全員頭が悪いです。全員バカです。知障です。
２ちゃんねるに入ると知障になるのかもしれませんが、まぁもともとそうなる才能があるやつらなのでしょう(笑)
てか、現実で活躍できる能力のある人なら２ちゃんねるなんか行かないんですよね(笑)
私は正常なあなたに２ちゃんねる等という犯罪組織に踏み込んで欲しくない。
危険を未然に防ぎたい。ただそれだけなのです。
そのうちハッキングで２ちゃんねるを潰します。
楽しみですね。
ソース
http://nichsine.hp.infoseek.co.jp/
0398デフォルトの名無しさん
NGNG0399デフォルトの名無しさん
NGNG0400デフォルトの名無しさん
NGNGforeach使うより面倒やん（笑）。
配列をコピーしたり関数に渡したりする話だと思ってた。「配列の値のリスト」なんて需要があるんやねぇ…。確かに、Tclじゃ直接それをするコマンドはないと思うけど、それが必要だと感じたことも無かった。ある意味目からうろこかも。
0401デフォルトの名無しさん
NGNG愛は盲目という感じですね。
0402デフォルトの名無しさん
NGNGTcl的にはこうだろ。
proc tuho {} {
set to [email protected]
set from [email protected]
set subject こいつを逮捕してください！
# sendmail here
after 1000 tuho
}
tuho
0403デフォルトの名無しさん
NGNG0404デフォルトの名無しさん
NGNG0405デフォルトの名無しさん
NGNGSQLiteのtclバインディングをVC++でコンパイルする方法を探ってくれ。
あれ激ムズだから暇つぶしにちょうどいいぞ。
0406デフォルトの名無しさん
NGNGすくなくともBCではぜんぜんOKだけど。
0407デフォルトの名無しさん
NGNGVC7でコンパイルして最大限の最適化とSSEとPentium4用に
最適化してﾆﾔﾆﾔ・・・・さて、ベンチマークとるかﾆﾔﾆﾔ
0408デフォルトの名無しさん
NGNGhttp://hegel.ittc.ukans.edu/topics/tcltk/tutorial-noplugin.html
-----
Example 7.3
set person_info(name) "Fred Smith"
set person_info(age) "25"
set person_info(occupation) "Plumber"
foreach thing [array names person_info] {
puts "$thing == $person_info($thing)"
}
-----
これは、こうぞうたい?もどきなのか??
foreach? Cシェルなのか??
ちょっと感動。すごいぞ Tcl/Tk。
このサイトには、
John Ousterhout著 Tcl and the Tk Toolkit
Brent Welch著 Practical Programming in Tcl and Tk
のドラフト版ポストスクリプトもあった。
賞味期限切れらしいけど、とりあえずごちそうさま。
0409デフォルトの名無しさん
NGNG構造体もどきではありません。ハッシュです。
それからforeachなんていまどき珍しくありません。
tclのforeachでおもしろいのは、
foreach {key value} [array get person_info] {
puts "$key==$value"
}
みたいにリストを繰り返し変数に使えるところです。
感動するところを間違えてます。
0410デフォルトの名無しさん
NGNG次回は正確な場所で感動できるように精進します。
Cシェルだとこう↓なるようです。
#!/bin/csh
set bar = (aaa bbb ccc)
foreach I (1 2 3)
echo $bar[$I]
end
0411デフォルトの名無しさん
NGNG0412デフォルトの名無しさん
NGNG全部大文字で書く香具師はﾄﾞｷｭｿ
0413デフォルトの名無しさん
NGNG0415デフォルトの名無しさん
NGNG注3: システムによってはTCL/TKの起動コマンドがwishになっていない場合があります.
例えば, wish8.0jpなどです. この場合は, 以下のいづれかの対処が必要です.
(A)システム管理者にお願いしてwishというコマンド名でも起動できるようにシン
ボリックリンクを張ってもらう.
(B)個人のディレクトリ内からwishという名前で実体(wish8.0jpなど)にシンボリッ
クリンクを張り, さらに, そのディレクトリにパスを通す.
(C)drawgraph.tclの第3行目の「exec wish "$0" "$@"」の中のwishを実体の名前に
書き換える.
0416デフォルトの名無しさん
NGNGwishと打ってwishが起動すれば無問題
0417デフォルトの名無しさん
NGNG0418デフォルトの名無しさん
NGNG何をいまさら・・・
0419デフォルトの名無しさん
NGNG0420デフォルトの名無しさん
NGNGこのスレでいい？
0421デフォルトの名無しさん
NGNG0422デフォルトの名無しさん
NGNGtclの有名なプログラマだった。
0423デフォルトの名無しさん
NGNGrc > sh > tcl >> csh
0424age
NGNG0425デフォルトの名無しさん
NGNG0426デフォルトの名無しさん
NGNG違いってなんですか？あんまり気にしないでいいんですかね？
0427デフォルトの名無しさん
NGNG>>235 を参照（２冊のリンクが逆になってるけど）。
0428デフォルトの名無しさん
NGNGPerl/TkってPerlでTk書けるの？
0429デフォルトの名無しさん
NGNGhttp://www.geocities.co.jp/SiliconValley-Oakland/1680/perl_tk/index.html
0430デフォルトの名無しさん
NGNGhttp://www.oreilly.co.jp/BOOK/lperltk/
入門 Perl/Tk 秀和システム
http://www.cbook24.com/bm_detail.asp?sku=99916253
買ったけど、ちっとも使ってません。
Windows版は不安定だったような…。
0431デフォルトの名無しさん
NGNGでも生成されたcソースみたらキモかった。
0432デフォルトの名無しさん
NGNG0433デフォルトの名無しさん
NGNG0434デフォルトの名無しさん
NGNG便利に使ってますが。
0435デフォルトの名無しさん
NGNG0436デフォルトの名無しさん
NGNGん？日本語使えないんだっけ？
0437デフォルトの名無しさん
NGNG0438デフォルトの名無しさん
NGNG0439デフォルトの名無しさん
NGNGhttp://www.interq.or.jp/japan/s-imai/tcltk/tclkit.html
↑ここ読んだら日本語使えるって書いてあるよ。エンコードを
入れればいいんじゃないの？
0440デフォルトの名無しさん
NGNG１個１個パックするの大変でしょ。
0441デフォルトの名無しさん
NGNGstarpackでのアイコン変更の詳細、どなたか知りませんか？
439のサイトでも少し触れられているんですが、もうひとつ
よくわからなくて...。よろしくお願いします。
0442デフォルトの名無しさん
NGNG0443デフォルトの名無しさん
NGNG0444デフォルトの名無しさん
NGNG訳したぞ。
0445デフォルトの名無しさん
NGNGでも入門書が予想外に高価だったので、なんとか元はとりたいです。
0446デフォルトの名無しさん
NGNG低脳丸出し
0447デフォルトの名無しさん
NGNGbutton .hw -text {Hey, Push me. Yellow monkey!} -command {
tk_messageBox -message {Hello, World!}
}
pack.b
0448デフォルトの名無しさん
NGNGコピペ？
0449デフォルトの名無しさん
NGNGHSPよりマシとか言ってる時点で低脳確定
プログラミングで飯食ってるほぼ全てのプログラマがHSPを支持している中で
"HSPよりマシ"という発言は非常に滑稽だ
他言語でも稀にHSPよりも期待通りのパフォーマンスを発揮してくれる場合があるらしいが
通常のWinアプリ開発ならHSP
アマチュアプログラマの間では
今現在VCもDelphiもHSPのライブラリ開発以外にはほとんど利用されていない
多くのプログラマがCやC++を勉強してきたのもHSPで必要だからだ
そのHSPより"マシ"ということは現在幅広く使われているCやC++よりも"マシ"ということになる
（一流プログラマがHSPを使わずにVCを利用するのはHSPがフリーだから
フリーの開発環境の場合サポートが保障されていないため
万が一開発環境にバグがあった場合企業側の責任になるから）
どの言語を使おうと勝手だが
一般的に幅広く使われている言語を否定する態度が気に入らない
0450デフォルトの名無しさん
NGNGありえない。絶対ありえない。
多分HSPなんて一流プログラマの眼中にない。
C++の方が絶対いい。
ていうかDelphiがいい。
0451デフォルトの名無しさん
NGNG0452デフォルトの名無しさん
NGNG0453デフォルトの名無しさん
NGNGTkなら使える
0454デフォルトの名無しさん
NGNGﾜﾛﾀ
0455デフォルトの名無しさん
NGNGとな上げよう。
0456デフォルトの名無しさん
NGNG$mw = MainWindow->new();
$mw->configure( -bg => "#000000" );
とやってもウィンドウの色が変わらないのですが、
そもそもウィンドウの色って変えられないのですか？
ボタンとかの色は変わるんですけど。
0457デフォルトの名無しさん
NGNGで変えられる。Perl/Tkは知らん。
0458デフォルトの名無しさん
NGNGそれで変わるじゃん
0459456
NGNG先程アップグレードしたらちゃんと変わりました。
0460デフォルトの名無しさん
NGNG「sample.dllにSample_Initがないぞ！」みたいなエラーが出てきて困ってます。
dllのloadの仕方を知っている方がいましたら、教えてください。
ちなみにこのsample.dllには、簡単な関数int test()のみしか記述していません。
また、Sample_Initが無いようなエラーが出ているので、このsample.dllに
Sample_Init関数を追加しても動きませんでした。。。
追加・・・
package requireでもdllを読み込めたりできるんでしょうか？
また、windowsのlibファイルもloadなどで読み込めたりするんでしょうか？
0461デフォルトの名無しさん
NGNGloadすると最初にHoge_Ｉnitが最初に呼ばれて、そこで自作の
コマンドをロードする処理を書く。この辺の決まりごとを無視したら
動かなくてあたりまえだよ・・・。あとHoge_InitはExportしないといかんよ。
package requireでもdllは使えるよ。これはパスを通す仕組みで
結局はloadしてるんだからね。libは無理。
0462デフォルトの名無しさん
NGNG0463デフォルトの名無しさん
NGNGSWIGを使えばそのint test()のラッパーを自動で作ってくれるよ。
0464460です
NGNGありがとうございます
>>461
>>・・・あとHoge_InitはExportしないといかんよ。
これをやっていなかったので、早速やってみたいと思います。
>>463
>>SWIGを使えばそのint test()のラッパーを自動で作ってくれるよ。
これは知らなかったです・・・
勉強不足でした。。。swigの方も勉強します
返信遅れましたが、アドバイスありがとうございました
0465デフォルトの名無しさん
NGNG0466デフォルトの名無しさん
NGNGtclは基本的にＣ言語のように基本的なフレームワーク
を提供し、凝った機能は拡張で導入するという思想なので、
ooがやりたければコア開発チームに近い位置にある
incr tclかtcllibのstooopを使うのがスタンダードということに
なってる。
リストとnamespaceを使えばooできるんだけど、Javaや
C++みたいな流儀でやろうと思ったら上の拡張を使う。
0467デフォルトの名無しさん
NGNG0468デフォルトの名無しさん
NGNG0469デフォルトの名無しさん
NGNG俺incr tclしか使ったこと無いんだけど、そのふたつは
どう違うの？
0470デフォルトの名無しさん
NGNG0471デフォルトの名無しさん
NGNGstooopはキーワードとかがC++に似せて作ってあるのでC++経験者にはわかりやいかも
ただしメンバ変数を指し示すときの独特の書き方がいまいち。
Snitは継承を使わないで委譲をベースにしたオブジェクト指向なところが一番の特徴。
0472460です その１
NGNG以前、DLLを読み込む方法を教えていただいたのですが
まだ読み込むことができなかったので、わかる方がいらしたら
具体的に指摘していただけますでしょうか。
DLLをTCLで呼ぶ方法を調べていろんなHPのサンプルを
見たりして、自分なりに色々いじって
以下のようなソースでDLLを作製（一部カットしてます）
しました。DLLのファイル名はhoge.dllです。
/*hoge.dllのソース抜粋！！*/
/* start. */
#include "tcl.h"
static int hogeObjCmd(ClientData clientData, Tcl_Interp* interp,
int objc, Tcl_Obj* CONST objv[]){
～～～～～～～～～
～～～抜粋～～～～
～～～～～～～～～
return TCL_OK;
}
DLLEXPORT int Hoge_Init(Tcl_Interp* interp){
Tcl_CreateObjCommand(interp, "hoge", hogeObjCmd, NULL, NULL);
return Tcl_PkgProvide(interp, "hoge", "1.00");
}
/* end. */
0473460です その２
NGNGここでできたhoge.dllを以下のTｃｌのソースで
読み込ませようとしたのですが、「Hoge_Initが無い」
という旨のエラーがやはり出てしまいます。
このTclのファイルとhoge.dllファイルは
同じディレクトリに置いてあります。
このhoge.dllを読む方法がわかる方がいらっしゃいましたら
教えていただけますでしょうか
よろしくお願いします
#Tclのソース抜粋！！
～～～～～～～抜粋～～～～～～～～～
# --- maximum size of matrix window
set mw_maxheight 400
set mw_maxwidth 600
set mw_textheight 12
if { [ info commands SetDBPath ] == "" } {
load ./hoge.dll #←この部分で呼んでます
}
package require snack
set use_snack 1
～～～～～～～抜粋～～～～～～～～～～
0474デフォルトの名無しさん
NGNGBCなら関数名のあたまに_つけるのが悪さしてるかもよ
0475デフォルトの名無しさん
NGNGコンパイラとリンカのオプションも書いて。
0476デフォルトの名無しさん
NGNG__declspec(dllexport)って書かないとダメだよ。
0477462です
NGNG環境はVC6で、リンクのオプションでｶﾃｺﾞﾘ－一般の
ｵﾌﾞｼﾞｪｸﾄ/ﾗｲﾌﾞﾗﾘﾓｼﾞｭｰﾙに「tcl84.lib」を追加したのみで
あとはデフォルトのままです。
これで何かわかることがありましたら、ご教授お願いします。
0478デフォルトの名無しさん
NGNGhttp://www.geocities.co.jp/SiliconValley/4137/dir4/namo.html
0479デフォルトの名無しさん
NGNGコピペしてvc6のコンパイラでコンパイルしてみたけど
ロードもできたし。環境かコンパイルリンクのしかたに
問題があるんじゃないかな。
cl /IC:\Tcl\include hoge.c /LD C:\Tcl\lib\tcl84.lib
みたいにして直接やってみたらどう？
0480462です
NGNGレスありがとうございます。
こちらで色々といじくった結果、動かすことができました。
何をどうしたら動いたかと言うと、ソースファイルの拡張子を
cppファイルからcファイルに変更し、再度DLLを作製して
それをTclで読み込んだ結果、動作することができました。。。
ここで、もう一つ質問させていただきたいのですが、
cppファイル（C++）で作製したDLLは、Tclで読ませることは
できないのでしょうか？
ネットや参考書を調べると「C言語」でDLLLを作製するようなことが
多々書かれているのが見うけられたもので・・・
また、C++でDLLを作製したい場合には、何か解決する方法は
あるのでしょうか？
何かわかることがありましたら、ご教授お願いします。
0481デフォルトの名無しさん
NGNGextern "C"
0483デフォルトの名無しさん
NGNG0484デフォルトの名無しさん
NGNG0485名無し＠沢村
NGNGTcl/Tkでつくったスクリプトを実行ファイルに変換するツールだな。
が、わし英文読めんけん、このページのどっからＤＬしていいかわからんのよ。
このページの何行目の何という文字をｸﾘｯｸするとＤＬできるか、教えて～♪
http://www.interq.or.jp/japan/s-imai/tcltk/tclkit.html
0486デフォルトの名無しさん
NGNGhttp://www.equi4.com/pub/tk/8.4.4/tclkit-win32.upx.exe
http://www.equi4.com/pub/tk/8.4.6/
0487デフォルトの名無しさん
NGNG0488デフォルトの名無しさん
NGNGDownloading SDX http://www.equi4.com/206
0489デフォルトの名無しさん
NGNGhttp://www.equi4.com/pub/tk/8.4.6/tclkit-win32.upx.exe
Starkit
http://www.equi4.com/pub/tk/8.4.6/tclkit-win32-sh.upx.exe
rename the downloaded file to "tclkitsh.exe"
Try it out:
launch, i.e. double-click on the "tclkitsh.exe" runtime
this time, a command prompt appears - just type "exit" to close it
http://www.equi4.com/pub/sk/sdx.kit
http://www.equi4.com/pub/sk/sdx.bat
test, by typing "sdx" from the command prompt
you should see a few lines of information returned by SDX
0490名無し＠沢村
NGNG両方ＤＬした。
何かTclkitはＧＵＩぽくて、Starkitはｺﾝｿｰﾙぽいことだけがわかった。
何かTclkitをｸﾘｯｸしたら起動ｴﾗｰが出て、Starkitをｸﾘｯｸしたらｺﾝｿｰﾙぽい画面だ出た…。
で、どう使うの？
0491デフォルトの名無しさん
NGNG0492名無し＠沢村
NGNGボケ！！TclkitとStarkitは実行ファイルつくるやつじゃねーぞ！
実行ファイルつくるのはStarpackだ。StarpackはどっからＤＬするの？
つーか、このページからＤＬできることはわかってるが、このページのどっからＤＬするかわからんから、教えて♪
http://www.interq.or.jp/japan/s-imai/tcltk/tclkit.html
0493名無し＠沢村
NGNGつーか、このページの
http://www.interq.or.jp/japan/s-imai/tcltk/tclkit.html
Starpackつー文字をｸﾘｯｸして、出てくる、
http://mini.net/tcl/3663
からＤＬすることまでは突き止めたが、このページのどっからＤＬできるかが、どうもわからんのよ。教えて♪
0494デフォルトの名無しさん
NGNG日本語すら読めないようだなｗ
0495ぼるじょあ ◆yBEncckFOU
NGNGhttp://www.interq.or.jp/japan/s-imai/tcltk/tclkit.html
0496デフォルトの名無しさん
NGNG0497デフォルトの名無しさん
NGNG0498名無し＠沢村
NGNGええ、どうしてもできん！！
そもそもTclkitとStarkitは、それぞれ入手方法とつくりかたが書いてあるのに、
Starpackはつくりかたしか書いてない…
この辺りがどうしてもStarpackが入手できないネックになってるんだが…
誰か教えてくれんかのう…^^;
http://www.interq.or.jp/japan/s-imai/tcltk/tclkit.html
0499デフォルトの名無しさん
NGNGtclkit-win32.upx.exe
tclkit-win32-sh.upx.exe → tclkitsh.exe に名前を変更する。
sdx.kit
sdx.bat
hello.tclスクリプトを用意する。
hello.kitを作る。
>sdx.bat qwrap hello.tcl
hello.kitが作成される。これが「Starkit」
hello.kitを逆ラッピングする。
>sdx.bat unwrap hello.kit
hello.vfsフォルダが作成される。
hello.exeを作る。
>sdx.bat wrap hello.exe -runtime tclkit-win32.upx.exe
hello.exeが作成される。これが「Starpack」
0500名無し＠沢村
NGNGだ～から、「Starpack」の作り方はすでにわかってるのよ！
わからないのは入手方法。どっからＤＬできるか教えて
0501デフォルトの名無しさん
NGNG>>489
0502デフォルトの名無しさん
NGNGhttp://www.mms-forum.de/ased/asedhome.htm
0503デフォルトの名無しさん
NGNGなかなかおもろい物を見つけてきたな。使わないけど・・・
0504名無し＠沢村
NGNGいろいろ検索した結果Starpack使わなくても実行ﾌｧｲﾙつくる方法見つけたぜ！！
それはVisual C++でＣ言語のソースつくって、そのソースでtclをインクルードして、
ｺﾏﾝﾄﾞﾌﾟﾛﾝﾌﾟﾄから、
cl -o sampletk.exe -I"C:\Program Files\Tcl\include" \
sampletk.c "C:\Program Files\Tcl\lib\tcl84.lib" \
"C:\Program Files\Tcl\lib\tk84.lib"
と打ち込めば、つくれるってよ。
でもｻﾝﾌﾟﾙｺﾋﾟﾍﾟしてこの通りやってみたんだが、
ソースﾌｧｲﾙのﾀｲﾌﾟ'\'は認識できませんでした。
とか、
入力ﾌｧｲﾙ"\.obj"を開けません。
とかいうｴﾗｰが出るのよ。
で、sampletk.objまではどうやらつくれてるみたいなんだが、sampletk.exeがつくれとらんのよ。
おみゃーらよ、どこが悪いのかな？
また、いちいちｺﾏﾝﾄﾞﾌﾟﾛﾝﾌﾟﾄを開かなくても、Visual C++でそのままﾊﾟｽ設定してﾋﾞﾙﾄﾞする方法ないの？
おみゃーらよ、２つの疑問について教えちくれ～♪みなみなさま方～♪
0505デフォルトの名無しさん
NGNGttp://www.geocities.co.jp/SiliconValley/4137/dir4/tapi23.html
ttp://www.geocities.co.jp/SiliconValley/4137/tcltk.html
ホントにサンプル「そのまま」入力したんかい。沢村はおもろいな。
ついでに教えといてやるが、その方法で作った実行ファイルは
Tcl/Tkがインストールされてない環境では動かないぞ。
0506名無し＠沢村
NGNGなんだ、Tcl/Tkがインストールされてない環境では動かないの？
なら、やっぱりStarpackがないとダメなんか…
StarpackのＤＬ方法わからんけどな…
でも、>>499を深読みすると、必要なﾌｧｲﾙは、
tclkit-win32.upx.exe
tclkit-win32-sh.upx.exe → tclkitsh.exe に名前を変更する。
sdx.kit
sdx.bat
だけで、「Starkit」と「Starpack」はこれらのﾌｧｲﾙを使ってつくる成果物で、
それ自体ＤＬするものではないというふうにも読めるけど、そうなの？
それともやっぱり「Starpack」はどっかからＤＬしてこないとダメなのかな？
また、
http://www.equi4.com/pub/sk/sdx.kit
と、
http://www.equi4.com/pub/sk/sdx.bat
だが、
sdx.batのほうはｸﾘｯｸするとＭＳＤＯＳのﾊﾞｯﾁﾌｧｲﾙがＤＬできたけど、
sdx.kitのほうはｸﾘｯｸすると、何やらﾌﾟﾛｸﾞﾗﾑっぽいものが書いてある文字化けしたﾍﾟｰｼﾞが開いただけだけど、
これはそのままsdx.kit.htmlをＤＬして使うものなの？
html拡張子のままフォルダに入れて使って大丈夫？文字化けしたままでも大丈夫？
0507デフォルトの名無しさん
NGNG0508名無し＠沢村
NGNGtclkit-win32.upx.exe
tclkit-win32-sh.upx.exe → tclkitsh.exe に名前を変更する。
sdx.kit
sdx.bat
をひとつのﾌｫﾙﾀﾞに入れ、hello.kitをつくったよ。
ちなみにhello.kitをｸﾘｯｸしてみたら、ちゃんと動いたよ。やたね～♪
でもその次の、
>sdx.bat qwrap hello.tclというｺﾏﾝﾄﾞを打ち込んで、hello.kitを作る段階でくじけたよ。
おみゃーらよ、hello.kitは作成されなかったのよ。
ｴﾗｰらしきものは出た。
ｴﾗｰﾒｯｾｰｼﾞは次のようなものだ。
couldn't read file "sdk.kit/main.tcl":no such file oe directory
while executing
おみゃーらよ、おれはどこが間違っていたのかな？教えてはくださらんか～みなみな様方～♪
0509デフォルトの名無しさん
NGNG0510デフォルトの名無しさん
NGNG0511デフォルトの名無しさん
NGNGsdx.kitが壊れているかもしれない
もう一度ダウンロードして、やり直して
0512名無し＠沢村
NGNGサンキュー
だが、sdx.kitのダウンロードはちと難解だ。
http://www.equi4.com/pub/sk/sdx.kit
をｸﾘｯｸしても文字化けしたﾍﾟｰｼﾞが出てくるだけだし、
ためしにすべて選択、ｺﾋﾟｰして、テキストエディタに張り付けsdx.kitという名前をつけたものをﾌｫﾙﾀﾞに入れたんだが、
それでsdx.kitが壊れているのかな？
どうやったらこわれないようにダウンロードできますか？
0513名無し＠沢村
NGNGだが、http://www.equi4.com/pub/sk/sdx.kit
をｸﾘｯｸしてもダウンロードのダイアログボックスは出てこんで、文字化けしたﾍﾟｰｼﾞが出てきただけだったのよ。
ためしにすべて選択、ｺﾋﾟｰして、テキストエディタに張り付けsdx.kitという名前をつけたものを保存してﾌｫﾙﾀﾞに入れたんだが、
その方法でダウンロードしたsdx.kitは、どうも壊れていたらしいのよ。
どうやったらこわれないようにダウンロードできますか？
0514名無し＠沢村
NGNGhttp://www.equi4.com/pub/sk/sdx.kit
をｸﾘｯｸしてもダウンロードのダイアログボックスは出てこんで、文字化けしたﾍﾟｰｼﾞが出てくるの？
ええい！！何でsdx.kitはひねくれているの？
おかげでこれがネックになって、なかなか実行ファイルがつくれないでいる！！
ちんぽがムズムズする！
0515デフォルトの名無しさん
NGNGこの僕です。みなさん迷惑かけてすいません。
>>514
右クリックして対象をファイルに保存。
0516名無し＠沢村
NGNGすみません。右ｸﾘｯｸしても「対象をファイルに保存」というﾒﾆｭｰ項目は出てこないのですが…^^;
出てくるﾒﾆｭｰ項目は、上から順に、
前に戻る(B)
次に進む(O)
セパレーター
名前をつけて背景を保存(S)
壁紙に設定(W)
背景のコピー(C)
デスクトップ項目として設定(D)
セパレーター
すべて選択(A)
張り付け(P)
セパレーター
ショートカットの作成(T)
お気に入りに追加(F)
ソースの表示(V)
セパレーター
エンコード(E)
セパレーター
印刷(I)
最新の情報に更新(R)
セパレーター
プロパティ(P)
と「対象をファイルに保存」というのは出てこないんですが…
どうなってるんでしょうか？よろしくお願いします…^^;
0517デフォルトの名無しさん
NGNGパソコン初心者板総合質問スレッドvol.733
http://pc6.2ch.net/test/read.cgi/pcqa/1086433107/
0518名無し＠沢村
NGNGもしやと思ってインターネットテンポラリファイルを調べてみたら、tcl[1].kitってのが見つかったので、
tcl.kitに名前を変えて、ﾌｫﾙﾀﾞに入れてやってみたら、今度はうまくhello.exeができたぜ！！
ちゃんと動いたぜ！！おれって天才かもね♪
が、おみゃーらよ、これでやっと単独で動く実行ファイルができたと思ってよろこんだのだが、
hello.exeをﾌｫﾙﾀﾞの外に出してｸﾘｯｸしてみたら、今度は起動ｴﾗｰが出たが…
ﾌｫﾙﾀﾞの中ではちゃんと動くのに、ﾌｫﾙﾀﾞの外に出すと起動ｴﾗｰが出る…
これって、も、もしかして、この方法で作成した実行ファイルを動かすには、tclkit-win32.upx.exeが必要ってこと？
もしかしてStarpackでは単独で動く実行ファイルはつくれないってこと？
教えてくださらんか～みなみなさま方～♪
もし、単独で動く実行ファイルがつくれないんなら、おれtcl/tkはもうやめるけど…
どうなんですか～みなみなさま方～自分じ教えちくだされ～♪
0519デフォルトの名無しさん
NGNGStarpackのパス上に日本語フォルダ(non-ASCII文字のフォルダ)があると起動エラーになる。
→ Starpackを日本語を含むパス上に置いてはいけない。
http://www.interq.or.jp/japan/s-imai/tcltk/tclkit2.html
0520名無し＠沢村
NGNGありがて～え！！
自分じ教えちくれてありがとうぞざいました～♪
そうだったのか…日本語フォルダ(non-ASCII文字のフォルダ)があると起動エラーになるのね…
じゃあStarpackでつくったフリーソフトを配布するときは、日本語フォルダがあるパス上にこのソフトを置かないでください、と書けば大丈夫なのね…
なんかそれってtcl/tkでつくったことがすぐバレてしまうけど…
まあ、それくらいは我慢すっかなあ…
よっしゃあ、これでtcl/tkについては完璧にわかったことだし、さっそくちょっとフリーソフトでもつくってみまっさあ！！
0521名無し＠沢村
NGNGちゃんとVisual C++でつくったふりしたかったんだが、そういう制限事項があるんじゃ、
Visual C++でつくったふりはできないなあ…
まあ、tcl/tkでつくったことがバレてもいいかあ…
そんくらいは我慢すっかあ…
よっしゃあ、これでtcl/tkについては完璧にわかったことだし、さっそくちょっとフリーソフトでもつくってみまっさあ！！
0522デフォルトの名無しさん
NGNGfreewrapで日本語パス上に置けるように改造したのを
誰かが配ってたような。
でもTclスクリプトで配布したほうがいいよ。
MacOS9/MacOSX/Win/POSIXで動くし。OS9はちょっと
怪しいけど・・・。
0523デフォルトの名無しさん
NGNGtcl/tkでプログラム書くと恥ずかしいとか、かっこ悪いからVC++で書いたフリするとか、あんた他人の作ったプログラムを何だと思ってるわけ？
馬鹿はプログラム書くな。
0524名無し＠沢村
NGNGメニューやコントロールに日本語の名前をつけるとtclスクリプトのときはちゃんと表示されるんだが、
Starpackで実行ファイルをつくると文字化けするんだけど、どうしたら日本語表示されますか？
あと、Starpackでつくった実行ファイルのアイコンはtclkit-win32.upx.exeのアイコンと同じになるんだけど、
どうやったら自作のアイコンと入れ替えできまつか？
まあ、後者のほうは直接実行ファイル内のアイコンリソースを書き換えるという方法がなくはないけど、
これだと面倒臭すぎるし…
皆々様がた～♪自分じ教えてくださらんか～♪
0525デフォルトの名無しさん
NGNG日本語を使う場合、日本語のencodingも一緒にラッピングする必要があります。
hello.vfs/lib/にtcl8.4/encodingフォルダを掘って、そこにTclのencodingファイル
を入れます。Windowsならcp932.encとshiftjis.encを入れておけば良いでしょう。
http://www.interq.or.jp/japan/s-imai/tcltk/tclkit2.html
StarpackのアイコンはデフォルトでTkの赤いアイコンになっていますが、
.icoファイルを一緒にラップすることで置換することが出来ます。
以下の解像度のアイコンをすべて用意する必要があります。
0526名無し＠沢村
NGNGうわっ、ありがてえ～♪
そのとおりやってみたところ、自分じちゃんとできました～♪
アイコンは手をぬいて、32×32/16だけしか入れませんでしたが、実行ファイルのアイコンはちゃんとかわりました。
他のサイズのアイコンもいれればwindowsのタイトルバーのアイコンもかわることは想像に難くないです。
自分じ教えちくれてありがとうございました～♪
もうtcl/tkは120%わかったっス♪
0527デフォルトの名無しさん
NGNGその canvasを bmp ファイル等で出力するようなことは
可能でしょうか？そんなことやってるサンプル等
ありませんでしょうか？
0528デフォルトの名無しさん
NGNG0529デフォルトの名無しさん
NGNG今はfreewrapの日本語パスの通る改造版でラップしています。
こちらははGUIが使えて簡単なのですが、
オリジナルアイコンがどうも反映されなくてexe実行ファイル自体には
反映されるがそのほかの部分は反映されない。バグ？
またオリジナルのfreewrapは使い方がわからないです。
ドロップ＆ドラッグで出来るみたいだけど、複数のtclファイルからなる
場合はどうするんでしょう？
0530デフォルトの名無しさん
NGNG複数のtclファイルもまとめて引数で渡す。DnDの
場合はよくわからん。。。
0531デフォルトの名無しさん
NGNGそんなもんなの？windowsでshift_jisで書いてるんですがね。。。
0532デフォルトの名無しさん
NGNGGCCだってShift-JISはそのままじゃまともに通らないし。
0533デフォルトの名無しさん
NGNG構文の変さ加減はどうでもいいねん。しかし$に引く。
0534デフォルトの名無しさん
NGNG0535デフォルトの名無しさん
NGNGTclの文法を変だという。Windowsユーザーに多い。
0536デフォルトの名無しさん
NGNG0537デフォルトの名無しさん
NGNGshとcshとtclとperlのスクリプトを同時にメンテしてると気が狂いそうに
なるんですけど。
0538デフォルトの名無しさん
NGNG0539デフォルトの名無しさん
NGNGこれは8.4でも出来るのかな
些細なことだけど
0540デフォルトの名無しさん
NGNG0541デフォルトの名無しさん
NGNGこれかのう…
ActiveTcl 8.5.0 Beta 2
http://www.activestate.com/Products/Download/Download.plex?id=ActiveTcl
0542539
NGNG0543デフォルトの名無しさん
NGNGで、枠線ってなに？
0544デフォルトの名無しさん
NGNG0545デフォルトの名無しさん
NGNG学生の時につかったきりだから懐かしいよ。
0546デフォルトの名無しさん
NGNG使ってるけどPythonが最近ブレークしかけなのに対して
全然マイナーなままなのでちょっと悲しい。
0547デフォルトの名無しさん
NGNG今の職場とその前の職場（通信機器開発）品質管理の人たちがテストスクリプトをＥｘｐｅｃｔで書いてます。
0548デフォルトの名無しさん
NGNGああ、Expectは便利だよね。
ってか、あれを使ってない人は何を使っているんだろ？
あんな便利なもの
0549デフォルトの名無しさん
NGNG0550デフォルトの名無しさん
NGNGでも知名度が低いのはかなしーねー
普通にputtyとか使ってる人がおおいのかなー
うぇーん
0551ほんたま
NGNGおりはよ、「Slim de Can」を使ってやっとﾒｲﾝｳｨﾝﾄﾞｳにｺﾝﾄﾛｰﾙをつけるｻﾝﾌﾟﾙの作成に成功したぜ。わはは♪
「Slim de Can」ってすげ～な～、ｲﾍﾞﾝﾄﾄﾞﾘﾌﾞﾝﾌﾟﾛｸﾞﾗﾑが作成できるとこまでついに進化したよ。
おりはもう神だね♪どうよ？
http://hp.vector.co.jp/authors/VA015412/
0552ほんたま
NGNGおりはよ、「Slim de Can」を使ってあるﾎﾞﾀﾝをｸﾘｯｸしたらある処理を行わせ、別のﾎﾞﾀﾝをｸﾘｯしたら別の処理をおこなわせるﾌﾟﾛｸﾞﾗﾑの作成についに成功したよ。
つまり「Slim de Can」はすでにｲﾌﾞﾝﾄﾄﾞﾘﾌﾞﾝﾌﾟﾛｸﾞﾗﾑがつくれる環境になっているということを自ら証明したという次第よ。
おい、「Slim de Can」はすでに簡単なゲームくらいはころっとつくれるぞ。誰かつくらんか？
「Slim de Can」ってすげ～な～。
おりはもう神だね♪どうよ？
http://hp.vector.co.jp/authors/VA015412/
0553デフォルトの名無しさん
NGNGプログラム終了
0554ruby/tkの初心者
NGNGtkで画像を表示できるのは >255のbitmapとgifだけですか？
それ以外(jpg,png)を表示したいのですが。
0555デフォルトの名無しさん
NGNGJan Nijtmansさんの Img というパッケージがあります。
http://wiki.tcl.tk/1404
Ruby/Tkというのが拡張パッケージを扱えるのかはまったくしらんけど、
tclのコードをevalすれば使えるのかもしれない。
0556デフォルトの名無しさん
NGNGImageMagickそのまま使えるぜ！
http://tclmagick.sourceforge.net/
0557デフォルトの名無しさん
NGNG05588.4.7きてマスタ
NGNG* Fixed unicode-char path installation on Windows NT-based platforms
* Properly subsitute more values in Windows tclConfig.sh
* Improved stack overflow prevention on Windows
* Fixed mem leak in [fconfigure $serial -xchar]
* Fixed crash with [cd] with a volumerelative $HOME
* Fixed clock %G %V formats for ISO8601 week numbers
* Fixed support for non-WIDE_INT aware math functions
* Added [http::config -urlencoding] option
* Fixed utf-8 encoding of \u0000 on system I/O
* Prevented dde hangs with non-responsive apps
* Added round() wide integer support
* Cleaner exit and correction of mem leaks when using the threaded
memory allocator and reinitializing
* Improved build configuration on 64-bit systems
* Added read support of PPM/PGM with the -data option
* Correct issue with displaying maximize window button on KDE-3.2.1
* Fix drawing of unicode chars in menu titles on Windows
* Correctly post Tk clipboard data to the Windows clipboard on exit
* Fix the panedwindow -opaqueresize option to work as per the docs
* Reduce Tk tk_messageBox default font size to 14-point
* Prevent possible segfault in -maxundo
* Fix XIM initialization on Solaris
* Complete the implementation of the CG version of the X drawing
emulation layer on Mac OS
* Fix several Mac OS X usability issues
0559デフォルトの名無しさん
NGNG0560デフォルトの名無しさん
NGNGよし、じゃあ何かネタくれ。
0561デフォルトの名無しさん
NGNGMDIって言うんですかね。
window .remocon -width 320 -height -200
pack [button .remocon.play -text "再生" -command play]
pack [button .remocon.1ch -text "NHK" -command "channel 1"]
みたいなことが出来ないでしょうか。
0562デフォルトの名無しさん
NGNGmkWidgetsとか。
0563561
NGNGおとなしくTk_CreateWindow()あたりを使います。
0564デフォルトの名無しさん
NGNG0565561
NGNG複数欲しいんです。なるたけお手軽に。
0566デフォルトの名無しさん
NGNG#!/bin/sh
# \
exec wish "$0" ${1+"$@"}
toplevel .a
toplevel .b
0567561
NGNGtoplevel toplevel toplevel
おやすみなさい
0568デフォルトの名無しさん
NGNG0569デフォルトの名無しさん
NGNGbutton .b -text 破壊
DynamicHelp::add .b -text Destrooooooy!!!
DynamicHelp::configure -font {Arial 30 bold}
pack .b
0570デフォルトの名無しさん
NGNGつまらないものだな。
0571568
NGNG0572デフォルトの名無しさん
NGNG0573デフォルトの名無しさん
NGNG0574デフォルトの名無しさん
NGNG0575デフォルトの名無しさん
NGNGhttp://aspn.activestate.com/ASPN/Tcl/Tk_Contest/
0576デフォルトの名無しさん
NGNG0577デフォルトの名無しさん
NGNGこのTCL総合スレが2年もかかって570スレだからそんなのすぐ落ちちゃうと
思われるからここでいいんじゃない？ かなりの部分は共通だからね。
0578デフォルトの名無しさん
NGNG0579デフォルトの名無しさん
NGNG◎マルチプラットフォーム。
△見た目がいまいち。センスは悪くないが、ネイティブのツールキットを
使わないので、他のアプリと比べると浮く。
…Tcl/Tk Aqua羨ますぃ。
0580576
NGNG了解しますた。
処で、except 本(http://www.oreilly.com/catalog/expect/)を捜しに、
堂島のジュンク堂に逝ったのですが、except 本は疎か、Tcl/Tk の本すら
あんまり置いてませんですた。
漏れの知らぬ間に世間でのブームは去ってしまったのでしょうか？
0581デフォルトの名無しさん
NGNG釣りだとは思うがexpectな。
0582576
NGNG（ ⌒ ヽ＜…
∪ ﾉ
∪∪
0583デフォルトの名無しさん
NGNGWinとMacはネイディブだよ？UNIXだってMotifクリソツじゃん。
なにが不満なんだ？GtkかKDEっぽいのにしろってことか？
0584デフォルトの名無しさん
NGNGでなかったりとか、挙動が微妙に違うので自前で用意してるのかと思ってたよ。
個人的にWindowsで動かしたときに格好悪いなぁと思うのは、
http://anygui.sourceforge.net/img/wx_w2k_0_1a3.jpg
http://anygui.sourceforge.net/img/tk_w2k_0_1a3.jpg
下側のように、スクロールバーが出っ張ること。
Text widgetとscrollbar widgetを別々に扱っている以上、しょうがないのは
判るんだけど。
0585デフォルトの名無しさん
NGNGあーなるほどねー言いたい事はわかるわかる・・・。
その絵ではスクロールバーの出っ張りはpackで配置してる
けど、frameの中にgridで組んで、frameのreliefをsunkenに
するといいよ。
tclsh
package require Tk
frame .f -relief sunken -bd 2
scrollbar .f.x -command {.f.text xview} -orient horizontal
scrollbar .f.y -command {.f.text yview} -orient vertical
text .f.text -relief flat \
-xscrollcommand {.f.x set} -yscrollcommand {.f.y set}
grid .f.text -row 0 -column 0 -sticky nsew
grid .f.y -row 0 -column 1 -sticky ns
grid .f.x -row 1 -column 0 -sticky ew
pack .f
0586デフォルトの名無しさん
NGNGおぉ．すばらしい．これで何となく野暮ったい感じがなくなった．
…今度はXでの見た目が微妙になる罠．
0587デフォルトの名無しさん
NGNG例えばテキストエリアで右クリックしたときの挙動違うし。
0588デフォルトの名無しさん
NGNGTcl/Tk Aqua は Input Method 対応してないよ。
それにかなりバギー。
0589デフォルトの名無しさん
NGNGプラットフォームは Linux, Windows です。
私が試したのは vim, emacs(tcl-mode), k2editor, Source-Navigator で、
vim, Source-Navigator はうまくいきました。
k2editor はコメント開始と終了を指定する正規表現の書き方がわからずあきらめました。
emacs は行末の \ 記号を判別する部分に問題があります。
よろしくお願いします。
0590デフォルトの名無しさん
NGNG完璧にやろうとするとむずかしい気がする。
￥の行連結もややむずかしめだけど、たとえば以下の上だけをコメント扱いにするとか。
構文的には同じだけど、引数がevalされるかどうかはコマンド(for/puts)で違う。
vimと Source-Navigatorはこういうのできてるの？
for {set i 0} {$i < 10} {incr i} {
# 10回繰り返す
puts "hello"
}
puts stdout {
# この部分は改行と#から始まる4行のただの文字列
hello
}
0592589
NGNG行末 \ 記号とputsの引数認識は対応していませんでした。
0593デフォルトの名無しさん
NGNGこういうのってfreewrapでwrapできるんですかね？
フリーソフト作ってて、freewrap日本語版でwrapできるのが必要条件なんです。
入れて試してみればいいじゃんと言われそうですが、「できるよ」という
声があればやる気がおきますんで。
0594デフォルトの名無しさん
NGNG0595デフォルトの名無しさん
NGNGあったみたいだけど、いまはそういうことってできる？TclControl自体は
もうメンテ止まってるみたいだし、ActiveTclには入ってなさげだし。
VBでコントロール作る代わりにTclで作って他のアプリに組み込んでやろうかと
考えてる。
0596デフォルトの名無しさん
NGNGという級数の計算をさせたいのですが、虚数（ここでいうj）の扱いがわかりません。
とりあえずざっと書いてみた感じ下のようになるのですが、jはどうすればいいのでしょうか
ｊ以外のパラメータは普通に実数として扱えるのでこれでいいと思うのですが
proc Calc { seg } {
# まず関数内で使用するグローバル変数を決める。
global g_pai g_ramda g_d g_ant
set answer 0
set totalPoi 0
set tmu1 [expr 2.0 * $g_pai * $g_d * sin($g_ant) / $g_ramda]
for {set tim 0} {$tim < $seg} {incr tim} {
set answer [expr exp(($tmu1) * j * $tim)]
# とりあえず書いてみたがﾄﾞｰｽﾝﾉｶ↑
set totalPoi [expr $totalPoi + $answer]
}
return $totalPoi
}
0597デフォルトの名無しさん
NGNGexp(ix) = cos(x) + i・sin(x)
0598デフォルトの名無しさん
NGNGマニアックすぎて答えられないスマン。VBからtcl84.dllの
関数をコールするとかできないの？VBあまり使ったこと
ないから適当に言ってるけど・・・
0599本田
NGNG>tcom -- Access and implement Windows COM objects with Tcl
http://www.vex.net/~cthuang/tcom/
0600デフォルトの名無しさん
NGNGうん。それならActiveTCLに入ってるけどあくまでCOM呼び出し
可能なメソッドを定義できるだけだよね（ActivePerlとかの
COMサポートと同じレベル）。TclControlはGUIコンポーネントと
して他のアプリケーションに埋め込み可能なコントロールを
作ってくれる。
>>598
やっぱマニアックですか…WindowsでCOM/OLE/ActiveXするなら
結局VBとかVC[#++]になるのかな
0601デフォルトの名無しさん
NGNGQtとかGtkとか使えよ！！
0602デフォルトの名無しさん
NGNG0603本田
NGNG>Tcl Gtk Bindings
http://tcl-gtk.sourceforge.net/
0604本田
NGNG>froglogic Tq is a library which eases migration from Tk based applications to Qt®.
http://www.froglogic.com/pg?id=Products&category=tq
0605本田
NGNG>Tcl meets GTK+ and Gnome
http://www.dr-baum.net/gnocl/
0606デフォルトの名無しさん
NGNG0607デフォルトの名無しさん
NGNGほしい。
個人的にはPyGTKをTkinterのインターフェイスでwrapしたものがあれば十分だが。
0608デフォルトの名無しさん
NGNGしばらく触っていなかったのでスタティックリンクのDLL生成方法忘れていた
0609デフォルトの名無しさん
NGNGあとGnoclとかはTk風のインターフェースでGtkをラップしたものだよ。
0610デフォルトの名無しさん
NGNG0611デフォルトの名無しさん
NGNGTcl使ってどんなことやってるのか知らないけど。
0612デフォルトの名無しさん
NGNG0613デフォルトの名無しさん
NGNG今のTkのバージョンアップに付いていけてるのだろうか・・・。
0614デフォルトの名無しさん
NGNG0615デフォルトの名無しさん
NGNG0616デフォルトの名無しさん
NGNGなんかお互いに、だいぶ過去の相手より優れてるって主張ばっかり…
いつの相手と比べてるんだよ
0617デフォルトの名無しさん
NGNG0618デフォルトの名無しさん
NGNGそのディレクトリに移動して起動してればpwdでいいけど、絶対パスで
起動しているときに、そのスクリプトのディレクトリ（かスクリプトファイルの
絶対パス名）を知りたいんだけど。
0619618
NGNG0620デフォルトの名無しさん
NGNG0622デフォルトの名無しさん
NGNGそこはもう全部読みました。要するにevalするしか無いんですね？
0623デフォルトの名無しさん
NGNG0624デフォルトの名無しさん
NGNG出来上がったcソースみるとゲロはきそうになるけど
0625デフォルトの名無しさん
NGNG0626デフォルトの名無しさん
05/02/06 00:08:21可読性のよい構文が気に入りました｡
みなさんよろしく。
0627デフォルトの名無しさん
05/02/06 00:11:24君も変わり者だね。俺もTclは超読みやすいと思ってるけど
まわりはそう思ってないんだよね。なんでかな。
0628デフォルトの名無しさん
05/02/06 00:36:00おそらく君には無理。BLTやTixのソースコード嫁。Tcl/Tk入門を嫁。
0629デフォルトの名無しさん
05/02/06 01:39:06そういうお前は読んだことないだろ。
0630626
05/02/06 02:33:41awkやrubyもよみやすいと感じます｡
shは空白の扱いがシビアすぎ。
lispとsmalltalkはなんでかしらないけどキツイですねぇ。
あとドキュメントが充実しているのがｲｲ！
よーしパパHello Worldつくっちゃうぞー
0631デフォルトの名無しさん
05/02/06 03:44:06あるよボケ
0632デフォルトの名無しさん
05/02/06 03:45:22きょうから始めたくせに戯言こくなよ。
0633デフォルトの名無しさん
05/02/06 14:28:21evalせずにどうやってCからデフォのウィジェットを使うんだい？
BLTのソースを読んでわかるんだ？ふーん
0634デフォルトの名無しさん
05/02/06 21:25:54挙句の果てには挑発して回答を引き出そうとする始末。最悪だな。
もう一度言ってやる。Tk APIだ。<tk.h>だ。わかったらぶつくさ言わずにリファレンス熟読しろ。
0635デフォルトの名無しさん
05/02/06 21:54:35ハッタリをどこまで続けるのかなあと。
0636デフォルトの名無しさん
05/02/07 00:19:00clipboardのappendとか痒い所にも手が届く感じがたまらん
TextとかtagはTurtorialないと厳しいなぁ
例がたくさんないとわからん。そろそろ実践しなきゃね。
また明日。
0637デフォルトの名無しさん
05/02/07 23:10:570638デフォルトの名無しさん
05/02/09 04:56:53http://tmml.sourceforge.net/doc/tk/text.html
の「BINDINGS」に関することなんだが。
読んだ所、Ctrl-SpaceやCtrl-wにも対応しているようなのだが、
cygwin版のwishやActiveStateから落としたTcl/tkじゃあ反応しないんだが、
これはなんで？？みんな問題なく使えてる？？
ちなみにCtrl-a ，Ctrl-e ，Ctrl-o， Ctrl-k， Ctrl-v etc.は問題ない。
＜サンプルcodeはここから＞
#!/cygdrive/c/Tcl/bin/wish.exe
pack [text .t]
if [catch {open "./foo.txt" r} fd] {}
.t insert end [read $fd]
close $fd
＜ここまで＞
（でカレントディレクトリにはfoo.txtという適当なファイルがある。
んで、TclはWindowsでＣドライブ以下のTclフォルダにインストール済みという状況。）
0639デフォルトの名無しさん
05/02/09 16:27:55event add <<Cut>> <Control-w>
とかして自分でイベントを作るしかないね。
0640デフォルトの名無しさん
05/02/09 22:52:47C++でよければC++/Tkてのがsf.netにあるから試してみるといいよ
中でEvalしてるけどね Evalしない方法は Tcler's Wiki で見た気がする
とにかくお前さあ、たまにはcom.lang.tcl見ろよな
お前と全く同レベルのｶｽが湧いてるから
他人のふりみて我がふりなおせるんじゃないかな
まー俺もお前と同レベルのｶｽなんだけどさ
0641デフォルトの名無しさん
05/02/09 23:54:34これはヘボいな
0642デフォルトの名無しさん
05/02/10 00:17:08Tcler's Wikiも探したけどそんなの無かったよ。
0643デフォルトの名無しさん
05/02/10 00:24:150644デフォルトの名無しさん
05/02/10 00:56:06インタプリタからコマンド情報を得てそのコマンドをコールする例あったはずだよ?
おれのかんちがいかな
0645デフォルトの名無しさん
05/02/10 00:57:31あんたはやれば出来る子だよ
0646デフォルトの名無しさん
05/02/10 02:05:34623の云うようにTk APIを使うしかない。
ただしジオメトリマネージャがAPIとして公開されていないので、目に見えるようにするには
TclスクリプトをEvalして使うしかない。
0647デフォルトの名無しさん
05/02/10 17:26:51補足だけど、Tcl/Tk入門にものってたよ これは今確認した
Tcl_Evalのバイパス(610p)で解説されてる方法を使えば
>>633の
>evalせずにどうやってCからデフォのウィジェットを使うんだい？
あたりは解決できる
>>646
そうなんだ じゃあTk APIとやらを調べてみるよ
アドバイスありがとうTCL神
0648デフォルトの名無しさん
05/02/17 14:40:15Webサイトには
>以下の解像度のアイコンをすべて用意する必要があります。
> 16x16, 4-bit (16-color)
> 16x16, 8-bit (256-color)
> 32x32, 4-bit (16-color)
> 32x32, 8-bit (256-color)
> 48x48, 4-bit (16-color)
> 48x48, 8-bit (256-color)
>例えば、hello.exeのアイコンを変更したい場合は、
>hello.vfs/tclkit.icoにアイコンを置いて再ラップするだけです。
>.icoファイルの名前は、必ずtclkit.icoにしてください。
て書いてあるけど、複数のファイルを全部同じ名前で同じ場所に置く事はできないし。
試しに１つのアイコンでwrapしてみたけど、ダメだった。
誰かわかる人教えて。
0649デフォルトの名無しさん
05/02/17 17:22:01VSについてたアイコンエディタだとできた気がする
0650デフォルトの名無しさん
05/02/17 20:55:10よしじゃあ複数のアイコンを一つにまとめるプログラムを作るんだ！！
0651デフォルトの名無しさん
05/02/17 21:17:44http://www.google.com/search?hl=ja&lr=lang_ja&ie=sjis&q=%83%7D%83%8B%83%60%83A%83C%83R%83%93
0652デフォルトの名無しさん
05/02/17 21:24:08http://www.vector.co.jp/vpack/filearea/win95/amuse/icon/tool/index.html
0653648
05/02/19 12:00:04マルチアイコンなんてあったのね。やってみる。
試してみたら結果を書くYO。
0654デフォルトの名無しさん
05/02/19 12:50:000655デフォルトの名無しさん
05/02/19 13:48:100656デフォルトの名無しさん
05/02/19 23:37:42シェルコマンドだと思えば普通の構文だよｗ
0657デフォルトの名無しさん
05/02/20 00:33:11Tcl9.0で構文を「こういう具合に拡張してくれ」と訴えればよい
http://wiki.tcl.tk/883
0658デフォルトの名無しさん
05/02/20 06:38:420659デフォルトの名無しさん
05/02/20 13:10:590660デフォルトの名無しさん
05/02/20 13:12:23PHP風に構文全部書き直してください
0661デフォルトの名無しさん
05/02/21 04:09:57TCLは何の略か言ってみろ
0662デフォルトの名無しさん
05/02/21 18:15:220663デフォルトの名無しさん
05/02/21 18:17:17からperlが最強ということがわかりました
0664デフォルトの名無しさん
05/02/21 18:28:24教えてください
泣きそうです
1. freecommandlinetools.exe を実行します。無料の C++Builder 5
コマンドラインツール開発システムをインストールしたいドライブと
フォルダを選択します。
2. インストール先の bin ディレクトリで次の手順を実行します。
a. 既存のパスに "c:\Borland\Bcc55\bin" を追加します。
b. bcc32.cfg ファイルを作成します。このファイルは，Include
および Lib パスのコンパイラオプション(コンパイラの -I
および -L スイッチ)を設定するものです。ファイルには次の
行を含めてください。
-I"c:\Borland\Bcc55\include"
-L"c:\Borland\Bcc55\lib"
c. ilink32.cfg ファイルを作成します。このファイルは，Lib
パスのリンカオプションを設定するものです。ファイルには
次の行を含めてください。
-L"c:\Borland\Bcc55\lib"
0665デフォルトの名無しさん
05/03/01 20:23:52ttp://tmml.sourceforge.net/doc/tk/text.html
には書いてある。Active Tcl の方が新しそうなんだけど、-all 消えたの？
マッチしたもの全置換するときとか苦労しませんか？
0666デフォルトの名無しさん
05/03/01 22:12:330667デフォルトの名無しさん
05/03/01 22:55:13ｱﾘｶﾞﾄ
ttp://tmml.sourceforge.net/coredocs.html
の右下に Last updated: 25 Jun 2002 とかいてあるもんだから間違えてしまった。
普通に考えれば -all なんて機能増えることはあっても減ることはなさそうだね。
0668デフォルトの名無しさん
05/03/04 18:54:58なんか一人がデカイ声で「貴様は～～～！！だから２ちゃんねるで馬鹿に
されるというのだ～～～！！この～～～！」
ともう片方の首を絞めました。
絞められた方は「ぐええぇーー！悪霊退散悪霊退散！！」と十字を切っていた。
割と絞められているらしく、顔がドンドンピンクになっていった。
渋谷でもう一人、仲間らしい奴が乗り込んできてその二人に声をかけた。
「お！忍者キッドさんとレオンさん！奇遇ですね！」 「おお！そういう君は＊＊＊＊（聞き取れず。何かキュンポぽい名前）ではないか！
敬礼！」
「敬礼！出た！敬礼出た！得意技！敬礼出た！敬礼！これ！敬礼出たよ～～！」
俺は限界だと思った。
0669デフォルトの名無しさん
05/03/11 19:27:55懐かしすぎ
0670デフォルトの名無しさん
2005/04/30(土) 22:58:54あるようですが、フリーでないというのとかなり古いツールみたいで
他の方法がないかと探しています。
0671デフォルトの名無しさん
2005/05/01(日) 06:14:04tclkit？
0672デフォルトの名無しさん
2005/05/01(日) 14:14:59starkitはunwrapするとコードを読むことができます。
0673デフォルトの名無しさん
2005/05/03(火) 18:39:370674デフォルトの名無しさん
2005/05/09(月) 17:51:37.frame1.myButton
.frame2
↓
.frame1
.frame2.myButton
0675デフォルトの名無しさん
2005/05/13(金) 21:49:12一番最初のinterp = Tcl_CreateInterp()の呼び出しで落ちてしまいます。
vc6でコンパイルしactivetcl\libの下のtcl84.lib, tk84.libをリンクしてるのですが、
デバッガで追ってみると、なぜかtcl.libからcygwin1.dllが呼び出されてそこで
落ちてます。
原因をご存知の方はいらっしゃいますでしょうか？
環境: windows xp, activetcl 8.4
0676デフォルトの名無しさん
2005/05/13(金) 22:04:57cygwinのdirectoryにあるtcl84.dllが使われていたためでした。
libをstatic linkしてようが関係ないんですね。愚かでした。
0677デフォルトの名無しさん
2005/05/15(日) 07:02:30tk_focusNext使おうと思ったけどできんかった
0678デフォルトの名無しさん
2005/05/15(日) 08:14:14wm stackorder .
0679デフォルトの名無しさん
2005/05/15(日) 08:20:44それ本当に静的ライブラリをリンクしてんの？.libは
静的ライブラリとDLLをリンクするのに使う奴の二種類ある。
tclの場合静的ライブラリはtcl84s.libみたいにsが付いてる。
0680デフォルトの名無しさん
2005/06/08(水) 21:51:14ActiveTclがOSXに対応したそうですよ。
0681デフォルトの名無しさん
2005/06/18(土) 21:26:45値を持たせたいんだけど。
foreach current_namespace [list tokyo osaka fukuoka] {
namespace eval $current_namespace {
variable count "";
variable governor "";
proc get_capital_city {...}
}
}
定義(eval)は出来るけど呼ぶときにどうやるか分からない。
set ns1 "tokyo";
set ::$ns1::governor "ishihara";
でError。can't read "ns1::governor" no such variable
とか出る。要するにnamespaceをclass instanceしてobjectに
するように使いたい。Active Tcl 8.4です。
0682デフォルトの名無しさん
2005/06/19(日) 01:20:21set ::$ns1\::governor ishihara
OOするならincrTclまじおすすめ。
0683681
2005/06/19(日) 09:46:54setすることも出来ました。ありがとう。
ところで名前空間内の variableは参照できないのでしょうか。
>681 の例では
set ::$ns1\::count 100
set ::$ns1\::count [expr $::$ns1\::count + 1];
でエラーになります。namespace無いの全てのvariableに対して
get_<variable名> {} {returun $<variable名>}というprocを定義する
しかないんでしょうか。
$::$ns1\::count, ${::$ns1\::count}, $::${ns1}::countなどやってみま
したが全て文法エラーだったり変数名が返されるだけでうまくいきません。
Tcl上で行う必要があるんです…incr Tclは使えないんです。
0684デフォルトの名無しさん
2005/06/19(日) 21:07:51とか
incr ::$ns1\::count
とか
set c ::$ns1\::count
eval set $c [expr $$c+1]
一番上の書きかたなんて誰も読みたがらんぞ！
incrTclが無理ならTclで書かれたsnitとかまじおすすめじゃ！
0685デフォルトの名無しさん
2005/06/19(日) 22:06:030686デフォルトの名無しさん
2005/06/19(日) 23:10:20かと思っているようだけど、それは違うよ。普通のTclの拡張ライブラリだよ。
soファイルをloadするだけでいいんだよ。
0687681
2005/06/20(月) 01:33:18incr以外のlistやhashなども使いたいのでちょっとトリッキーな
この方法(特に1つめ)のは使わないことにしましたが。兎に角thank youです。
0688681
2005/06/20(月) 01:41:53調べてみたら、itcl.dllというのがありました。
>>681 でactive tclとか書いておいてなんなのですが、実は
私が今実行したい処理系は会社で使っている半導体設計(EDA)ソフトの
カスタマイズ言語としてのTclなのです。この業界の設計ツールは何故か
は知りませんがほとんどTclかSchemeです。Officeに対するVBAみたいな
感じでしょうか。で、itcl.soをHP-UX,AIX,Solaris, Linuxで自分で作れるかどうか
分からないのです。時間があるときに調べてみます。
>>684 中で紹介されたsnitが 例えば source snit.tclなどとするだけ
でOKな拡張だった場合、使える可能性がありますのでこれも調べてみます。
0689デフォルトの名無しさん
2005/06/29(水) 11:17:02upvarいいよupvar
proc dump {name} {
upvar 0 ${name}::count count
upvar 0 ${name}::governor governor
puts "name: $name"
puts "count: $count"
puts "governor: $governor"
}
0690デフォルトの名無しさん
2005/07/04(月) 16:40:46目的のルータへtelnetし、ログインするところまではうまくいったんだが
ログイン後の処理で工夫をしたい。
ログイン後に任意のコマンドを投入しんだけど、
この任意のコマンドは別ファイルから引っ張ってきたい。
別ファイルを１行ずつ変数に代入することになるんだろうけど、やり方がよくわからない。
その別ファイルの名前が command.txtだとして、
今回のスクリプトのファイル名がswitch_configだとするなら、
#switchi_config command.txt
という具合に、コマンドラインから引数を受け取って処理するようにしたい。
何か参考になるwebページでも結構なんで教えていただければ幸い
0691デフォルトの名無しさん
2005/07/04(月) 20:15:39これはもう読みましたか？
0692デフォルトの名無しさん
2005/07/05(火) 00:10:15| |
| |
| |
| | ／￣￣￣￣￣￣￣￣￣￣￣
∧＿∧ | | ｜先生～procで作ったコマンドを unsetみたいに
（ ´Д｀）／/ ＜ スタックフレームから消す方法を教えてくださ～い
／ / ＼＿＿＿＿＿＿＿＿＿＿＿
/ /| /
＿＿| | .| | ＿_
＼ ￣￣￣￣￣ ＼
||＼ ＼
||＼||￣￣￣￣￣￣￣||￣
|| ||￣￣￣￣￣￣￣||
.|| ||
0693本田& ◆xOS3wf.pJg
2005/07/05(火) 08:18:06インタープリターごと削除すればいいのでは？
0694デフォルトの名無しさん
2005/07/05(火) 15:09:19proc test {} {puts てすとだよ}
test
rename test {}
test
0695デフォルトの名無しさん
2005/07/05(火) 15:10:48よくわからんけど、ファイルを開いて一行づつループで回すだけなのでは・・・
0696デフォルトの名無しさん
2005/07/05(火) 21:51:25| |
| |
| |
| | ／￣￣￣￣￣￣￣￣￣￣￣
∧＿∧ | | ｜先生～pack forgetで空いた穴は
（ ´∀｀）／/ ＜ 埋めれないんですかあ？
／ / ＼＿＿＿＿＿＿＿＿＿＿＿
/ /| /
＿＿| | .| | ＿_
＼ ￣￣￣￣￣ ＼
||＼ ＼
||＼||￣￣￣￣￣￣￣||￣
|| ||￣￣￣￣￣￣￣||
.|| ||
0697デフォルトの名無しさん
2005/07/06(水) 23:15:03具体的にはどういう状況ですか?
親がpropagateしてるくらいしか思いつかないス
0698697
2005/07/06(水) 23:20:16propagateするのはmasterだよね
ごめん
0699デフォルトの名無しさん
2005/07/25(月) 22:07:350700デフォルトの名無しさん
2005/07/28(木) 00:52:590701デフォルトの名無しさん
2005/08/08(月) 12:21:32ルータにtelnetして自動運転するスクリプトを書いているんだが、
ルータが吐き出した行から任意の文字列を切り出して変数に入れたい。
どうすればいいでしょうか
0702デフォルトの名無しさん
2005/08/08(月) 14:11:288.5って対応してる拡張少なくないの？
0703デフォルトの名無しさん
2005/08/08(月) 14:25:36http://kansai.anesth.or.jp/gijutu/expect/doc-expect.php#expect_out
0704デフォルトの名無しさん
2005/08/08(月) 17:09:54ありがとう。複数行にわたって記憶されるみたい。
あとは考えてみます。
今bashのシェルスクリプト内でexpectを実行するものを書いてる。
-------------------------------------------------------
#!bash
ip_address=192.168.1.1
hostname=suntory
(中略)
expect -c "
spawn telnet $ip_address
expect "login:"
send "Password:"
send "password\r"
expect ${hostname}
ネットワーク機器のプロンプト文字列"suntory"を待つ。
もし違うプロンプトが来た場合は速やかに処理を中断し、bash上から
任意のコマンドを実行したい。"suntory"のプロンプトが来れば処理を続行。
「タイムアウトになったら、処理を中断し、bashなど他のスクリプト言語で処理を開始する」
というやり方でも良いかと思うんだけどwebや英文のexpect本を読んでもよくわからない・・・・
そもそも、可能？
0706デフォルトの名無しさん
2005/08/08(月) 23:41:03bashスクリプトとexpectを併用してどうこうしたいんならperlでやっちゃいなよ
希望の文字列が来たらこうして、「それ以外」だったらああするっていう処理が知りたいのかな？
0707デフォルトの名無しさん
2005/08/31(水) 17:20:57homeあたりに .なんとかrc でも書けば全てのtcl/tkアプリのデフォルトに使用、みたいな方法はありませんか。
0708デフォルトの名無しさん
2005/08/31(水) 20:46:32lib/tk8.4/tk.tclでもいじってみればー
0709デフォルトの名無しさん
2005/09/01(木) 07:08:01( ´Д⊂ヽﾐﾂｶﾗﾅｲ… > tk.tcl
もしかしてLinuxの勉強の範疇でしょうか。
xresourcesだかをいじれば可能？
0710デフォルトの名無しさん
2005/09/01(木) 19:01:54option add *font {{-jis-*-*-*-*-*-16-*-*-*-*-*-*-*} 12} widgetDefault
とか書く方法もあるよ。
0711デフォルトの名無しさん
2005/09/01(木) 19:05:28英語だけどここが詳しいから暇なら読んでみてね。
0712デフォルトの名無しさん
2005/09/01(木) 22:37:32.tkってなにかと思ったら南太平洋にある人口1400人のニュージーランド領の国、
トケラウ諸島のトップドメイン。ﾜﾛﾀ。
0713デフォルトの名無しさん
2005/09/01(木) 23:41:340714デフォルトの名無しさん
2005/09/02(金) 22:29:040715デフォルトの名無しさん
2005/09/02(金) 23:37:04勉強しています。なんか、思っていたよりずっと美しいと
いうか玄人好みな言語なんですな。関数言語的というか、
lispの文法を読みやすくして(マクロは無いけれど)実用性を
大幅に高めた感じ。（この感想あってるかな、まだ触って数時間）
今までプログラムの字面だけ見て高機能なshスクリプトみたいな
言語だと思っていました・・・
0716デフォルトの名無しさん
2005/09/04(日) 00:04:16>大幅に高めた感じ。（この感想あってるかな、まだ触って数時間）
(ﾟДﾟ)ﾊｧ?
>今までプログラムの字面だけ見て高機能なshスクリプトみたいな
>言語だと思っていました・・・
その認識で正しい
0717デフォルトの名無しさん
2005/09/04(日) 00:51:09-文法が新しい制御構造（らしきもの）を作成しやすくなってる
-Event-Driven I/Oが言語にビルトイン (何故かこの特徴は実用
になるメジャー言語にあまり備わってない)
-クロスプラットフォームな標準GUIライブラリ
-Cで拡張ライブラリ書くのが簡単
型の自動変換規則がかなり適当なせいでPerl同じように
バグを産みだしやすい面はあるかもしれないけど。
自動テスト作成に向いてるとか言われるのはわかる
気がする。DSLの作成が得意な実用言語？
0718デフォルトの名無しさん
2005/09/04(日) 07:29:090719デフォルトの名無しさん
2005/09/04(日) 08:43:10Tcl が関数言語的つーのはどうかと...
0720デフォルトの名無しさん
2005/09/04(日) 12:20:14引数に $ を付けないコマンドは Lisp の特殊式に比べられなくもない.
気持ちは分かるが, 関数型言語でも文法を Lisp に合わせた訳でもない.
高機能なシェルスクリプト? それはそれでどうかと思う. 最初は確かにそうだったんだが…
0721デフォルトの名無しさん
2005/09/04(日) 16:15:00あとはシェルスクリプトと同じじゃないの？
データ型は文字列しかないみたいだし。
0722デフォルトの名無しさん
2005/09/04(日) 22:37:33型無しっつうのと意味は同じだと思うけど。
0723720
2005/09/05(月) 12:07:02例えば [expr $x + $y] なら, expr はどう処理しているんでしょう?
数値なら数値の特殊な扱いがあるんでしょうか? あったとしても expr の内部の話だから型とは無関係ということになるんでしょうか?
シェルスクリプトについては, 何が出来ればシェルスクリプトと違ってくるのか分からなかった.
少なくともシェルスクリプトだけでアプリケーションを書こうとは思わないというだけ.
0724デフォルトの名無しさん
2005/09/07(水) 23:51:06のがTcl(/Tk)の強みなんジャマイカ
君のいっているアプリってどの程度のものかしらんけど
exprは内部で数値変換や演算をしてその結果を文字列として返すだけ
0725助けてください
2005/09/17(土) 23:51:24puts $argv
exit
このようなプログラムを書きます。test.tclとして保存し、コマンドラインから
tclsh test.tcl 江戸
と打ちますと、「構]戸」と文字化けして出力されてしまいます。
助けてください
0726725
2005/09/18(日) 01:11:59どうやら]{}をエスケープする処理が入ってるようです。
なので下位の2バイト目に0x5D, 0x7B, 0x7Dが
入っている文字は全部文字化けする気がします。
[(0x5B)の場合はリスト化されてるし、なんか変です。
Ⅷ閏骸擬啓梗纂充深措端甜納票房夕麓兌喙媼彈拏杣歇
Ⅹ云馨犠珪江讃従疹曽綻転脳評望余肋兢咯嫋彎拆枉歉
閲顎宮鶏砿施旬須捜畜怒倍府本養几嘴學悳掉桀毬
厭笠急迎閤枝殉図挿筑党媒扶凡抑凩嘲孺怡掵栲毳
この辺の文字がおかしいです
0727デフォルトの名無しさん
2005/09/18(日) 02:49:030728725
2005/09/18(日) 14:07:36よくわかりません。どうやるんでしょうか。
たとえば先ほどのプログラムをtclshの対話シェルから
fconfigure stdout -encoding utf-8
exec tclsh test.tcl 江戸
とやっても文字化けします。
0729デフォルトの名無しさん
2005/09/18(日) 14:31:52putsするだけならEUC-JPでも大丈夫だろうけど
% cat bbb.tcl
puts $argv
% cat bbb.sh
#!/bin/sh
exec tclsh bbb.tcl 江戸
% od -t x1 bbb.sh
0000000 23 21 2f 62 69 6e 2f 73 68 0a 65 78 65 63 20 74
0000020 63 6c 73 68 20 62 62 62 2e 74 63 6c 20 e6 b1 9f
0000040 e6 88 b8 0a ←UTF-8で「江戸」ね
0000044
% ./bbb.sh
江戸
0730725
2005/09/18(日) 16:24:38どうもありがとうございます。えと、
cygwinはよく知らないので間違えているかもしれませんが、シェルの環境の
言語がutf-8になってるのではないでしょうか。他のプログラムとの連携が
あるのでできれば環境は非cygwinのcp932のままでやりたいのですが・・・。
0731727,729
2005/09/18(日) 19:06:56シェル環境というか、端末ソフトはckという多言語自動認識
できるやつ。でも、今回の文字化けは表示じゃなくて入力の
ところで発生しているのでそれは無関係かと。
tclのソースを調べたところこんな処理になっていた。
たぶんSJISの文字をコマンド引数からちゃんと渡すのは
無理じゃないかな。
1. CレベルのargvをTclのリストに変換する
(知ってると思いますがTclのリストの内部表現はある特別な
フォーマットの文字列)
ここで `]' などはTclリストの内部表現的に特殊文字なので
backslashでエスケープされる。
2. リスト文字列をデフォルトEncoding(Windowsの場合SJIS)から
UTF-8に変換する。このときエスケープ文字のはずのbackslashは
別の文字の一部として消滅する。
その結果 `]' だけがおいてきぼりになる。
3. リスト文字列を$argvにセットする。
0732727,729
2005/09/18(日) 19:15:30決め打ちなので>>729のやり方はダメですね。入出力が
同じエンコーディングなので偶然元のバイト列に戻った
だけみたい。
ただし、tcl8.5からはtclshに-encodingというオプションが
追加になったらしいので、
tclsh -encoding utf-8 UTF-8の日本語文字列
こういう使い方なら副作用もなく正しく処理できそう。
0734デフォルトの名無しさん
2005/09/28(水) 16:41:40http://chun.s11.xrea.com/up/img/046.zip
あとソースフォゲにがんばってバグ報告してみました。
0735デフォルトの名無しさん
2005/10/05(水) 08:37:45tcl84.dll、tk84.dll で、Windows で漢字を含むパスの不具合修正
http://lists.sourceforge.jp/mailman/archives/tcltkjp-develop/2004-March/000049.html
ここにある修正を適用すれば解決するはず。
引数の問題だけでなく、$argv0 とかへの変数設定の不具合も解決する。
tclsh 及び、wish 本体を日本語を含むパスにおいても実行可能になる。
修正ファイルは以下(tclAppInit.c、tkAppInit.c、winMain.cの修正も必要)
./tcl8.4.5-ok/win/tclWinFile.c.diff
./tcl8.4.5-ok/win/tclWin32Dll.c.diff
./tcl8.4.5-ok/generic/tclEncoding.c.diff
./tcl8.4.5-ok/generic/tclMain.c.diff
./tk8.4.5-ok/generic/tkMain.c.diff
8.4.5での修正だけど最新版でも適用可能だと思う(8.5系には適用不可)
tcl85a2では、ある程度対策が行われたみたいで
generic/tclMain.c
generic/tkMain.c
の修正だけでよかった。(tclAppInit.c、tkAppInit.c、winMain.cの修正は必要)
0736725
2005/10/05(水) 15:05:24どもです。これは725のバグとは別のそれだと思うのですが、
確かに\を/に変換する処理が入ってて文字化けしますですね・・・。
実行ファイルのパスの問題は8.4.7で一度手が入ってるので、
そのままパッチは当てれないと思いますが、ちょっと調べてみたいと
思います。
0737725バグ
2005/10/05(水) 17:05:52725バグの修正は735に加えて、以下を tclMain.c、tkMain.c の、Tcl_Main() 、Tk_MainEx()への追加で解決する。
tcltk85a2 でも同様の修正でOK。 該当部分はすぐわかると思うので手パッチで試してね。
#ifdef _WIN32
{ char*av[argc]; int i;
for (i = 1; i < argc; i += 1) {
char*utf8,*p;
Tcl_ExternalToUtfDString(NULL, argv[i], -1, &argString);
utf8 = strdup (Tcl_DStringValue(&argString));
for (p = utf8; *p != '\0'; p++)
if (*p == '\\')
*p = '/';
av[i] = utf8;
Tcl_DStringFree(&argString);
}
args = Tcl_Merge(argc-1, (CONST char **)av+1);
Tcl_SetVar(interp, "argv", args, TCL_GLOBAL_ONLY);
ckfree (args);
for (i = 1; i < argc; i += 1)
free (av[i]);
}
#else
args = Tcl_Merge(argc-1, (CONST char **)argv+1);
Tcl_ExternalToUtfDString(NULL, args, -1, &argString);
Tcl_SetVar(interp, "argv", Tcl_DStringValue(&argString), TCL_GLOBAL_ONLY);
Tcl_DStringFree(&argString);
ckfree(args);
#endif
0738725
2005/10/05(水) 23:20:01えっと、要するに\を/に置き換える処理をTcl_Mainのutf-8変換後に移動する、
というのと、引数を一つづつutf-8に変換するということですね。8.5a2はこの部分
だけでいいとおっしゃっていますが、8.4.11の場合も、この部分だけでいいんでしょうか？
8.4.7で入った修正と、この8.4.5用パッチの修正の部分の突合せに難航しております・・・
あと、cygwinで\を/に変換する処理がどうなってるか調べないと・・・
0739725バグ
2005/10/06(木) 11:16:328.4.11の場合は、tclMain.c tkMain.c tclAppInit.c winMain.c の修正だけでいいと思う。
tcl8.4.11 を調べて、試してみた(ｔｋはやってない)けど大丈夫だった。
> 要するに\を/に置き換える処理をTcl_Mainのutf-8変換後に移動する、
> というのと、引数を一つづつutf-8に変換するということですね。
この考えでOK。 うまく修正して本家に報告しといてね。
cygwin環境で、このtclを実行させた場合でも、ちゃんと動作するよ。
cygwinでは、引数とかの \\ -> / 変換は行わないので気にすることはない。
0740デフォルトの名無しさん
2005/10/17(月) 14:02:36.2分上がったソースコードはどこから取れるのか教えてください。
0741デフォルトの名無しさん
2005/10/18(火) 15:05:24リリース後に発見されたバグが修正されると8.4.1, 8.4.2のように
更新される。
ActiveTcl 8.4.11.0
Tcl/Tk 8.4.11をベースにTcllibやBWidgetなどの拡張ライブラリを
追加したもの。Tcl/Tk 8.4.11以外の部分が更新されると8.4.11.1
8.4.11.2のように更新される。
0742デフォルトの名無しさん
2005/10/18(火) 17:10:21set a [open "|外部コマンド"]
みたいに、外部コマンドの実行結果をパイプで受け取りたいのですが
これだと、標準出力しか受け取れないですよね。
標準エラー出力も受け取るには、どうしたらいいんでしょうか？
0743デフォルトの名無しさん
2005/10/18(火) 20:53:560744デフォルトの名無しさん
2005/10/18(火) 21:48:03やり方忘れたけど。。
0745デフォルトの名無しさん
2005/10/18(火) 23:16:580746デフォルトの名無しさん
2005/10/19(水) 00:58:17て2>@1を付けると、stderrも$pのチャンネルに
出力するようになるよ。
・・・
色 々 考 え て み ま す た 。 。 。
exec echo "puts stdout OUTTTT\nputs stderr ERRRRR" > srv.tcl
exec echo > stderr.txt
set err [open stderr.txt r+]
set p [open "|tclsh srv.tcl 2>@$err"]
gets $p
seek $err 0
gets $err
0747デフォルトの名無しさん
2005/10/19(水) 01:18:30コンパイラがnって変数ないぞと言われるんだけど
変数として扱わないで$nと書く方法ありませんか？
0748デフォルトの名無しさん
2005/10/19(水) 01:53:490749デフォルトの名無しさん
2005/10/19(水) 05:13:48tclのソースって慣れの問題だけど読みにくいよ
0750デフォルトの名無しさん
2005/10/19(水) 15:10:520751デフォルトの名無しさん
2005/10/20(木) 01:01:500752デフォルトの名無しさん
2005/10/30(日) 11:12:44set s 日本
set d1 [list [encoding convertto cp932 $s]]
set d2 [encoding convertto cp932 $s]
if {$d1 ne $d2} {error "$d1 ne $d2"}
0753デフォルトの名無しさん
2005/10/30(日) 11:30:55出力のときだけでええやん
0754デフォルトの名無しさん
2005/11/03(木) 18:58:23使い方がいまいち情報不足だが、、
0755デフォルトの名無しさん
2005/11/03(木) 23:58:34TCL/TKって何て読むんですか？
ティーシーエルティーケー？ってよんでたんですが、ある場所で誰かがトクルなんとかって
よんでてわらってしまったんですが
0756デフォルトの名無しさん
2005/11/04(金) 03:37:270757デフォルトの名無しさん
2005/11/04(金) 05:04:52「ティックルティーケー」だと思ってたけど。
0758デフォルトの名無しさん
2005/11/04(金) 12:35:45使い方まとめてくれよ
0759デフォルトの名無しさん
2005/11/07(月) 00:48:52grammar::*翻訳してくれよ。
0760デフォルトの名無しさん
2005/11/12(土) 22:57:32あるいはサンプルコードの見られるサイトとか知らないか？
Tk_CreateWindowでぐぐったりしてもman載せてるところしか見つからないし、TiXとかのソースではCからウィジェット生成してるところを見つけられなかった...
0761デフォルトの名無しさん
2005/11/13(日) 09:49:500762デフォルトの名無しさん
2005/11/13(日) 12:13:18いや、単純にC/C++からTkウイジェットを利用したいだけだよ。
0763725バグ
2005/11/13(日) 18:39:54それなら Tcl_Eval () でしょうな。
int main () {
// Tcl初期化
// Tk 初期化
Tcl_Eval (Interp, "label .a -text ok");
Tcl_Eval (Interp, "pack .a);
Tk_MainLoop ();
}
これで、label widget が開く。
あとはコールバック関数を使うなりして、データを受けとりゃいい。
参考になるかもしれんサイト
http://www.geocities.jp/urano343/tcltk.html
http://www.interq.or.jp/japan/s-imai/tcltk/
0764デフォルトの名無しさん
2005/11/13(日) 19:13:05回答有難う。
しかし、Tcl_Eval()を呼ばずにTk_CreateWindow()経由ではTkウィジェットは利用できないのだろうか？
つまり、Tk_CreateWindow()やTk_SetClass()と言うのは拡張ウィジェットを実装するために使うものって事なのか？
0765デフォルトの名無しさん
2005/11/13(日) 22:21:20ジオメトリマネージャー呼び出して配置すればできたはず。
0766デフォルトの名無しさん
2005/11/15(火) 04:53:50Tk_CreateWindow()やTk_SetClass()は、そのとおりで、ウィジット作成用。
Tcl_Eval()が、C バインディング tcltk の、うまみであるし、設計思想だと思う。
Tcl_Eval()使わず、直接ウィジット作成関数はコールできなくはないけど、
ヘッダ(tk.h,tkDecls.h)で定義されてないし、もしかしたら、グローバル関数じゃ
ないかもしれん。
仮に直接コールできたとしても、その関数は、tcl から呼ばれることを想定
しているので、引数(argc, argv,今はobjc,objvか)を作ってやんなきゃいけないので、
コードは、Tcl_Eval()でコールしてるのとほとんど変わりないか、逆に増える。
0767本田
2005/11/15(火) 06:02:15> しかし、Tcl_Eval()を呼ばずにTk_CreateWindow()経由ではTkウィジェットは利用できないのだろうか？
Tｋのソースコードを見ればいいんじゃないの？
Tcl/Tk入門 第２版 第４3章も参考になりそう。
0768デフォルトの名無しさん
2005/11/15(火) 23:43:11回答ありがとう。そうか拡張ウィジェット用なのか。
いや、Tcl_Eval()を使うのにやぶさかではないんだが、せっかくTk_CreateWindow()と言うのがあるなら
そっちの方がC/C++としては使いやすいかな、と思ったんだ。
0769デフォルトの名無しさん
2005/11/18(金) 01:54:16tp://tcltk.co.kr/moniwiki/wiki.php/Tcl%C0%C7%20%BB%F5%B7%CE%BF%EE%20%B5%A5%C0%CC%C5%B8%20%B8%ED%B7%C9%BE%EE%20dict
同じ人なの？
0770デフォルトの名無しさん
2005/11/18(金) 11:51:14これ読んでたんだけど、"ブロック毎に未評価のコードをそのまま保持する"って
どういう意味？バイトコードコンパイル時に文法チェックはするんじゃないの？
0771デフォルトの名無しさん
2005/11/19(土) 11:49:380772デフォルトの名無しさん
2005/11/22(火) 01:29:03を作成しましたが
expect_file > /tmp/hoge.txt
としたとき「hoge.txt」を「vi」で開くと文字化けぽっくなる
（catでみるとそんなことはない）
なぜなのでしょうか？
0773本田
2005/12/02(金) 16:40:48まだRC1が付いていた。
0774デフォルトの名無しさん
2005/12/03(土) 22:54:160775デフォルトの名無しさん
2005/12/04(日) 00:19:490776本田
2005/12/04(日) 01:01:12http://bitwalk.blogspot.com/
0777775
2005/12/04(日) 01:03:43須栗氏が独立される前のころは頻繁に氏の掲示板にも張り付いていた厨でしたが。
久々にTcl/Tk触ってみると忘れている、、、メニュー作るのに一苦労しましたわいｗ
0779本田
2005/12/05(月) 21:05:170780デフォルトの名無しさん
2005/12/06(火) 06:30:090781本田
2005/12/07(水) 22:16:40http://www.tcl.tk/
0782デフォルトの名無しさん
2005/12/09(金) 06:50:370783本田
2005/12/11(日) 06:35:10> ActiveTclの8.4.12のlib/tcl8.4にスレッド拡張が入ってるな。
８．４．１１．２から入っている。
0784デフォルトの名無しさん
2005/12/11(日) 08:33:57そうなのか。俺的にはlib/tcl8.4/threadじゃなくて
lib/threadの方がいいんだが・・・。threadなんて
めったにつかわんし、コアに存在しない拡張を
tcl8.4に入れるのはどうなのよって思ってしまう。
0785デフォルトの名無しさん
2005/12/11(日) 10:38:380786sage
2005/12/12(月) 21:14:30msys,cygwin等の mingw32-gcc でコンパイルした場合にwish.exeが正しく育成されない。
原因 configure で @MACHINE@ がセットされないことにより wish.exe.manifest 内の
processorArchitecture が空になるため。
対策 wish.exe.manifest 内の該当行に processorArchitecture="X86" を記述する。
以上。
0787デフォルトの名無しさん
2005/12/12(月) 21:37:57過去の不具合
1: tcltk 環境を、'表','ソ’等 '0x5c'(バックスラッシュ)を含む
フォルダにインストールした場合の不具合。
2: 引数に一部の漢字コードを使った場合に文字化けなどする不具合。
8.4.11 に比べて相当に改善された。2の引数の文字化けは解決された。
ただし、1: の'0x5c'を含むフォルダの不具合は一部に問題有り。
現象 D:\表\bin\tclsh84.exe として tclsh84.exe を実行
% puts $argv0
D:\[文字化け]\bin\tclsh84.exe
原因 tclAppInit.c, winMain.c 内で argv[0] 内の '0x5c'(\) を
'0x2f'(/) に書き換えているため。
対策 tclAppInit.c, winMain.c 内の該当コードを除去。
0788デフォルトの名無しさん
2005/12/13(火) 07:53:451は色々考えた結果説得力のある修正パッチを
作れなかったので棚上げ中・・・。
0789デフォルトの名無しさん
2005/12/13(火) 07:54:49環境とかサンプルコードとかも書いてよ。
0790デフォルトの名無しさん
2005/12/13(火) 12:43:40> 2は俺ががんばってバグ報告したからだな・・・。 < thanks
1: で、$argv0 パス区切りは実際問題 '\' でも、まず問題ないんだけど、あえて '/' に変換するなら
今回(tcltk8.4.12)は、こんな感じですかね。うちでは、こういう修正を各バージョンに施してました。
今回は、788のおかげで修正がほとんど必要なくて助かりましたよ。
=== tclMain.c:tclMain() & tkMain.c:tkMain()===
if (TclGetStartupScriptPath() == NULL) {
Tcl_ExternalToUtfDString(NULL, argv[0], -1, &appName);
#ifdef _WIN32
TclWinNoBackslash (Tcl_DStringValue(&appName));
#endif
} else {
Tcl_ExternalToUtfDString(NULL,TclGetStartupScriptFileName(), -1, &appName);
#ifdef _WIN32
TclWinNoBackslash (Tcl_DStringValue(&appName));
#endif
TclSetStartupScriptFileName(Tcl_DStringValue(&appName));
}
================
0791デフォルトの名無しさん
2005/12/13(火) 12:44:41引数で'\'を使わないという前提がなりたつなら、これもいれてもいいかもしれん。
WindowsOnlyでなら、便利なこともある。以前は、この修正を施してたけど、
最近は、scriptレベルで、対応中
例 => set path [eval file join [file split $path]; # '\ -> '/' 変換'
=== tclMain.c:tclMain() & tkMain.c:tkMain()===
while (argc--) { Tcl_DString ds; Tcl_ExternalToUtfDString(NULL, *argv++, -1, &ds);
#if 0
TclWinNoBackslash (Tcl_DStringValue(&ds));
#endif
Tcl_ListObjAppendElement(NULL, argvPtr, Tcl_NewStringObj(Tcl_DStringValue(&ds), Tcl_DStringLength(&ds)));
Tcl_DStringFree(&ds);
}
================
0792デフォルトの名無しさん
2005/12/15(木) 23:57:100793デフォルトの名無しさん
2005/12/16(金) 01:46:490794デフォルトの名無しさん
2005/12/16(金) 11:22:28なんか存在しないファイルをインクルードしてたりするんですけど・・・（＾＾；）
0795デフォルトの名無しさん
2005/12/17(土) 00:03:41blt.makにその記述があるとおもう
0796デフォルトの名無しさん
2005/12/23(金) 23:32:55libtclとlibtkをDynamic Linkする形で配布するのは問題ないと思うんだけど、
Static Linkしたらライセンス文つけないと駄目でしょうか。
ググってみた感じでは、ソースを配布する時のことを
書いているページはいろいろありましたが、
Static Linkしたバイナリを配布することを
説明しているところが見つかりませんでした。
社内限定で運用してたアプリを客に渡すことになったので、
今更ながらにライセンス調べ始めました。
0797デフォルトの名無しさん
2005/12/25(日) 02:16:43BSDだって静的動的問わずライセンス文はつけないとだめだ。
感染はしないというだけだ。
0798デフォルトの名無しさん
2005/12/25(日) 17:48:31みたことないけど。
0799796
2005/12/25(日) 18:09:07え、動的でもつけないと駄目なんでしょうか？
動的の場合、コード(から作られるバイナリ)が内部には
含まれないので配布には当らないと思ってました。
でもヘッダーをincludeしてるしなぁ。うぅむ。
静的の場合にはやっぱりつけないと駄目そうですね。
ありがとうございました。
どう配布するか検討してみます。
0800デフォルトの名無しさん
2005/12/27(火) 03:00:440801796
2005/12/28(水) 01:05:22ただBSDではソースとバイナリでどうなると明確に書いてるし、
GPLはGNU FAQでわりと細かく説明がある。
tclのライセンスで厳密に解釈するとどうなるんだろうと思ったんです。
自分の読解力ではその辺りの厳密さがよく分かりませんでしたので。
ライセンスをつけないといけない、
ということを周囲に対して説得するのが面倒だから
なんとかつけずにやる方法はないかを
模索しているっていう情けない理由もあるんですが・・・
0802デフォルトの名無しさん
2005/12/28(水) 02:37:310803デフォルトの名無しさん
2005/12/29(木) 10:27:17日本語入力とかは考えてないんですが、
いちいちX起動するのが面倒なのと、ヤッパリ見た目はaquaがいいので
0804デフォルトの名無しさん
2005/12/29(木) 17:09:04Aqua っつっても Carbon だけどね。
0805デフォルトの名無しさん
2005/12/29(木) 17:13:27どこら辺を書き換えればいいんでしょ？
全然情報がなくて…
0806デフォルトの名無しさん
2005/12/29(木) 17:26:42何を書き換えたいの??
0807デフォルトの名無しさん
2005/12/29(木) 17:35:48なんだか私がありえない勘違いをしているかもしれませんが。
Tiger標準のTcl/TkとXがインストールされた環境に
Tcl/Tk Aquaをインストールしたんですが、
Tcl/TkアプリをTcl/Tk Aquaで使うにはどうすればよいのか
わからなかったので書き込んでみたんですが、
通常は、Aquaの方が優先的に使用されるものなのでしょうか？
0808デフォルトの名無しさん
2005/12/29(木) 17:45:17スクリプトの一行目の #!/path/to/wish みたいな行を、新しく
インストールした wish を指す様に設定してあげれば良い。
0809デフォルトの名無しさん
2005/12/29(木) 17:50:09早速試してみます。
0810デフォルトの名無しさん
2005/12/29(木) 18:24:21wishのパスは確かに
aquaのwishに通ってるのになぜかXがつかわれますorz
0811デフォルトの名無しさん
2005/12/30(金) 04:07:030812デフォルトの名無しさん
2005/12/30(金) 04:08:250813本田
2006/01/05(木) 21:42:09> いちいちX起動するのが面倒なのと、ヤッパリ見た目はaquaがいいので
TkZincもクールだと思わない？
http://www.tkzinc.org/index.php?n=Main.Screenshots
http://www.tkzinc.org/
0814デフォルトの名無しさん
2006/01/06(金) 22:42:250815デフォルトの名無しさん
2006/01/11(水) 18:49:09どれを使うといいでしょう？
普通に(？)ftp command 等との対話処理をやらせようとすると、Win 上では
つまずきそうな気がするのですけど…。
0816デフォルトの名無しさん
2006/01/11(水) 22:19:350817デフォルトの名無しさん
2006/01/17(火) 17:36:05今早急に知りたい情報なのでお願いします
Tck/tkのicon以外に使用したいiconがないので
オリジナルのiconを作成したいのですが可能でしょうか？
また可能ならば、どのような方法で作成、変換を行うのでしょうか？
0818デフォルトの名無しさん
2006/01/17(火) 21:31:200819デフォルトの名無しさん
2006/01/18(水) 16:38:57xbm(モノクロ),gif(カラー)を扱えるソフトで作成する。
＜モノクロ＞
image create bitmap abc -file abc.xbm
button .b0 -image abc -command bell
pack .b0
＜カラー＞
image create photo abc -file abc.gif
button .b0 -image abc -command bell
pack .b0
0820817
2006/01/20(金) 13:07:03返事が遅くなったけど・・・
ありがとうございます、無事表示することができました。
0821デフォルトの名無しさん
2006/01/20(金) 20:23:560822本田
2006/01/20(金) 21:21:19> ええっ解決したの。819の読解力恐るべし。
ほんまにね。
0823デフォルトの名無しさん
2006/01/21(土) 22:14:16この言語は非常にマイナーなの？便利で簡単そうなのに………
0824デフォルトの名無しさん
2006/01/21(土) 22:43:130825本田
2006/01/21(土) 22:49:09>Practical Programming in Tcl and Tk
>Brent B. Welch (著), Jeffrey Hobbs (著)
># 言語：英語
># ハードカバー: 1000 p ; サイズ(cm):
># 出版社: Prentice Hall ; ISBN: 0130385603 ; 4th Bk&Cdr 版 (2003/06/10)
># その他のエディション： ペーパーバック
http://www.amazon.co.jp/exec/obidos/ASIN/0130385603/qid=1137851228/sr=1-2/ref=sr_1_10_2/503-6442506-3493513
0826デフォルトの名無しさん
2006/01/22(日) 18:12:40大抵のことはいまいさんのサイトとうらのさんのサイトで間に合うからいいんだけども。
0827デフォルトの名無しさん
2006/01/23(月) 02:01:56(大きなのってマルチスレッド正式対応くらいか)
それこそいまさんやうらのさんの8.4/8.5レポートで十分だ
9.0の話はたまにTclWikiのぞけば済むし
＃で、おれの知る限り和書洋書含め最近のバージョンの書籍はでてないとおもう
0828デフォルトの名無しさん
2006/02/06(月) 11:00:42menu .mf; .mf add command -label {閉じる(C)} -underline 4 -command onClose
menu .m; .m add cascade -label {ファイル(F)} -underline 5 -menu .mf
とかしてAlt+F→CとかしてもonCloseを実行してくれないんですが、
-label {C:閉じる} -underline 0 だとやってくれるみたいです。
なぜか最上段のメニュー(ファイル(F))はAlt+Fでできるんですけど。
linux版8.4.9だと無問題なのに。
0829デフォルトの名無しさん
2006/02/12(日) 02:01:25tcl/tkのテキストボックスに日本語が入力できなくて困っています。
Ctrl+Spaceを押すとscimは立ち上がって日本語入力モードに切り替わりますが
キーボードを打つと英語しか入力することができません。
キーボード中もずっとscimは日本語入力モードのままです。
何か良い解決策はないでしょうか？
0830デフォルトの名無しさん
2006/02/12(日) 02:25:02tcl/tk：8.4.9
scim：1.4.2
anthy：6700b
scim-anthy:0.7.1
今わかったことですが、ctrl-spaceでscim起動後に
半角/全角などを押しても何も反応がありません。
ショートカットキーの設定を見直してみます。
0831デフォルトの名無しさん
2006/02/12(日) 11:15:23scimではできません。
0832デフォルトの名無しさん
2006/02/21(火) 13:15:440833デフォルトの名無しさん
2006/02/21(火) 16:22:510834デフォルトの名無しさん
2006/03/01(水) 19:46:240835デフォルトの名無しさん
2006/03/02(木) 01:14:25exprにrand関数がある。
0836デフォルトの名無しさん
2006/03/02(木) 23:36:05ありがとうございます！
0837デフォルトの名無しさん
2006/03/32(土) 07:20:040838デフォルトの名無しさん
2006/04/13(木) 08:07:590839本田
2006/04/14(金) 01:07:01> 春くらいに8.5出るって言ってたのにまだでないの？
8.5a4ならある。
8.4.13RC1も。
0840本田
2006/04/21(金) 09:40:46> Download Tcl/Tk 8.4.13
http://www.tcl.tk/
0841本田
2006/04/28(金) 17:20:00>ActiveTcl 8.5.0.0 Beta 5 Apr, 2006
http://www.tcl.tk/
0842デフォルトの名無しさん
2006/04/28(金) 23:38:390843デフォルトの名無しさん
2006/05/03(水) 21:58:42おいて、データが配列の場合はどうするんでしょうか？
% .c0 create polygon 10 60 60 10 110 60 85 150 35 150
想像では、こんな風に描く際は可変引数に
なっているので、いったん、文字列として
出力して、それをevalで評価するんじゃないかと
思っています。でも、それをどうプログラミング
していいのか、わかりません。
0844デフォルトの名無しさん
2006/05/03(水) 22:09:38簡単なような。
0845デフォルトの名無しさん
2006/05/04(木) 10:11:57pack [canvas .c]
set data [list 10 60 60 10 110 60 85 150 35 150]
.c create polygon $data -fill black
polygonはリストを可変引数として渡さなくても、
そのままリストで渡しても描画できるよ。
0846デフォルトの名無しさん
2006/05/16(火) 22:12:20他のGUIキットに比べてかなりいけてると思うんだけどどうかな。
0847デフォルトの名無しさん
2006/05/24(水) 20:27:45サンプルプログラムのmenu1.tclを、付属のCD上から実行するとちゃんと起動するのですが
一度HDDにコピーしたものを実行しても
error reading bitmap file "icon\cut.xbm"
(processing "-bitmap" option)
invoke from within
"$sub2 add command -bitmap @icon/cut.xbm -background orchid -foreground cyan \
-activebackground cyan -activeforeground orchid -command {bell}"
(file "C:\Tcl\menu1.tcl" line39)
というエラーが出てしまいます。
アイコンが読み込めないから実行できないらしいことはわかるのですが
何がいけないのでしょうか？
ソースは↓です。
ttp://bebe.run.buttobi.net/up/src/be_1968.txt
0848847
2006/05/24(水) 20:31:54本を見ながら打ち込んでいって、どこも間違えていないのに実行できないので、
サンプル自体をコピーして試してもだめだったので質問しました。
お暇でしたら回答よろしくお願いします。
0849デフォルトの名無しさん
2006/05/24(水) 21:01:45その中にcut.xbmとかのビットマップ画像が無いのでは。
0850デフォルトの名無しさん
2006/05/24(水) 21:43:31bmp画像の拡張子をxbmに変えても駄目ですよ（これは私のケースですがｗ）
0851デフォルトの名無しさん
2006/05/24(水) 21:47:318.4.12まではSCIMはダメだが、8.4.13で直った。
SCIMでもちゃんと入力できる。
ちなみにうちの環境はFedora Core 5。
tclとtkのパッケージだけFedora Core 6の開発用リポジトリから
取ってきてアップグレードしてそれで問題無し(今のところ)。
0852デフォルトの名無しさん
2006/05/24(水) 21:56:25掲示板も設置されていますよ。
0853847
2006/05/24(水) 23:21:05環境を書いていませんでした、WindowsXPで、Tcl/Tkはver8.4.7を使っていました。
前に作ったxbmファイルを名前をcut等に変えて、同一フォルダに入れて試してみましたが、
やはり同じエラーになります。
8.4.7を削除して8.4.13にしてから試しても同じでした。
なぜかCDからそのままダブルクリックで起動するとちゃんとアイコンも表示されるのですが、
C:\Tclフォルダの中には*.xbmで検索しても見つかりませんでした。
もう一度探してみます。
>>852
ビットウォークで検索すればよかったんですね、ちゃんと行けました。
須栗歩人さんの名前で検索したのですが、そっちはリンク切れだったのでだめだと思ってました。
ありがとうございます。
長文失礼しました。
0854847
2006/05/24(水) 23:33:16ちゃんと起動することができました。
CDには元々iconフォルダがあったから起動できたようです。
つまらないことでお騒がせしてすみませんでした。
0855デフォルトの名無しさん
2006/06/23(金) 22:03:18Javaアプレットも廃れた時代に誰が使うのか良く分からないが。。
0856デフォルトの名無しさん
2006/06/24(土) 00:00:330857デフォルトの名無しさん
2006/06/29(木) 16:05:160858デフォルトの名無しさん
2006/06/29(木) 20:34:040859デフォルトの名無しさん
2006/06/30(金) 16:18:49FC2にある。
0860デフォルトの名無しさん
2006/07/01(土) 13:58:54にがしがしく見てた。つか、業者死ね。
0861デフォルトの名無しさん
2006/07/18(火) 18:25:580862デフォルトの名無しさん
2006/07/25(火) 17:09:08ブログはなんか、別の路線を走ってるし…。
もう新しい本は出ないのかな。
0863デフォルトの名無しさん
2006/08/12(土) 07:47:08もう、本人にやる気がないようだからダメだね。
別のところではずいぶん、浮名を流してるようだけど。
0864デフォルトの名無しさん
2006/08/12(土) 11:54:080865デフォルトの名無しさん
2006/08/12(土) 13:31:020866デフォルトの名無しさん
2006/08/13(日) 01:20:361. Tcl/Tk と IPC で通信
2. Tcl インタプリタを埋め込んで、Tcl 経由で Tk
3. 直接 Tk バインディングを作る (Perl/Tk とか)
だと考えています。2. と 3. はそんなに性能かわらない
気がしてきたんですが、どうですかね？
0867デフォルトの名無しさん
2006/08/13(日) 02:36:08どうって言われても3は大変だよ。茨の道だよ。
0868デフォルトの名無しさん
2006/08/14(月) 06:25:25古本で付属CDROMがなくてもかまいません。
詳解 Tcl/Tk GUIプログラミング (秀和システム)
Tcl/Tk入門 第2版 (ピアソン)
0869デフォルトの名無しさん
2006/08/19(土) 09:20:53Tcl/Tk入門 第2版は昨日はLibro某店にあった。
近所にLibroがあって、店頭在庫が無いなら、店舗間取り寄せできないか相談してみれば？
0870デフォルトの名無しさん
2006/08/29(火) 12:25:22env LANG=C date +'%d %b %Y %H:%M:%S'
に相当することを、Tcl 8.4系で行うことは可能でしょうか。
8.5系では
clock format [clock seconds] -format "%d %b %Y %H:%M:%S" -locale en
と書けるようですが…。
日本語ロケール下で実行すると、"%b" が "8月" のように出力されるのですが、Tclスクリプトの特定部分でだけ、実行環境のロケール非依存的に "Aug" の出力が必要なのです。
0871デフォルトの名無しさん
2006/08/31(木) 00:22:52set env(LANG) C
clock format [clock seconds]
みたいな。特定の部分でだけロケールを変えて出力するオプションは無いから
自分でフォーマットする関数を書くなりして工夫してやるしかないよ。
0872デフォルトの名無しさん
2006/09/04(月) 21:24:11ありがとうございました。
LANGの切り替えで対応します。
0873デフォルトの名無しさん
2006/09/06(水) 17:35:07expectで。
0874LK
2006/10/02(月) 21:57:57FMつきのTVカードを使ってますがエラーがでます。
button .b2 -text radio -command "exec radio -qf 85.1"
この.b2ボタンを押すと85.1MHzになって音が出ましたがエラーメッセージがでます。
tuned 85.10 MHz
tuned 85.10 MHz
while executing
"exec radio -qf 85.1"
invoked from within
".b2 invoke"
("uplevel" body line 1)
invoked from within
"uplevel #0 [list $w invoke]"
(procedure "tk::ButtonUp" line 22)
invoked from within
"tk::ButtonUp .b2"
(command bound to event)
このエラーはどうやって回避できるでしょうか?
0875本田
2006/10/02(月) 22:52:49radioをフルパスで指定すればいいかも？！
0876デフォルトの名無しさん
2006/10/02(月) 22:55:240877デフォルトの名無しさん
2006/10/02(月) 23:42:30catch {exec radio -qf 85.1}
0878LK
2006/10/03(火) 10:58:04フルパスでも同じエラーです。
>>877さん
button .b2 -text radio -command catch {exec radio -qf 85.1}
に変更して実行したらTcl/Tkのエラーがでました。
Error in startup script: unknown option "exec radio -qf 85.1"
while executing
"button .b2 -text radio -command catch {exec radio -qf 85.1}"
(file "./radio1" line 6)
0879LK
2006/10/03(火) 14:01:01button .b2 -text radio -command "exec radio -qf 85.1 >& text "
radioコマンドで出るメッセージ tuned 82.40 MHzが悪さをしてたようです。
2> textでもいいみたいです。
0880デフォルトの名無しさん
2006/10/03(火) 14:41:29>button .b2 -text radio -command catch {exec radio -qf 85.1}
ちょｗマテｗｗｗｗｗｗｗｗｗこうするんだよｗｗｗ
button .b2 -text radio -command {catch {exec radio -qf 85.1}}
0881LK
2006/10/03(火) 16:19:50なるほど、catch使う方がよさそうですねえ。
有難うございました。
Tcl/Tkって簡単に作れるんで便利ですね。これからもっと使って勉強します。
0882デフォルトの名無しさん
2006/10/14(土) 08:01:180883デフォルトの名無しさん
2006/10/16(月) 12:23:32ヘルプ（解説文）をポップアップウインドウとして表示するには、どうしたらいいんでしょうか？
0884デフォルトの名無しさん
2006/10/16(月) 21:08:13package require tooltip
pack [label .l -text "label"]
tooltip::tooltip .l "This is a label widget"
0885デフォルトの名無しさん
2006/10/17(火) 06:21:52rubyで、なんかアドバイスというか、いい本教えてください
ちなみにTKって小室のことって言うくらいの初心者です
0886デフォルトの名無しさん
2006/10/17(火) 06:22:260887デフォルトの名無しさん
2006/10/17(火) 07:37:590888デフォルトの名無しさん
2006/10/27(金) 12:46:300889デフォルトの名無しさん
2006/10/31(火) 23:29:27BLTなどの外部パッケージを利用してもクリップボード経由で、これだと窓が重なっている
部分は切れてしまいます。
たとえばそのピクセルの色情報を取得して各グラフィック形式に保存とかできますか？
（何か、可能だとしてもすごく遅いような気がしますが）
psやepsから変換するしかやはりしようがありませんかね。
0890デフォルトの名無しさん
2006/11/01(水) 12:29:42窓が重なってるところが切れるというのがよくわからんけど
Imgじゃダメなの？
0891889
2006/11/01(水) 15:10:46# the next line restarts using wish \
exec wish "$0" "$@"
package require BLT
wm title . "main"
toplevel .view
wm title .view "view"
set imgf "imagefile"
image create photo $imgf -width 200 -height 200
proc ::snapWindow {w} {
global imgf
blt::winop snap $w $imgf
return
}
proc saveSnapimage {w} {
global imgf
snapWindow $w
$imgf write $imgf.gif -format gif
return
}
pack [canvas .view.can -width 200 -height 200] -expand yes -fill both
pack [button .but1 -text "Save" -width 10 -command {saveSnapimage .view.can}] -side left
pack [button .but2 -text "Quit" -width 10 -command {exit}] -side left
.view.can configure -background "#808000"
.view.can create line 10 10 190 190 -fill "#FF0080" -width 2
0892889
2006/11/01(水) 15:14:45保存するものです。
上のようなスクリプトだと親のmainウィンドウを子のviewウインドウ
の上で保存するとmainウィンドウもキャプチャーされてしまいます。
こういうことを起こさないでCanvasの画像をps以外で保存できないかと
思ったのです。
BLTだとキャプチャーなのでいたし方ないのですが。
ところでimgパッケージにそんな機能ありましたっけ？調べてみますが。
ありがとう。
0893デフォルトの名無しさん
2006/11/01(水) 21:39:530894デフォルトの名無しさん
2006/11/02(木) 11:34:43どうよ。
0895デフォルトの名無しさん
2006/11/04(土) 04:48:200896デフォルトの名無しさん
2006/11/04(土) 16:04:16拡張を仕立て上げればなんとかなるかも・・・。
0897本田
2006/11/13(月) 00:13:18http://www.tcl.tk/
0898デフォルトの名無しさん
2006/11/13(月) 23:49:470899デフォルトの名無しさん
2006/11/15(水) 20:10:010900デフォルトの名無しさん
2006/11/29(水) 22:45:430901デフォルトの名無しさん
2006/11/30(木) 00:06:030902デフォルトの名無しさん
2006/12/21(木) 21:55:450903デフォルトの名無しさん
2006/12/21(木) 22:05:07tileっつってんだろうが。
0904デフォルトの名無しさん
2006/12/23(土) 23:12:12別に変じゃないけど。
0905デフォルトの名無しさん
2006/12/24(日) 00:07:500906デフォルトの名無しさん
2006/12/26(火) 19:59:38見た目が同じになれば何でもいいんじゃね！
0907デフォルトの名無しさん
2006/12/27(水) 08:23:12Fの下にアンダーラインがつき、"F"キーが割り当てられるのですが、
この表示と割当てを別のキーにすることは可能でしょうか？
0908デフォルトの名無しさん
2006/12/27(水) 18:10:32menu .menu.file
. configure -menu .menu
.menu add cascade -label File -underline 1 -menu .menu.file
つってんだろうが
0909デフォルトの名無しさん
2006/12/27(水) 23:19:08まあTCLなんかを一所懸命やってる時点で・・・
0910デフォルトの名無しさん
2006/12/28(木) 04:21:32あなたも中々うざいですね。
0911デフォルトの名無しさん
2007/01/11(木) 07:59:35あけおめ。
0912デフォルトの名無しさん
2007/01/11(木) 08:59:340913デフォルトの名無しさん
2007/01/11(木) 19:57:500914デフォルトの名無しさん
2007/01/11(木) 20:09:14もう飽きた
0915デフォルトの名無しさん
2007/01/11(木) 23:10:27tcl/tkの話しろよ
0916デフォルトの名無しさん
2007/01/12(金) 05:36:31Tcl8.5ではmsgカタログに日本語が追加されていて、clock formatで
和風な時刻表示をすることができるって知ってた？
% clock format [clock seconds] -format %Ec -locale ja
金曜日 平成二十年1月十二日五時卅二分三十秒 +0900
みたいな。
0917デフォルトの名無しさん
2007/01/12(金) 08:20:12>>870の人？
0918デフォルトの名無しさん
2007/01/12(金) 09:30:03>>916ではありません。
その並びじゃあEcとは言えないな。日本語では先に曜日は言わないでしょ。
GNUのdateコマンドだと、こんな感じ。
$ date +%Ec
平成19年01月12日 09時23分51秒
0919デフォルトの名無しさん
2007/01/12(金) 13:58:280920デフォルトの名無しさん
2007/01/12(金) 14:12:15$LC_ALL=ja date +%Ec
平成19年01月12日 (金) 14時11分44秒
0921デフォルトの名無しさん
2007/01/12(金) 14:27:38バグだろコレ・・・なんとかしろよ・・・
0922デフォルトの名無しさん
2007/01/13(土) 03:21:30平成19年01月13日 (土) 03時12分48秒 +0900
% clock format [clock sec] -locale ja -format %Ex
平成19年01月13日
% clock format [clock sec] -locale ja -format %EX
03時14分27秒
改元日は
明治 1968-01-25
大正 1912-07-30
昭和 1926-12-25
平成 1989-01-08
こういう風に直したけど、誰も異論がなけば修正したの送っちゃうよ？
0923デフォルトの名無しさん
2007/01/14(日) 12:16:02明治の改元日はTYPO ?
0924デフォルトの名無しさん
2007/01/14(日) 14:32:560925デフォルトの名無しさん
2007/01/14(日) 14:37:11ja.msgもここに置いておきます。
http://chun.s11.xrea.com/up/img/087.zip
0926デフォルトの名無しさん
2007/01/14(日) 16:00:450927デフォルトの名無しさん
2007/01/15(月) 15:42:42日付のずれがあるはずなんだけど、
WikiPediaの記述ってその辺大丈夫?
0928デフォルトの名無しさん
2007/01/15(月) 17:18:161868-01-25 明治1年01月01日 暦上の改元日
1868-10-23 明治1年09月08日 歴史上明治に改元した日
1872-12-31 明治5年12月02日 旧暦を廃止した日
1873-01-01 明治6年1月01日 グレゴリオ暦を採用
ややこしいな・・・。1868-01-25は明治1年1月25日にはならないということか。
じゃあ明治は1873-01-01の明治6年1月1日スタートでいいのか。
0929デフォルトの名無しさん
2007/01/15(月) 17:28:37http://chun.s11.xrea.com/up/img/088.zip
0930本田
2007/01/27(土) 22:16:11> The result is a rich development environment in which to develop Ajax-based web applications,
> often with much less code to write.
http://aejaks.sourceforge.net/Aejaks_Home/index.html
0931デフォルトの名無しさん
2007/02/05(月) 20:50:19スクリプトの中で何を行っているのか隠蔽したいと思っています。
可能でしょうか？
0932デフォルトの名無しさん
2007/02/05(月) 22:06:040933デフォルトの名無しさん
2007/02/06(火) 00:01:57tclcompilerでバイトコード化してtbcloadで読み込む。
0934デフォルトの名無しさん
2007/02/07(水) 06:10:040935デフォルトの名無しさん
2007/02/07(水) 11:29:580936本田
2007/02/08(木) 20:26:40Komodo IDE
http://www.tcl.tk/
0937デフォルトの名無しさん
2007/02/09(金) 01:36:37http://www.xdobry.de/xotclIDE/
maji osusume!
0938本田
2007/02/11(日) 13:21:08>EclispeDLTK is an Eclipse plugin for dynamic languages.
> Currently Tcl and Python are supported.
http://wiki.tcl.tk/17262
0939本田
2007/02/11(日) 13:57:57http://tcltk.web.fc2.com/index.html
>ビットウォークの日記帳
http://blog33.fc2.com/bitwalk/
0940デフォルトの名無しさん
2007/02/14(水) 05:17:00perlで言う__FILE__みたいな
0941デフォルトの名無しさん
2007/02/14(水) 06:58:100942デフォルトの名無しさん
2007/02/14(水) 20:53:27例えばc:/tcl/src/test.tclとかを期待しています。
0943デフォルトの名無しさん
2007/02/14(水) 21:20:10C:\>type tryme.tcl
puts $argv0
C:\>tclsh tryme.tcl
tryme.tcl
0944デフォルトの名無しさん
2007/02/14(水) 22:33:52ということはこういうのは無理なんですね
c:\> dir
libdir main.tcl
c:\> dir libdir
lib.tcl lib.tcl-dat
c:\> type main.tcl
source libdir/lib.tcl
c:\> type libdir/lib.tcl
open "${argv0}-dat"
c:\> tclsh main.tcl
fileid1
0945デフォルトの名無しさん
2007/02/14(水) 23:46:390946デフォルトの名無しさん
2007/02/15(木) 00:03:290947デフォルトの名無しさん
2007/02/15(木) 00:10:000948デフォルトの名無しさん
2007/02/15(木) 12:31:350949デフォルトの名無しさん
2007/02/15(木) 19:50:27フォルダを判定してインストールフォルダのデータを読みたいのです。
"${argv0}-dat"－＞lib.tcl-dat となって無事ファイルを開きたいのですが、
実際は、"${argv0}-dat"－＞main.tcl-datとなりファイルハンドルを得ることは出来ません。
0950デフォルトの名無しさん
2007/02/15(木) 20:02:58libdir/lib.tcl-dat の誤りです。
0951デフォルトの名無しさん
2007/02/15(木) 20:48:440952デフォルトの名無しさん
2007/02/15(木) 21:15:100953デフォルトの名無しさん
2007/02/15(木) 22:17:29解決しました。有難うございます。
0954デフォルトの名無しさん
2007/02/23(金) 00:01:250955デフォルトの名無しさん
2007/02/23(金) 07:49:060956デフォルトの名無しさん
2007/02/23(金) 16:10:35perlにはtclを通してtkにアクセスできるTkxがあるんだからそれ使えよ・・・
0957デフォルトの名無しさん
2007/02/25(日) 01:26:440958デフォルトの名無しさん
2007/02/25(日) 07:44:33独自発展してるのだと思ってた。
0959デフォルトの名無しさん
2007/03/09(金) 21:33:11で、追加するバッファを選択することは出来ませんか？
UNIX上で、CLIPBOARDとPRIMARYを使い分けたいんですけども。
0960デフォルトの名無しさん
2007/03/09(金) 23:51:45なんかできそうだぞ。
0961デフォルトの名無しさん
2007/03/10(土) 00:25:47EclipseDLTKはEclipseをPythonやRuby、Tclなどのほかの動的言語にも拡張すると発表した。
0962デフォルトの名無しさん
2007/03/10(土) 00:38:07動画が全然落ちてこねえ
0963デフォルトの名無しさん
2007/03/10(土) 13:39:21返答ありがとうございます。
確かに
selection get -selection xxx
でバッファを CLIPBOARDとPRIMARY で選択できますが
selectionは文字列を選択した場合ですよね。
やりたいことは、内部で持ってる変数をクリップボードに入れたいんです。
こんな変なこと普通やらないからサポートしてないのかなぁ
0964デフォルトの名無しさん
2007/03/11(日) 04:49:49移行しないの？なんかTCLって文法気持ち悪いんすけど
0965デフォルトの名無しさん
2007/03/11(日) 08:26:540966デフォルトの名無しさん
2007/03/12(月) 14:05:24Ruby/Tk も Python の tkinter も使ったが Tcl/Tk 程には楽じゃない
0967デフォルトの名無しさん
2007/03/12(月) 20:04:33pack slaves パス
grid slaves パス
を一編にやってくれるコマンドってありますか？
例えば
geometry slaves パス
ってすると上三行と同義になるようなやつです
0968デフォルトの名無しさん
2007/03/12(月) 22:38:18plase slaves $パス
pack slaves $パス
grid slaves $パス
}
0970デフォルトの名無しさん
2007/03/14(水) 00:31:19できますか?
自分でWin32APIを操作する拡張コマンド作るしかないんですかねぇ...
0971デフォルトの名無しさん
2007/03/21(水) 10:36:20[file volumes]ではダメなの？
そんなことより8.5の目玉のはずのoo拡張がなくなりそうな件について。。。
0972デフォルトの名無しさん
2007/03/21(水) 11:15:240973デフォルトの名無しさん
2007/03/21(水) 16:43:25xotcl、itcl、snitがあればooはいらない。
0974デフォルトの名無しさん
2007/04/02(月) 15:02:38すごく楽しいなあこれ
0975デフォルトの名無しさん
2007/04/05(木) 03:11:230976デフォルトの名無しさん
2007/04/06(金) 01:18:57コレってPerlやRubyみたいに
Winのバッチファイルに埋め込める？
出来ないなら素直にbatとtcl分離するけどさ
0977デフォルトの名無しさん
2007/04/06(金) 02:08:11こういうこと？
0978デフォルトの名無しさん
2007/04/06(金) 07:58:16それともこういうことか
0979976
2007/04/06(金) 23:56:22まさにコレです！感謝感激！
0980デフォルトの名無しさん
2007/04/20(金) 21:51:380981デフォルトの名無しさん
2007/04/21(土) 20:45:14ソースに #Include "tcl.h" を入れてビルドしたところ、以下のエラーが出ました。
c:\tcl\include\tkintxlibdecls.h(356) : error C2955: 'list' : ｸﾗｽのﾃﾝﾌﾟﾚｰﾄ名で仮引数ﾘｽﾄの指定がありません。
c:\program files\microsoft visual studio\vc98\include\list(415) : 'list' の宣言を確認してください。
回避方法ありませんか？？
0982デフォルトの名無しさん
2007/04/21(土) 22:03:37なんでtclの事しか書いてないのにtkのソースでエラー出してんだ？
書いてないけどtk.hもインクルードしてんだろ？
あと、書いてないけどエラー内容もこれだけじゃないだろ。
とりあえず簡単なテストプログラムからやれよ。な。
0983デフォルトの名無しさん
2007/04/22(日) 02:38:06とりあえずその後の報告
ActiveTclのヘッダファイル TkIntXlibDecls.h にて
/* 103 */
EXTERN Status XStringListToTextProperty _ANSI_ARGS_((char** list,
int count, XTextProperty* text_prop_return));
引数に使用している変数名"list"がC++のlistとぶつかっていました。
0984デフォルトの名無しさん
2007/04/22(日) 04:15:27おいおい VC6でやろうとしてるってことはWindows用だろ?
> TkIntXlibDecls.h
なんでこんなのを取り込む必要があるんだ?
なんか手順に見落としてることはないかい?
0985デフォルトの名無しさん
2007/04/22(日) 14:03:550986デフォルトの名無しさん
2007/04/22(日) 21:44:08レス数が950を超えています。1000を超えると書き込みができなくなります。