トップページ⇒tech
981コメント378KB

●●●●TCL/TKなら俺に聞け 2●●●●

■ このスレッドは過去ログ倉庫に格納されています
0001デフォルトの名無しさん2007/05/01(火) 14:52:44
【英語サイト】
プロジェクト本拠地
http://tcl.sourceforge.net/
最新版ソースコード
ftp://ftp.tcl.tk/pub/tcl/nightly-cvs/
The Tcler's Wiki
http://wiki.tcl.tk/
The comp.lang.tcl Newsgroup
http://groups.google.com/group/comp.lang.tcl/
ActiveTcl
http://www.activestate.com/products/activetcl/

【日本語サイト】
もっとTcl/Tk
http://www.interq.or.jp/japan/s-imai/tcltk/
Tcl/Tk Scripting Laboratory
http://www.geocities.jp/urano343/tcltk.html
Tcl/Tk Primer
http://mibai.tec.u-ryukyu.ac.jp/~oshiro/Doc/tcltk_primer/
Tcl 8.4.1　Manual Command Reference
http://www.freesoftnet.co.jp/tclkits/doc/TclCmdRef/tcl_contents_jp.htm
CategoryTclTk - mynote
http://reddog.s35.xrea.com/wiki/CategoryTclTk.html

【前スレ】
●●●●TCL/TKなら俺に聞け●●●●
http://pc11.2ch.net/test/read.cgi/tech/1033628416/
03813792008/12/02(火) 23:32:57
>>380
レスありがとうございます。

getsにはそんな風に書くんですね。
channelIdってのが何を指してるのかサッパリでした。。

明日会社に行ってまた試してみます。
たまーに仕事用ツール作成でスクリプト書くんですが、
諸事情あって今回はTclにで書いていて。。
0382デフォルトの名無しさん2008/12/04(木) 00:53:01
scan $str "%s,%s,%s,%s" a b c d
とかもあるよ。scanfみたいなの。
また正規表現を使った読み込みとか便利
set fp [open $fname]
gets $fp str
regexp {\[\s*\s*\]\s*(\w+)} $str d1 d2とかね

以下が改行取って読み込みとか
set fp [open $fname];gets $fp str
foreach i [split $str "\n"] {

}
以下とかするとバイナリファイルも開けるよ
set fp [open $fname]
fconfigure $fp -translation binary
binary scan [read $fp 1000] H* str
0383デフォルトの名無しさん2008/12/04(木) 22:00:38
binary scanとbinary formatの使い方をすぐ忘れちゃうのは秘密だ
0384デフォルトの名無しさん2008/12/04(木) 22:04:45
>>375
Tcl/Tkデスクトップリファレンスには超おせわになった。
あとEffective Tcl/Tk。この２冊はTcl/Tk修行時代の
10年位前にかなり読んだ。
0385デフォルトの名無しさん2008/12/10(水) 21:58:58
Tcl初心者です。すみません、教えて下さい。

ビルトインコマンドにラッパーをかける事は
できるのでしょうか。

例えば

proc wrapper {cmd} {
catch {eval {$cmd}} status
puts "$cmd , $status"
}
:
alias expr {wrapper expr}
:
expr {1+1} ;# wrapper {expr {1+1}} -> expr {1+1} ,0

的な感じです。
0386デフォルトの名無しさん2008/12/11(木) 22:04:10
>>385
これじゃ無限ループになるだろ。exprはrenameして新たにラッパーのexprを定義すれば？
0387デフォルトの名無しさん2008/12/17(水) 17:04:55
>312
>BrowseX for Windows使ってた人いない？

Hv3というtkhtmlベースのブラウザならある。
http://tkhtml.tcl.tk/hv3.html
0388デフォルトの名無しさん2008/12/19(金) 21:06:51
Dr. OusterhoutがTclコアチームから抜ける。
http://groups.google.com/group/comp.lang.tcl/browse_thread/thread/99e2693293b3c945/e54399b0a7dd8ec1?show_docid=e54399b0a7dd8ec1&pli=1
0389デフォルトの名無しさん2008/12/22(月) 21:53:03
プログラムから逃げてきたのに卒論で無理やりやらされてる
Cで作ったexeファイルをtcl/tkで作ったGUI上で実行したりできるの？

ていうかこんなことも分からない感じで死にそう･･･
0390デフォルトの名無しさん2008/12/22(月) 23:27:50
>>388
そしてその翌日itclのコア組み込みが決定したのであった・・・！

>>389
CでCUIのexe作って、Tcl/Tkでガワ作って、パイプで接続とか。
まあどんなことがやりたいかによる。CでDLL作って、それをTcl/Tk
から使うほうが楽かもしれない。
0391デフォルトの名無しさん2008/12/23(火) 00:07:48
>>389
unixだと楽だが、windowsだと面倒。
0392デフォルトの名無しさん2008/12/23(火) 11:28:21
え、incr Tcl？
正直オブジェクト指向を入れるなら参照とガベコレの概念を入れる前提で
デザインしなおしたほうがいいのに･･･
（逆に言うとこの2つを入れればオブジェクト指向はこれまでどおり拡張でいいし）
オブジェクト手動開放とか今日日ありえないっすよ。
0393デフォルトの名無しさん2008/12/23(火) 11:40:20
>>391
んなこたーない。
execで実行するだけ。
so, dllも同じソースで簡単に作れるし(windowsはmingwのgcc使ってるけど)
0394デフォルトの名無しさん2008/12/23(火) 19:53:07
いやwindowsは苦労するよ。
pathや引数周りに落とし穴がいっぱいある。

MSが早くcygnusを買収してくれればいいのに。
0395デフォルトの名無しさん2008/12/23(火) 20:02:39
>>394
落とし穴ってなに
0396デフォルトの名無しさん2008/12/23(火) 23:13:52
path周りの避け方はマニュアルに書いてあるだろ。
で、なんでcygnusが出てくるんだ？
もはやTclはcygwinをサポートしてないぞ。
素直にActive TclをインストールしてCはMinGW使えばいい。
0397デフォルトの名無しさん2008/12/23(火) 23:38:12
8.6b1きたあああああ！！！
try 〜 throwきたあああ！！！
zlibきたあああ！！！
ttk::spinboxきたあああ！！！
tk fontchooserきたああああ！！！
Canvasの回転文字きたああああ！！！
ttkのvistaテーマきたあああ！！！
0398デフォルトの名無しさん2009/01/06(火) 12:23:24
今M1だが、修論でtcl使うはめになってubuntuの起動から勉強してるところなんだけど、
tclでパラレルポートからの入力って使える？
その辺含んだお勧めの書籍なんかあれば知りたい。
0399デフォルトの名無しさん2009/01/06(火) 21:25:39
http://wiki.tcl.tk/2816
まずは適当に検索してみればいいとおもうの。
0400本田2009/01/08(木) 21:18:47
AC3Dマニュアル
http://panda.ecs.cst.nihon-u.ac.jp/~hiroshi/ac3d/ac3dmanj.html
1998年11月6日更新 - AC3Dバージョン2以降に対応

AC3D
http://mail2.nara-edu.ac.jp/~asait/graphics/ac3d/ac3d.htm
>3 次元模型 (モデル) を作るためのソフトはモデラーと呼ばれています。
> AC3D はそのモデラーの一つで、随分人気があるようです。
> AC3D は今では商用ソフトになってしまいました。

Shareware Version.
http://locgate.smtn.stavropol.ru/DOCs/Programming/OpenGL/ac3dwinsw2.zip
古いけどTcl/Tkスクリプト使用して参考になる。

最新版。
http://www.inivis.com/
0401本田2009/01/09(金) 21:21:13
These are some sample files for the 3D modeller - AC3D
ftp://ftp.uni-duisburg.de/CAD/AC3D/acfiles.tgz

AC3D Manual(Updated 11th March 1999 - Covers AC3D Version 2 onwards)
ftp://ftp.uni-duisburg.de/CAD/AC3D/ac3dman.zip
ftp://ftp.uni-duisburg.de/CAD/AC3D/ac3dman.tgz

AC3D Manual Ver. 3.4.1
ftp://ftp.uni-duisburg.de/CAD/AC3D/ac3dman.pdf

http://locgate.smtn.stavropol.ru/DOCs/Programming/OpenGL/ac3dwinsw2.zip
に付属のGLU32.DLLとOPENGL32.DLLは、おそらくWindows95用でしょう。

Windows95以降に発売されたWindowsには、
GLU32.DLLとOPENGL32.DLLが付属してるとはずなので、
Windows95以降に発売されたWindowsをお使いの場合は、
AC3D v.2.0付属のGLU32.DLLとOPENGL32.DLLを削除したほうが、
AC3D v.2.0の安定性や速度が改善される可能性があります。
0402デフォルトの名無しさん2009/01/13(火) 00:08:38
すみません質問させて下さい。
以下のコードのように、プロシージャfooを作っておいて
複数のボタンをpackする作業をまとめたいと考えています。

proc foo {w msg} {
pack [button $w.$msg -text $msg -command {puts $msg}]
}

pack [frame .f]
foo .f "b1"
foo .f "b2"

ところがボタンを押してcommandを実行させると、
以下のエラーが出ます。
Error: can't read "msg": no such variable

ボタンを押したときにローカル変数msgを参照できていないということだと
思いますが、何か良い解決策はありませんか？
よろしくお願いします。
04034022009/01/13(火) 00:10:15
使用環境を書き忘れました。
WindowsXPでActiveTcl8.5.4.0.286921-win32-ix86-threaded.exe
をインストールして使っています。
0404デフォルトの名無しさん2009/01/13(火) 00:30:21
-command "puts $msg"
04054022009/01/13(火) 00:56:06
>>404
できました！
"と{との違いを調べてきます。
早速の回答ありがとうございます。
0406デフォルトの名無しさん2009/01/13(火) 12:59:47
>>402
{}の違いがポイントではなく、-command で指定するコマンドが関数の外で実行されることがポイントなのです。
msg変数は関数fooのローカル変数なので、関数の外で実行されるボタンのコマンドからは参照できません。
0407デフォルトの名無しさん2009/01/13(火) 21:28:04
>>404 ではないですが、もう少し補足しておきます
set msg AAA; pack [button .b -text PushMe -command "puts $msg"]
としておいて、ボタン.bを押すと当然、AAAとコンソールに表示されます。
続けて、set msg BBBとしてボタン.bを押してみて下さい。
コンソールにAAAと表示されますね？
これはどういうことかというと、
04084022009/01/14(水) 19:29:14
補足説明ありがとうございます！

>>407
ボタン.bを生成する時点で変数msgを"puts AAA"という文字列に
展開していたため、ですよね？

button配置は""で解決できましたが
今度は-textvarを使うウィジェット生成をまとめようとして壁にぶつかりました。
>>406, >>407のことから色々考えてevalを使ったら自己解決できました。

pack [entry .e1 -textvar a1] ;# ←この文をすっきりさせたい
pack [entry .e2 -textvar a2] ;# ←この文をすっきりさせたい
↓
proc foo {w var} { pack [eval entry $w -textvar $var] }
foo .e3 a3 ; foo .e4 a4

でも、C言語やPerlをよく使っている身としては、
ポインタを渡せれば良いのになあと、何だかもぞもぞした気分になりました。
0409デフォルトの名無しさん2009/01/14(水) 20:59:03
何をしたいかわかってないが、たぶんそのevalは不要
04104022009/01/14(水) 21:08:00
あら本当だ。。
「-textvar 変数名を表す文字列」だから
ウィジェット生成時にvarを文字列に展開してOKということでしょうか。
落ち着け>オレ
0411本田2009/01/14(水) 22:13:21
>>408
> でも、C言語やPerlをよく使っている身としては、
> ポインタを渡せれば良いのになあと、何だかもぞもぞした気分になりました。

C言語知ってるんなら、Tclのソースコードを読んだらいいのに、
Tcl8.0位がコンパクトで読みやすいし古すぎない。
04124022009/01/15(木) 01:47:16
>>411
うーん。。多分自分のC言語の実力程度ではソースを読んでも理解できなさそうな予感がします。
あと正直なところ、自分としてはあまりtcl/tkは好きになれず、あまり深入りしたくありません。。
（今はやむを得ぬ事情があって触っています。せめてperl/tkが使えれば良かったかもと思います）

tcl/tkならではの魅力があるのは分かるんですが（簡単にGUIを使えて複数のOSで動かせるとか）、
他の言語なら当たり前のようにできる記述方法ができなかったりすることが多いので
結構ストレスがたまってしまいます。
たとえば行末のコメントは、「# コメント」では駄目で「;# コメント」ならOKとか、
理由は分かっても不自由さがぬぐえません。

自分にもっと実力があればラッパーかプリプロセッサを自作したくなるだろうと思います。
上のコメントの例なら、ごく単純には sed 's/\/\//;#/g' すればストレスが減るかもしれません。

とか何とか愚痴をこぼしながらもtcl/tkの本を２冊買ってしまいました。
でも最新バージョンの便利そうなウィジェットの説明などはネットで調べた方が良さそうですね。
0413デフォルトの名無しさん2009/01/15(木) 07:35:43
Tcl/Tkの本がまだ２冊もあったか。
0414デフォルトの名無しさん2009/01/15(木) 10:27:13
CとリンクしやすいのでTclはメインにしてもよし、サブで使ってもよし。
文字列処理がやりやすいのでファイル入出力とGUIはTcl/Tk、その他はCとかでもいいし。
0415本田2009/01/21(水) 19:06:18
Ayam is a free 3D modelling environment for the RenderMan interface, distributed under the BSD licence.
http://ayam.sourceforge.net/
Ayam features at a glance:
* RIB (RenderMan Interface Bytestream) export and import.
* Support for NURBS curves and (trimmed) NURBS surfaces, Boxes, Quadrics (Sphere, Disk, Cylinder, Cone, Hyperboloid, Paraboloid, and Torus), CSG, MetaBalls, Patch Meshes, Polygonal Meshes, and Subdivision Surfaces.
* NURBS modelling includes approximating and interpolating curves as well as extrude, revolve, sweep, birail, skin and gordon objects with caps, holes, and bevels.
* Custom objects that may freely implement their representations (using OpenGL and RIB) and even small GUIs to edit their type specific parameters may be written by the user and dynamically loaded at runtime.
* Scripting interface: Tcl.
* Misc: instancing, arbitrary number of modeling views, object clipboard, independent property clipboard, console, n-level undo.
* File formats (r/w): RIB, DXF, 3DM, 3DMF, OBJ, X3D.

AC3Dは、ポリゴンモデラーだけど、Ayamは、NURBSもサポートしてます。
0416デフォルトの名無しさん2009/01/22(木) 19:17:56
Python/Tkでソースの間違いを見つけられないのですが、
探してもらってもいいですか？
0417デフォルトの名無しさん2009/01/23(金) 01:44:36
TCL/TKなら俺に聞け
Python/Tkなら他所で聞け
0418デフォルトの名無しさん2009/01/24(土) 01:56:00
>>417
座ぶとん１０枚！￣ー￣)ﾉ〜■
0419本田2009/02/01(日) 08:39:59
BRL-CAD
http://brlcad.org/
http://brlcad.org/wiki/Documentation
http://brlcad.org/wiki/Users_group_presentations
BRL-CAD's integration with TclTk
http://brlcad.org/w/images/3/3a/TclTk_Integration.pdf
BRL-CAD　スクリーンショット
http://www.cadcamcube.jp/brlcad2.html
0420本田2009/02/09(月) 18:37:46
>>419
ArcherとMGEDの２つのUIがあります。
Archerは、GUIを使います。
MGEDは、CUIで、
puts {Hello,World!}と入力すると、
Hello,World!とエコーします。
0421本田2009/02/09(月) 19:35:59
いま、欧米で一躍注目を集めているアプライアンス化された高速オブジェクトストレージ製品が、Panasasです。
公的研究機関におけるHPC分野から、企業のハイパフォーマンスのシミュレーション分野まで、
次々と導入が進んでいます。

本セミナーでは、Panasas社の開発責任者であるBrent　Welch氏に来日いただき、
海外の研究機関での利用例や、最先端の導入成果と製品アーキテクチャについて語っていただきます。
ぜひこの機会に、今世界から注目を集める革新的なストレージソリューションの全貌を、
実機デモもご覧いただきながら実感ください。

ご多忙の折とは存じますが、皆さまのご参加を心よりお待ち申し上げます。
http://spider.ctc-g.co.jp/web/fm/edu/2008096g

HP2C製品 - Panasas ActiveStorストレージクラスタ
http://www.hp2c.biz/doc/HP2C.Biz/hp2c_panasas.html
http://www.hp2c.biz/doc/HP2C.Biz/hp2c_panasas_as5k.html

http://www.panasas.com/
0422本田2009/02/09(月) 19:54:12
>>421
POSIX IO extensions for HPC
Brent Welch, Panasas, [welch@panasas.com]
http://www.usenix.org/events/fast05/wips/welch.pdf
POSIX I/O High Performance. Computing Extensions. Brent Welch (Speaker). Panasas.
http://www.usenix.org/events/fast05/wips/slides/welch.pdf
0423本田2009/02/11(水) 20:59:15
>>422
POSIX IO
pNFS
OSDv2
Brent Welch, Panasas Inc.
HECIWG-FSIO 2007
http://institutes.lanl.gov/hec-fsio/workshops/2007/presentations/day3/Welch-HECIWG%20FSIO%202007%20Standards%20Update.pdf

Managing Scalability in Object Storage Systems for HPC Linux Clusters
Brent Welch
Panasas, Inc
6520 Kaiser Drive
Fremont, CA 94555
Tel: 1-510-608-7770
e-mail: welch@panasas.com
Garth Gibson
Panasas, Inc
1501 Reedsdale Street, Suite 400
Pittsburgh, PA 15233
Tel: 1-412-323-6409
e-mail: garth@panasas.com
http://storageconference.org/nasa/conf2004/Papers/MSST2004-49-Gibson-a.pdf
0424本田2009/02/13(金) 18:42:01
Index of /tcl/ftparchive
ftp://ftp.uni-hannover.de/pub/mirror/tcl/mirror/ftp.procplace.com/index.html
>[DIR] Parent Directory 29-Jan-99 12:30 -
>[DIR] FAQ/ 29-Jan-99 12:22 -
>[DIR] NEW/ 17-Apr-00 13:53 -
>[TXT] README.html 11-May-97 16:31 1k
>[DIR] TclX/ 06-Feb-00 18:58 -
>[DIR] alcatel/ 10-Sep-99 17:19 -
>[CMP] all.files.list.gz 12-Jan-00 00:00 74k
>[DIR] binaries/ 29-Jan-99 12:22 -
>[DIR] incoming/ 24-Feb-01 00:36 -
>[DIR] markd/ 29-Jan-99 12:21 -
>[DIR] mirror/ 29-Jan-99 12:21 -
>[DIR] neoscript/ 05-Aug-99 15:54 -
>[DIR] neosoft/ 29-Jan-99 12:21 -
>[DIR] neowebscript-sa/ 29-Jan-99 12:27 -
>[DIR] neowebscript/ 05-Aug-99 15:54 -
>[DIR] old/ 29-Jan-99 12:19 -
>[DIR] sorted/ 19-Oct-99 19:33 -
>[DIR] stuff/ 29-Jan-99 12:19 -
>[DIR] tclx-distrib/ 06-Feb-00 18:58 -
0425デフォルトの名無しさん2009/02/18(水) 19:28:30
ruby tkをはじめたばかりなんですがWin32で言うところのSetTimerは
どのように実現したらよいのでしょうか？

0426デフォルトの名無しさん2009/02/18(水) 20:23:45
after
0427デフォルトの名無しさん2009/02/18(水) 20:37:28
>>462
ﾄﾝ
0428デフォルトの名無しさん2009/02/24(火) 20:57:52
おめでとう
Active Tcl/Tk ver.8.5.6 になった。
0429デフォルトの名無しさん2009/02/24(火) 21:36:08
まだ8.5使ってんのか。俺はもう8.6に移行した
0430デフォルトの名無しさん2009/02/24(火) 22:14:41
8.6は、まだ対応を謳ってない主要ライブラリがあるよ。tcllibとか。
もちろん、使うのは自由だが。
0431デフォルトの名無しさん2009/02/24(火) 22:16:37
最近のTkはナウなヤングにバカウケな感じの見た目になった？
0432本田2009/02/25(水) 00:28:20
>>431
プッ。
0433デフォルトの名無しさん2009/02/25(水) 01:37:24
Tcl/Tkは時代遅れな気がしてPythonでもやるかと思ったが、
インスコしたらTcl/Tk一式入ってきたので、萎えた。
Tkが他のLLで使われる限りTcl/Tkは不滅だな、こりゃ。
0434本田2009/02/25(水) 20:17:07
>>433
Tile: an improved themeing engine for Tk
http://tktable.sourceforge.net/tile/
0435デフォルトの名無しさん2009/02/28(土) 16:26:43
Tcl/TK で作られた端末エミュレータってありますか？
GUI上でシェル使いたいんですけど

イメージとしては GUI上に Textウィジェットみたいなものがおいてあって、
その中でシェルが使えるみたな感じです
0436デフォルトの名無しさん2009/02/28(土) 16:42:09
echo '"abcde","fghi","jkl","mno"' | sed -e "s/\"//g" | awk 'BEGIN{FS=","}{print $3}'

これと同じことをTclではどのようにやれば良いのでしょうか？

また、echoコマンドのところが
cat ファイル名
だった場合についても教えて下さい。
0437デフォルトの名無しさん2009/02/28(土) 17:29:42
set data {"abcde","fghi","jkl","mno"}
puts [string trim [lindex [split $data ,] 2] \"]
0438デフォルトの名無しさん2009/02/28(土) 17:34:15
>>437
おぉ！素晴らしいです！
素早いレス、ありがとうございます。
04394372009/02/28(土) 17:49:51
set f [open "|cat ファイル名]
gets $f data
>>437
close $f
0440デフォルトの名無しさん2009/02/28(土) 17:55:51
>>439
疑問が完全に解けました。
どうもありがとうございます。

Tclって素晴らしいですね。
しっかり勉強して使いこなせるようになりたいです。
0441本田2009/02/28(土) 18:00:10
>>435
Tcl terminal with color support
http://sourceforge.net/projects/tt-color

C言語も使ってるみたい。
0442デフォルトの名無しさん2009/02/28(土) 18:04:52
>>440
Tclには組み込みで正規表現が使えるし、
そのフォーマットならtcllibでcsvのサポートもあるのでテストしてみるべき。
0443デフォルトの名無しさん2009/02/28(土) 18:12:50
>>442
色々教えていただきまして、恐縮の極みです。
正規表現やtcllibについてしっかり勉強したいと思います。
04444392009/02/28(土) 18:25:55
勘違いしてました
catコマンドをつかっちゃだめなんですね
set f [open ファイル名]
foreach data [split [read $f] \n] {
　puts [string trim [lindex [split $data ,] 2] \"]
}
close $f
0445デフォルトの名無しさん2009/02/28(土) 18:39:40
>>441
ありがとうございます。あるんですね端末エミュレータも。
スクリーンショット見る限りじゃ、カラーも使えてかなりよさげです。

端末エミュレータ部分をウィジェットとして自分のアプリ内で使えたりするんですかね？
ちょっと調べてみます。
0446デフォルトの名無しさん2009/03/18(水) 22:12:00
保守
0447本田2009/04/07(火) 00:25:21
Effective Tcl/Tk (ASCII Addison Wesley Programming Series) (単行本)
マーク ハリソン (著), マイケル マックレーン (著),
Mark Harrison (原著), Michael McLennan (原著),
吉川 邦夫 (翻訳)
# 単行本: 415ページ
# 出版社: アスキー (1999/07)
# ISBN-10: 4756131654
# ISBN-13: 978-4756131652
# 発売日： 1999/07
# 商品の寸法: 25.6 x 18 x 2.2 cm

この本出版社では在庫切れ。
大手の書店にはまだ流通在庫は在る。

アスキーは角川書店系列になって以来、
コンピューター関係の本の絶版が続出しているそうだ。
0448デフォルトの名無しさん2009/04/07(火) 00:37:07
>>447
立ち読みで目を通してしまったので買わなかったけど、
そろそろ手に入らなくなっちゃうのか。買っておくかなぁ。

ちなみに Tcl&Tk ツールキット Ousterhout博士　の本は後生大事に抱えている。
0449デフォルトの名無しさん2009/04/09(木) 01:00:54
一番世話になったのはTcl/Tkデスクトップリファレンス。
あれ超見やすい。
0450デフォルトの名無しさん2009/04/19(日) 20:06:05
申し訳ないのですが質問です

5年ほど前にLinuxで使ってた時(Tcl/Tk,Expect共にVer覚えてません)は
send プロセス名 "set a 1"
とか子プロセスに命令してた気がするのですが
本日WinXPにてActiveTcl8.4.19.1を落として動かしてみたところ
sendに引数が2つ以上あると怒られてしまいます

きっと私が何か阿呆な勘違いをしているのでしょうが
「このURLを見やがれタコ」ってモノがありましたら御提示下さい
0451デフォルトの名無しさん2009/04/19(日) 23:19:02
ttp://docs.activestate.com/activetcl/8.4/tcl/TkCmd/send.htm
SECURITY のところに
Under Windows, send is currently disabled.
ってある
0452デフォルトの名無しさん2009/04/19(日) 23:29:22
>>451
ズバリこれですね感謝です
ddeコマンドとやらで代用できるぽいのでちょっと試してみます
0453本田2009/04/26(日) 19:36:30
The Tcl UDP extension provides a simple library to support UDP socket in Tcl.
http://sourceforge.net/projects/tcludp
0454本田2009/04/29(水) 00:21:55
>>452
dde
http://wiki.tcl.tk/996
tcom
http://wiki.tcl.tk/1821
optcl
http://wiki.tcl.tk/1822

activex controlを使うにはtcomではなくoptclを使う。
0455デフォルトの名無しさん2009/04/29(水) 22:24:57
Active Tcl/Tk ver.8.5.7 になった。
0456デフォルトの名無しさん2009/05/09(土) 20:09:14
John Ousterhout博士インタビュー
http://www.computerworld.com.au/article/301772/a-z_programming_languages_tcl
「やっぱOO入れときゃよかったかもね」的発言も。
0457デフォルトの名無しさん2009/05/09(土) 20:14:56
>>456
それはooを取り込もうとがんばってるCoreTeamの
活動を支援するリップサービスでは・・・
0458デフォルトの名無しさん2009/05/14(木) 20:41:38
plplotをWindows上のTCL/TKで使いたいのですが、すぐに動くバイナリは無いものでしょうか？
探した限りは無いようですが…
0459デフォルトの名無しさん2009/05/15(金) 09:09:34
ちょっと見てみたが、そもそもソースコードしか配布されて無いように見える。
素直に自分でビルドしてみたら？
0460デフォルトの名無しさん2009/05/15(金) 21:19:57
>>459
やはりソースだけですか… LinuxだとRPMがあるみたいですが…
コンパイルとなると敷居が高そうなので、ちょっと他を探してみます
ありがとうございました。
0461デフォルトの名無しさん2009/05/15(金) 22:39:19
ttp://dishaw.org/plplot/
0462デフォルトの名無しさん2009/05/16(土) 09:24:34
>>461
ありがとうございます！　早速見てみます
0463デフォルトの名無しさん2009/06/08(月) 20:51:13
ちょっと相談に乗ってくください
Windowsでdqkitを使ってexeにラッピングしてるのですが
set cmd "wish C:/tcl/main.exe/sub.tcl $args &"
eval exec $cmd
例えばですが ↑みたいな感じでsubプロセスを動かしたいのですが動かないんですよね

ttp://www.interq.or.jp/japan/s-imai/tcltk/tclkit2.html
> Starpackにラップした実行形式(.exe)は、execコマンドあるいはパイプで実行できない。

これに引っかかってるのかなーと思うのですが
別の書き方でどうにか出来ないでしょうか？
スレッドって使ったこと無いのですがスレッドで出来るのかな
0464デフォルトの名無しさん2009/06/08(月) 22:12:18
Tclのexe化ツールは複数あるけど、基本的にはTcl側に仮想的なパスを見せ、
実際のファイルアクセスまでにそれを書き換えるという方法だからね。
外部プログラムを実行するのは最終的にシステムコールをとおしてTclの外に行っちゃうから、
システム（この場合はWindows）から見えているパスじゃないといけなくなるだろう。

で、さっきも言ったようにexe化ツールは複数あるから、共通の土台で話ができないよ。
exe化ツールのドキュメントやフォーラムの漁ってみるべし。
0465デフォルトの名無しさん2009/06/08(月) 22:35:31
どもです
いくつか比較して今のdqkitが一番適してる感じだったのですが
他の方法も検討してみます

とりあえず現状で思いついた案としてはsub側も.exeにラッピングして
exeを2個体制で・・・スマートじゃないなぁ
0466デフォルトの名無しさん2009/06/08(月) 22:41:14
一次情報に当たれと言ってるんだ。
自分の頭の中だけじゃ解決しない問題だろ。
0467デフォルトの名無しさん2009/06/09(火) 19:18:33
ActiveStateのツールじゃだめなのかいな？
0468デフォルトの名無しさん2009/06/09(火) 19:50:12
BLTと日本語を使いたいのでなるべくならdqkitが良かったんですよね
Freewrap日本語化版とかTclPro1.3じゃBLTを使うのが大層面倒っぽかったので。

ActiveStateのってTclDevKitでしょうか？
とりあえずBLT使えるか心配なのと仕事でも使いたいのでライセンスも心配ですが
ちょっと試してみます
ありがとうございました
0469デフォルトの名無しさん2009/06/10(水) 00:50:29
wishをサブプロセスで動かすの前提なら別にexeにしなくてもいいんじゃないの？とか言ってみる
0470デフォルトの名無しさん2009/06/10(水) 18:33:01
>>468
ちょっと話が変わって申し訳ないんだけど、BLTってまだメンテされてるんでしょうか？
自分も使おうかと思ってたんですけど、どっかでメンテされてないって読んだので、
躊躇している次第です。
0471本田2009/06/10(水) 20:26:49
>>470
CVSはまだメンテナンスされてる様だ。
http://blt.cvs.sourceforge.net/viewvc/blt/blt/
0472デフォルトの名無しさん2009/06/10(水) 21:22:33
躊躇って何を躊躇すんの？使ったら何かを失うわけでもないのに
0473デフォルトの名無しさん2009/06/11(木) 08:03:07
>>472
業務用のシステムなので、継続的なメンテナンスが見込めそうなのはやはり使いにくい
のですよ。
0474デフォルトの名無しさん2009/06/13(土) 19:55:17
SolarisのCDEでwish使ってるんですが、
Tkのウィンドウだけマウスポインタが通過するだけで
最前面にraiseされてしまいます。
他のウィンドウは大丈夫なのに、なんでだろ。

CDEの設定では
『ポインタでウィンドウをアクティブにするけど、
ウィンドウ順は変えない』
としているので、Tk以外のウィンドウはクリックしない限り
raiseはされないんですが、Tkだけマウスが通っただけで
ウィンドウの前後関係が変わってしまいます。
0475デフォルトの名無しさん2009/06/14(日) 11:09:44
->465
ご本家のTclkitのページ(http://www.equi4.com/tclkit/docs.html)に
　Don't expect exec and popen to work on files in VFS
と書いてあるので､execはイモ筋(dqkitでも多分ダメ)
やりたいことがよくわからないがdqkitはMT版があるので､
複数のプログラムを同時に別のスレッドで走らせる筈｡
0476デフォルトの名無しさん2009/06/17(水) 17:31:59
TclOOで自分が作ったクラスのサブクラスって、どうやって作るんでしょうか？
0477デフォルトの名無しさん2009/06/17(水) 21:51:18
oo::class create mobile {
method bell {} {puts PURURURU}
}

oo::class create softbank {
superclass mobile
}
0478デフォルトの名無しさん2009/06/18(木) 10:09:49
>>477
ありがとうございました。理解できました。
検索しても見つけられなかったので助かりました。
0479デフォルトの名無しさん2009/06/23(火) 05:40:16
なんか最近tcllibがあわただしいと思ってたら、
GSoC 2009のプロジェクトでgraph操作の実装をやってるところだったのね。

http://wiki.tcl.tk/23203
0480デフォルトの名無しさん2009/06/23(火) 12:51:03
印刷サポートもやるみたいね
0481デフォルトの名無しさん2009/06/25(木) 16:42:13
ttp://wiki.tcl.tk/17158の{*}を使いたいのですが、

set l [list a b c [list e d]]
puts {*}$l

とやると、
wrong # args: should be "puts ?-nonewline? ?channelId? string"
というエラーが返ってきます。Tclのバージョンは8.5.7なのですが、
{*}の使い方が間違っているのでしょうか？どなたかご教示下さい。
■ このスレッドは過去ログ倉庫に格納されています