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

1 名前：デフォルトの名無しさん mailto:sage [2007/05/01(火) 14:52:44 ] 【英語サイト】 プロジェクト本拠地 tcl.sourceforge.net/ 最新版ソースコード ftp://ftp.tcl.tk/pub/tcl/nightly-cvs/ The Tcler's Wiki wiki.tcl.tk/ The comp.lang.tcl Newsgroup groups.google.com/group/comp.lang.tcl/ ActiveTcl www.activestate.com/products/activetcl/ 【日本語サイト】 もっとTcl/Tk www.interq.or.jp/japan/s-imai/tcltk/ Tcl/Tk Scripting Laboratory www.geocities.jp/urano343/tcltk.html Tcl/Tk Primer mibai.tec.u-ryukyu.ac.jp/~oshiro/Doc/tcltk_primer/ Tcl 8.4.1　Manual Command Reference www.freesoftnet.co.jp/tclkits/doc/TclCmdRef/tcl_contents_jp.htm CategoryTclTk - mynote reddog.s35.xrea.com/wiki/CategoryTclTk.html 【前スレ】 ●●●●TCL/TKなら俺に聞け●●●● pc11.2ch.net/test/read.cgi/tech/1033628416/ 367 名前：デフォルトの名無しさん mailto:sage [2008/11/11(火) 20:25:25 ] 答えると、Tclにはクロージャ無いねん。 だからxを置き換えるしかないんじゃないかなあ。 set func {x {return [list y [list expr $x + \$y]] }} apply [apply $func 1] 2 3 こういうこと？ 368 名前：デフォルトの名無しさん mailto:sage [2008/11/12(水) 00:20:16 ] >>365 λx.λy..x =λx.x でしょ。 こうならないってこと。 369 名前：デフォルトの名無しさん mailto:sage [2008/11/12(水) 08:27:21 ] >>368 > >>365 > λx.λy..x > =λx.x > でしょ。 そんなequalityを持つλ計算の体系は見たことが無い 370 名前：デフォルトの名無しさん mailto:sage [2008/11/14(金) 22:42:02 ] 結局なんだったんだ。もう 371 名前：デフォルトの名無しさん mailto:sage [2008/11/15(土) 10:04:27 ] >>370 同感 372 名前：デフォルトの名無しさん mailto:sage [2008/11/15(土) 10:11:42 ] 点が余計に入った λ.x.(λy.x)は変換するとλx.xだろうと。 373 名前：デフォルトの名無しさん mailto:sage [2008/11/15(土) 18:14:51 ] >>372 お前が前提にしているλ計算の公理系を言え。 通常のβη変換ではλx.(λy.x) = λx.xは導出できない。 374 名前：デフォルトの名無しさん mailto:sage [2008/11/30(日) 09:35:24 ] Tcl and the Tk Toolkit, Rough Cuts, 2nd Edition * By John K. Ousterhout, Ken Jones www.informit.com/store/product.aspx?isbn=0321601750&rll=1 ついこの前プレンティスから出てる妙に読みにくいTcl本買った俺涙目 375 名前：デフォルトの名無しさん mailto:sage [2008/11/30(日) 19:08:03 ] 日本語で良書なTcl本ってなにがあるかな 376 名前：デフォルトの名無しさん mailto:sage [2008/12/01(月) 20:34:12 ] ものすごいつまらんこと聞いていいっすか？ Tclって、pythonで言うところのinputとかraw_inputって無いの？ 377 名前：デフォルトの名無しさん mailto:sage [2008/12/01(月) 22:11:19 ] gets 378 名前：デフォルトの名無しさん mailto:sage [2008/12/02(火) 09:18:28 ] >>376 pythonで言うところのinputって何をするものか書いたほうがアドバイスもらえると思うが？ 379 名前：376 mailto:sage [2008/12/02(火) 20:46:30 ] >>378 それもそうですね。失礼しました。自分は職業プログラマではな いのであんまりうまく説明できそうにないですが。。 webで見つけた説明によれば、 raw_input関数 標準入力から１行読み込んで(末尾の改行をのぞいたものを)文字列に変換して返す。 >>> s = raw_input() test >>> s 'test' とこんな感じです。上記はインタプリタでの動作です。 呼ばれると、ユーザの入力を待つモードになります。 ユーザが文字列を入力すると変数に文字列が代入されます。 input関数は数値入力用です。 380 名前：デフォルトの名無しさん mailto:sage [2008/12/02(火) 20:56:09 ] やっぱgetsでいいじゃん tclsh>gets stdin s test tclsh>puts $s test 381 名前：379 mailto:sage [2008/12/02(火) 23:32:57 ] >>380 レスありがとうございます。 getsにはそんな風に書くんですね。 channelIdってのが何を指してるのかサッパリでした。。 明日会社に行ってまた試してみます。 たまーに仕事用ツール作成でスクリプト書くんですが、 諸事情あって今回はTclにで書いていて。。 382 名前：デフォルトの名無しさん mailto:sage [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 383 名前：デフォルトの名無しさん mailto:sage [2008/12/04(木) 22:00:38 ] binary scanとbinary formatの使い方をすぐ忘れちゃうのは秘密だ 384 名前：デフォルトの名無しさん mailto:sage [2008/12/04(木) 22:04:45 ] >>375 Tcl/Tkデスクトップリファレンスには超おせわになった。 あとEffective Tcl/Tk。この２冊はTcl/Tk修行時代の 10年位前にかなり読んだ。 385 名前：デフォルトの名無しさん mailto:sage [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 的な感じです。 386 名前：デフォルトの名無しさん mailto:sage [2008/12/11(木) 22:04:10 ] >>385 これじゃ無限ループになるだろ。exprはrenameして新たにラッパーのexprを定義すれば？ 387 名前：デフォルトの名無しさん mailto:sage [2008/12/17(水) 17:04:55 ] >312 >BrowseX for Windows使ってた人いない？ Hv3というtkhtmlベースのブラウザならある。 tkhtml.tcl.tk/hv3.html 388 名前：デフォルトの名無しさん [2008/12/19(金) 21:06:51 ] Dr. OusterhoutがTclコアチームから抜ける。 groups.google.com/group/comp.lang.tcl/browse_thread/thread/99e2693293b3c945/e54399b0a7dd8ec1?show_docid=e54399b0a7dd8ec1&pli=1 389 名前：デフォルトの名無しさん [2008/12/22(月) 21:53:03 ] プログラムから逃げてきたのに卒論で無理やりやらされてる Cで作ったexeファイルをtcl/tkで作ったGUI上で実行したりできるの？ ていうかこんなことも分からない感じで死にそう･･･ 390 名前：デフォルトの名無しさん mailto:sage [2008/12/22(月) 23:27:50 ] >>388 そしてその翌日itclのコア組み込みが決定したのであった・・・！ >>389 CでCUIのexe作って、Tcl/Tkでガワ作って、パイプで接続とか。 まあどんなことがやりたいかによる。CでDLL作って、それをTcl/Tk から使うほうが楽かもしれない。 391 名前：デフォルトの名無しさん mailto:sage [2008/12/23(火) 00:07:48 ] >>389 unixだと楽だが、windowsだと面倒。 392 名前：デフォルトの名無しさん [2008/12/23(火) 11:28:21 ] え、incr Tcl？ 正直オブジェクト指向を入れるなら参照とガベコレの概念を入れる前提で デザインしなおしたほうがいいのに･･･ （逆に言うとこの2つを入れればオブジェクト指向はこれまでどおり拡張でいいし） オブジェクト手動開放とか今日日ありえないっすよ。 393 名前：デフォルトの名無しさん mailto:sage [2008/12/23(火) 11:40:20 ] >>391 んなこたーない。 execで実行するだけ。 so, dllも同じソースで簡単に作れるし(windowsはmingwのgcc使ってるけど) 394 名前：デフォルトの名無しさん mailto:sage [2008/12/23(火) 19:53:07 ] いやwindowsは苦労するよ。 pathや引数周りに落とし穴がいっぱいある。 MSが早くcygnusを買収してくれればいいのに。 395 名前：デフォルトの名無しさん mailto:sage [2008/12/23(火) 20:02:39 ] >>394 落とし穴ってなに 396 名前：デフォルトの名無しさん mailto:sage [2008/12/23(火) 23:13:52 ] path周りの避け方はマニュアルに書いてあるだろ。 で、なんでcygnusが出てくるんだ？ もはやTclはcygwinをサポートしてないぞ。 素直にActive TclをインストールしてCはMinGW使えばいい。 397 名前：デフォルトの名無しさん [2008/12/23(火) 23:38:12 ] 8.6b1きたあああああ！！！ try 〜 throwきたあああ！！！ zlibきたあああ！！！ ttk::spinboxきたあああ！！！ tk fontchooserきたああああ！！！ Canvasの回転文字きたああああ！！！ ttkのvistaテーマきたあああ！！！ 398 名前：デフォルトの名無しさん mailto:sage [2009/01/06(火) 12:23:24 ] 今M1だが、修論でtcl使うはめになってubuntuの起動から勉強してるところなんだけど、 tclでパラレルポートからの入力って使える？ その辺含んだお勧めの書籍なんかあれば知りたい。 399 名前：デフォルトの名無しさん [2009/01/06(火) 21:25:39 ] wiki.tcl.tk/2816 まずは適当に検索してみればいいとおもうの。 400 名前：本田 [2009/01/08(木) 21:18:47 ] AC3Dマニュアル panda.ecs.cst.nihon-u.ac.jp/~hiroshi/ac3d/ac3dmanj.html 1998年11月6日更新 - AC3Dバージョン2以降に対応 AC3D mail2.nara-edu.ac.jp/~asait/graphics/ac3d/ac3d.htm >3 次元模型 (モデル) を作るためのソフトはモデラーと呼ばれています。 > AC3D はそのモデラーの一つで、随分人気があるようです。 > AC3D は今では商用ソフトになってしまいました。 Shareware Version. locgate.smtn.stavropol.ru/DOCs/Programming/OpenGL/ac3dwinsw2.zip 古いけどTcl/Tkスクリプト使用して参考になる。 最新版。 www.inivis.com/ 401 名前：本田 [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 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の安定性や速度が改善される可能性があります。 402 名前：デフォルトの名無しさん mailto:sage [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を参照できていないということだと 思いますが、何か良い解決策はありませんか？ よろしくお願いします。 403 名前：402 mailto:sage [2009/01/13(火) 00:10:15 ] 使用環境を書き忘れました。 WindowsXPでActiveTcl8.5.4.0.286921-win32-ix86-threaded.exe をインストールして使っています。 404 名前：デフォルトの名無しさん mailto:sage [2009/01/13(火) 00:30:21 ] -command "puts $msg" 405 名前：402 mailto:sage [2009/01/13(火) 00:56:06 ] >>404 できました！ "と{との違いを調べてきます。 早速の回答ありがとうございます。 406 名前：デフォルトの名無しさん [2009/01/13(火) 12:59:47 ] >>402 {}の違いがポイントではなく、-command で指定するコマンドが関数の外で実行されることがポイントなのです。 msg変数は関数fooのローカル変数なので、関数の外で実行されるボタンのコマンドからは参照できません。 407 名前：デフォルトの名無しさん mailto:sage [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と表示されますね？ これはどういうことかというと、 408 名前：402 mailto:sage [2009/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をよく使っている身としては、 ポインタを渡せれば良いのになあと、何だかもぞもぞした気分になりました。 409 名前：デフォルトの名無しさん mailto:sage [2009/01/14(水) 20:59:03 ] 何をしたいかわかってないが、たぶんそのevalは不要 410 名前：402 mailto:sage [2009/01/14(水) 21:08:00 ] あら本当だ。。 「-textvar 変数名を表す文字列」だから ウィジェット生成時にvarを文字列に展開してOKということでしょうか。 落ち着け>オレ 411 名前：本田 [2009/01/14(水) 22:13:21 ] >>408 > でも、C言語やPerlをよく使っている身としては、 > ポインタを渡せれば良いのになあと、何だかもぞもぞした気分になりました。 C言語知ってるんなら、Tclのソースコードを読んだらいいのに、 Tcl8.0位がコンパクトで読みやすいし古すぎない。 412 名前：402 mailto:sage [2009/01/15(木) 01:47:16 ] >>411 うーん。。多分自分のC言語の実力程度ではソースを読んでも理解できなさそうな予感がします。 あと正直なところ、自分としてはあまりtcl/tkは好きになれず、あまり深入りしたくありません。。 （今はやむを得ぬ事情があって触っています。せめてperl/tkが使えれば良かったかもと思います） tcl/tkならではの魅力があるのは分かるんですが（簡単にGUIを使えて複数のOSで動かせるとか）、 他の言語なら当たり前のようにできる記述方法ができなかったりすることが多いので 結構ストレスがたまってしまいます。 たとえば行末のコメントは、「# コメント」では駄目で「;# コメント」ならOKとか、 理由は分かっても不自由さがぬぐえません。 自分にもっと実力があればラッパーかプリプロセッサを自作したくなるだろうと思います。 上のコメントの例なら、ごく単純には sed 's/\/\//;#/g' すればストレスが減るかもしれません。 とか何とか愚痴をこぼしながらもtcl/tkの本を２冊買ってしまいました。 でも最新バージョンの便利そうなウィジェットの説明などはネットで調べた方が良さそうですね。 413 名前：デフォルトの名無しさん [2009/01/15(木) 07:35:43 ] Tcl/Tkの本がまだ２冊もあったか。 414 名前：デフォルトの名無しさん mailto:sage [2009/01/15(木) 10:27:13 ] CとリンクしやすいのでTclはメインにしてもよし、サブで使ってもよし。 文字列処理がやりやすいのでファイル入出力とGUIはTcl/Tk、その他はCとかでもいいし。 415 名前：本田 [2009/01/21(水) 19:06:18 ] Ayam is a free 3D modelling environment for the RenderMan interface, distributed under the BSD licence. 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もサポートしてます。 416 名前：デフォルトの名無しさん mailto:sage [2009/01/22(木) 19:17:56 ] Python/Tkでソースの間違いを見つけられないのですが、 探してもらってもいいですか？ 417 名前：デフォルトの名無しさん mailto:sage [2009/01/23(金) 01:44:36 ] TCL/TKなら俺に聞け Python/Tkなら他所で聞け 418 名前：デフォルトの名無しさん mailto:sage [2009/01/24(土) 01:56:00 ] >>417 座ぶとん１０枚！￣ー￣)ﾉ〜■ 419 名前：本田 [2009/02/01(日) 08:39:59 ] BRL-CAD brlcad.org/ brlcad.org/wiki/Documentation brlcad.org/wiki/Users_group_presentations BRL-CAD's integration with TclTk brlcad.org/w/images/3/3a/TclTk_Integration.pdf BRL-CAD　スクリーンショット www.cadcamcube.jp/brlcad2.html 420 名前：本田 [2009/02/09(月) 18:37:46 ] >>419 ArcherとMGEDの２つのUIがあります。 Archerは、GUIを使います。 MGEDは、CUIで、 puts {Hello,World!}と入力すると、 Hello,World!とエコーします。 421 名前：本田 [2009/02/09(月) 19:35:59 ] いま、欧米で一躍注目を集めているアプライアンス化された高速オブジェクトストレージ製品が、Panasasです。 公的研究機関におけるHPC分野から、企業のハイパフォーマンスのシミュレーション分野まで、 次々と導入が進んでいます。 本セミナーでは、Panasas社の開発責任者であるBrent　Welch氏に来日いただき、 海外の研究機関での利用例や、最先端の導入成果と製品アーキテクチャについて語っていただきます。 ぜひこの機会に、今世界から注目を集める革新的なストレージソリューションの全貌を、 実機デモもご覧いただきながら実感ください。 ご多忙の折とは存じますが、皆さまのご参加を心よりお待ち申し上げます。 spider.ctc-g.co.jp/web/fm/edu/2008096g HP2C製品 - Panasas ActiveStorストレージクラスタ www.hp2c.biz/doc/HP2C.Biz/hp2c_panasas.html www.hp2c.biz/doc/HP2C.Biz/hp2c_panasas_as5k.html www.panasas.com/ 422 名前：本田 [2009/02/09(月) 19:54:12 ] >>421 POSIX IO extensions for HPC Brent Welch, Panasas, [welch@panasas.com] www.usenix.org/events/fast05/wips/welch.pdf POSIX I/O High Performance. Computing Extensions. Brent Welch (Speaker). Panasas. www.usenix.org/events/fast05/wips/slides/welch.pdf 423 名前：本田 [2009/02/11(水) 20:59:15 ] >>422 POSIX IO pNFS OSDv2 Brent Welch, Panasas Inc. HECIWG-FSIO 2007 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 storageconference.org/nasa/conf2004/Papers/MSST2004-49-Gibson-a.pdf 424 名前：本田 [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 - 425 名前：デフォルトの名無しさん mailto:sage [2009/02/18(水) 19:28:30 ] ruby tkをはじめたばかりなんですがWin32で言うところのSetTimerは どのように実現したらよいのでしょうか？ 426 名前：デフォルトの名無しさん mailto:sage [2009/02/18(水) 20:23:45 ] after 427 名前：デフォルトの名無しさん mailto:sage [2009/02/18(水) 20:37:28 ] >>462 ﾄﾝ 428 名前：デフォルトの名無しさん [2009/02/24(火) 20:57:52 ] おめでとう Active Tcl/Tk ver.8.5.6 になった。 429 名前：デフォルトの名無しさん mailto:sage [2009/02/24(火) 21:36:08 ] まだ8.5使ってんのか。俺はもう8.6に移行した 430 名前：デフォルトの名無しさん mailto:sage [2009/02/24(火) 22:14:41 ] 8.6は、まだ対応を謳ってない主要ライブラリがあるよ。tcllibとか。 もちろん、使うのは自由だが。 431 名前：デフォルトの名無しさん mailto:sage [2009/02/24(火) 22:16:37 ] 最近のTkはナウなヤングにバカウケな感じの見た目になった？ 432 名前：本田 [2009/02/25(水) 00:28:20 ] >>431 プッ。 433 名前：デフォルトの名無しさん mailto:sage [2009/02/25(水) 01:37:24 ] Tcl/Tkは時代遅れな気がしてPythonでもやるかと思ったが、 インスコしたらTcl/Tk一式入ってきたので、萎えた。 Tkが他のLLで使われる限りTcl/Tkは不滅だな、こりゃ。 434 名前：本田 [2009/02/25(水) 20:17:07 ] >>433 Tile: an improved themeing engine for Tk tktable.sourceforge.net/tile/ 435 名前：デフォルトの名無しさん mailto:sage [2009/02/28(土) 16:26:43 ] Tcl/TK で作られた端末エミュレータってありますか？ GUI上でシェル使いたいんですけど イメージとしては GUI上に Textウィジェットみたいなものがおいてあって、 その中でシェルが使えるみたな感じです 436 名前：デフォルトの名無しさん [2009/02/28(土) 16:42:09 ] echo '"abcde","fghi","jkl","mno"' | sed -e "s/\"//g" | awk 'BEGIN{FS=","}{print $3}' これと同じことをTclではどのようにやれば良いのでしょうか？ また、echoコマンドのところが cat ファイル名 だった場合についても教えて下さい。 437 名前：デフォルトの名無しさん mailto:sage [2009/02/28(土) 17:29:42 ] set data {"abcde","fghi","jkl","mno"} puts [string trim [lindex [split $data ,] 2] \"] 438 名前：デフォルトの名無しさん [2009/02/28(土) 17:34:15 ] >>437 おぉ！素晴らしいです！ 素早いレス、ありがとうございます。 439 名前：437 mailto:sage [2009/02/28(土) 17:49:51 ] set f [open "|cat ファイル名] gets $f data >>437 close $f 440 名前：デフォルトの名無しさん mailto:sage [2009/02/28(土) 17:55:51 ] >>439 疑問が完全に解けました。 どうもありがとうございます。 Tclって素晴らしいですね。 しっかり勉強して使いこなせるようになりたいです。 441 名前：本田 [2009/02/28(土) 18:00:10 ] >>435 Tcl terminal with color support sourceforge.net/projects/tt-color C言語も使ってるみたい。 442 名前：デフォルトの名無しさん mailto:sage [2009/02/28(土) 18:04:52 ] >>440 Tclには組み込みで正規表現が使えるし、 そのフォーマットならtcllibでcsvのサポートもあるのでテストしてみるべき。 443 名前：デフォルトの名無しさん mailto:sage [2009/02/28(土) 18:12:50 ] >>442 色々教えていただきまして、恐縮の極みです。 正規表現やtcllibについてしっかり勉強したいと思います。 444 名前：439 mailto:sage [2009/02/28(土) 18:25:55 ] 勘違いしてました catコマンドをつかっちゃだめなんですね set f [open ファイル名] foreach data [split [read $f] \n] { 　puts [string trim [lindex [split $data ,] 2] \"] } close $f 445 名前：デフォルトの名無しさん mailto:sage [2009/02/28(土) 18:39:40 ] >>441 ありがとうございます。あるんですね端末エミュレータも。 スクリーンショット見る限りじゃ、カラーも使えてかなりよさげです。 端末エミュレータ部分をウィジェットとして自分のアプリ内で使えたりするんですかね？ ちょっと調べてみます。 446 名前：デフォルトの名無しさん mailto:sage [2009/03/18(水) 22:12:00 ] 保守 447 名前：本田 [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 この本出版社では在庫切れ。 大手の書店にはまだ流通在庫は在る。 アスキーは角川書店系列になって以来、 コンピューター関係の本の絶版が続出しているそうだ。 448 名前：デフォルトの名無しさん mailto:sage [2009/04/07(火) 00:37:07 ] >>447 立ち読みで目を通してしまったので買わなかったけど、 そろそろ手に入らなくなっちゃうのか。買っておくかなぁ。 ちなみに Tcl&Tk ツールキット Ousterhout博士　の本は後生大事に抱えている。 449 名前：デフォルトの名無しさん mailto:sage [2009/04/09(木) 01:00:54 ] 一番世話になったのはTcl/Tkデスクトップリファレンス。 あれ超見やすい。 450 名前：デフォルトの名無しさん mailto:sage [2009/04/19(日) 20:06:05 ] 申し訳ないのですが質問です 5年ほど前にLinuxで使ってた時(Tcl/Tk,Expect共にVer覚えてません)は send プロセス名 "set a 1" とか子プロセスに命令してた気がするのですが 本日WinXPにてActiveTcl8.4.19.1を落として動かしてみたところ sendに引数が2つ以上あると怒られてしまいます きっと私が何か阿呆な勘違いをしているのでしょうが 「このURLを見やがれタコ」ってモノがありましたら御提示下さい 451 名前：デフォルトの名無しさん mailto:sage [2009/04/19(日) 23:19:02 ] ttp://docs.activestate.com/activetcl/8.4/tcl/TkCmd/send.htm SECURITY のところに Under Windows, send is currently disabled. ってある 452 名前：デフォルトの名無しさん mailto:sage [2009/04/19(日) 23:29:22 ] >>451 ズバリこれですね感謝です ddeコマンドとやらで代用できるぽいのでちょっと試してみます 453 名前：本田 [2009/04/26(日) 19:36:30 ] The Tcl UDP extension provides a simple library to support UDP socket in Tcl. sourceforge.net/projects/tcludp 454 名前：本田 [2009/04/29(水) 00:21:55 ] >>452 dde wiki.tcl.tk/996 tcom wiki.tcl.tk/1821 optcl wiki.tcl.tk/1822 activex controlを使うにはtcomではなくoptclを使う。 455 名前：デフォルトの名無しさん [2009/04/29(水) 22:24:57 ] Active Tcl/Tk ver.8.5.7 になった。 456 名前：デフォルトの名無しさん [2009/05/09(土) 20:09:14 ] John Ousterhout博士インタビュー www.computerworld.com.au/article/301772/a-z_programming_languages_tcl 「やっぱOO入れときゃよかったかもね」的発言も。 457 名前：デフォルトの名無しさん mailto:sage [2009/05/09(土) 20:14:56 ] >>456 それはooを取り込もうとがんばってるCoreTeamの 活動を支援するリップサービスでは・・・ 458 名前：デフォルトの名無しさん mailto:sage [2009/05/14(木) 20:41:38 ] plplotをWindows上のTCL/TKで使いたいのですが、すぐに動くバイナリは無いものでしょうか？ 探した限りは無いようですが… 459 名前：デフォルトの名無しさん mailto:sage [2009/05/15(金) 09:09:34 ] ちょっと見てみたが、そもそもソースコードしか配布されて無いように見える。 素直に自分でビルドしてみたら？ 460 名前：デフォルトの名無しさん mailto:sage [2009/05/15(金) 21:19:57 ] >>459 やはりソースだけですか… LinuxだとRPMがあるみたいですが… コンパイルとなると敷居が高そうなので、ちょっと他を探してみます ありがとうございました。 461 名前：デフォルトの名無しさん mailto:sage [2009/05/15(金) 22:39:19 ] ttp://dishaw.org/plplot/ 462 名前：デフォルトの名無しさん mailto:sage [2009/05/16(土) 09:24:34 ] >>461 ありがとうございます！　早速見てみます 463 名前：デフォルトの名無しさん mailto:sage [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コマンドあるいはパイプで実行できない。 これに引っかかってるのかなーと思うのですが 別の書き方でどうにか出来ないでしょうか？ スレッドって使ったこと無いのですがスレッドで出来るのかな 464 名前：デフォルトの名無しさん mailto:sage [2009/06/08(月) 22:12:18 ] Tclのexe化ツールは複数あるけど、基本的にはTcl側に仮想的なパスを見せ、 実際のファイルアクセスまでにそれを書き換えるという方法だからね。 外部プログラムを実行するのは最終的にシステムコールをとおしてTclの外に行っちゃうから、 システム（この場合はWindows）から見えているパスじゃないといけなくなるだろう。 で、さっきも言ったようにexe化ツールは複数あるから、共通の土台で話ができないよ。 exe化ツールのドキュメントやフォーラムの漁ってみるべし。 465 名前：デフォルトの名無しさん mailto:sage [2009/06/08(月) 22:35:31 ] どもです いくつか比較して今のdqkitが一番適してる感じだったのですが 他の方法も検討してみます とりあえず現状で思いついた案としてはsub側も.exeにラッピングして exeを2個体制で・・・スマートじゃないなぁ 466 名前：デフォルトの名無しさん mailto:sage [2009/06/08(月) 22:41:14 ] 一次情報に当たれと言ってるんだ。 自分の頭の中だけじゃ解決しない問題だろ。 467 名前：デフォルトの名無しさん mailto:sage [2009/06/09(火) 19:18:33 ] ActiveStateのツールじゃだめなのかいな？

---

---

[ 続きを読む ] / [ 携帯版 ]

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef