●●●●TCL/TKなら俺に聞け 4●●●●
あれ、俺の記憶では東工大だと思っていたのだが・・・スマン 一応snack(のlibsound.dll)を使うと.wavは鳴ったが、snackは糞GPL糞ライセンスだった
Tcl/Tkは糞まみれにならんと音も出んのか。 >wavファイル鳴らしたい。
The Tcl Windows API (TWAPI) extension. Tcl/Tk for Windows
http://sourceforge.jp/users/bitwalk/pf/Tcl_Tk_for_Win/wiki/FrontPage
Cygwin/MinGW 環境でビルドした Windows 向け Tcl/Tk のインストーラを配布します。 何気に驚いたけど、このスレッドってパート4だったのね。
こんなに長い間続いていたんだ >>99
情報ありがとう。それにしても音声は選択肢が少ないですね。 >>102
gnocl::sound - GNOCL Tcl/GTk Bindings - Google Sites
https://sites.google.com/site/gnocltclgtk/packages/gnocl-gnome/gnoc-sound
Play a sound sample from disk. 情報ありがとうございます。
小生MSWin派ですが、Unkx,Linux派にはgnoclも相性が好いとの噂です。
他に非商用限定なら『Sound 1.0 for Tcl/Tk 8.2.0』があるようです。
所で下記2行で発声できますが(WinXp)、画像が邪魔です、画面を壊さない方法ありますか
set thefile "喧しい.wav"
exec {*}[auto_execok start] "" [file nativename [file normalize $thefile]] 懐いなあ
97年ごろ、linuxのgui環境といえばathenaかmotifをcでずらずらapi書いて呼び出すしかなかった
それがスクリプト一行で出た時は感激したなあ
Tclの言語仕様には閉口したけど 全部リスト
リストの先頭をコマンドとして認識
これをわかってれば言語仕様でつまづくことはない >>107
{}で囲んだのは、空白を含むリスト要素 エクスプローラーのリストビュー的なもの使いたいんですがどのウィジット使えばいいんですかね ちょっといじった感じだけど、ミスやバグが見つけ辛い印象だな
こんなのに気づかなかったのか、みたいな >>115
基本的にグローバル変数だっていうのと、
スクリプト言語全般だけど、バグのある所まで到達しないとtypoすらわからないという。 amazonでTCL/TKって検索したら、
出てくる本が、10年以上前の、新しいので、2000年くらい、
しかもみんな絶版。
オライリー(オライリージャパンでは無い)では、
割と最近でも、TCL/TKの本出てるんだし、
もう少し日本語の書籍出てくれないかなぁ。
興味あっても、参照するものが少なすぎるw >>119
書籍も凄く安いのと凄く高いのしかない。とりあえず安いの買ってみた。
後はインターネットで検索するしか無いと思う。マイナー言語だけど、
未だに死ぬほど高い商用アプリでも使ってんのよね。 一旦フツーの言語ではない独特なポイントを理解してしまえば本なんてイラネーけど、そこに至るまでが遠いか。 あるよ
tcl デバッガ とか tcl IDE でググれ >>123
RamDebuggerは日本語のコメントが文字化けする
一応動作するtclファイルを入れたらerrorはかれてしまったし、なんかあやしい
(こっちの環境が悪いだけかもしれないけど)
gdbみたいなのないかなあ 一見簡単にGUIできそうだけど実際ちょっとしたダイアログですら手間だよね
SpecTclっての使ってみたけど、ないよりいいかなというレベル
ActiveStateはやる気あるのかないのか分からん zenityみたいのがあるのを考えるとtcl/tkじゃ全くの力不足だったのが分かる >>128
1.タイトルバーの最大化ボタンを押す。
2.wm state . zoomed
3.wm geometry . 1920x1080 のように最大サイズ指定する。
4.wm attributes . -fullscreen 1 でフルスクリーンにする。 Tcltkってどうやってテキストのカーソルの形変えるんだろ? >>135
ほんとだ!
漏れが検索してもマウスカーソルについてしか出なかったのに怒 >>137
TkImg をインストールすれば使えるようになる 無事無職になったので暇つぶしにtcl覚えたいんだけどまず何から初めりゃいいの bindで
bind . <Shift-Return> { aaa }
bind . <Return> { bbb }
と定義すると、Shiftキー+Enterキーを押した時に aaa と bbb が両方実行されるのを
防ぐ方法は無いのでしょうか?(aaaのみを実行したい) >>141
<Shift-Return> が発動する時には
<Return> に与えたコマンドは実行はされなかったけど環境依存?
試したのは
CentOS 6.5: wish8.5
MacOSX 10.9.5: wish8.5 >>142
すみません。単なるプログラムミスでした。^^;
ちゃんと動作しました。
環境:NetBSD 6.1.5(VMWare)+Wish 8.6 c++とswigでtclライブラリ作ってます。
DLLのINITに初期化動作を仕込みたいのだが、
swig側がINITを自動生成してしまうので困っています。
マニュアル探してもINITに動作を仕込む方法見当たらないし。
swig使っている人、教えてつかぁさい。 自己解決
% init %{
OresamaInit();
%}
でいいのか。
HelpのTclの項目ではなくて、最初の総論のところにのってた。 mac環境ではentryやtextなどテキスト入力を受け付けるウィジェットにおいて日本語のインライン変換ができないようですがなにか解決方法はありますか?
MacOSX 10.10.3
Wish 8.6 bigipの、iルールがTCLですよね。
勉強しようと思うんだけど、
詳しい人いますか? windowのタイトル、最小化、最大化、×ボタンの部分を表示しない方法ありますか? 例えば、
タイトル、最小化、最大化、×ボタンなしのウィンドウ枠で
ボタン一個だけ配置する方法を教えてください。 interpコマンドって何のために使うんだろ?
子プロセスをforkするわけでもなさそうだし。
Tclで作ったアプリケーションに
ユーザー用カスタマイズ機能をつけるとか? HyperMeshのスクリプトのために使い始めたけど
すげー独特 perl→Strawberry Perl
ruby→ActiveScriptRuby
python→公式インストーラ
activestateの最後の砦がtclになるとは誰が想像したか 生きてるスレなら聞いてみよう
Tclでkit展開するためにsdx.kit落とそうと思ったらgoogle code死んでたんだけど、
http://equi4.com/pub/sk/にある2008年2月付けのやつが最新でいいの?
gitとかに移動してるならurlおしえてください偉い人 今からTcl学んでなんか作ろうと思うんだけど何したらいい tclなんてヘルプだけ見ればわかるだろ。
man tcl
やればtclのキモは全部書いてある。
下手な解説サイトとか見るよりマシ。 tcl tkがなんぜ普及しないかってググってもあんまりいい記事なかった
その代わりになぜtclが消えないのか?に興味が出てきた
実はtclってすごいんじゃないのか >>166
半導体のデバイス設計ツールのスクリプトがTclなんだよ。
消えようがない niftyで初心者向けに解説してくれてたサイトがniftyとともにお亡くなりになった。
いつまでたっても初心者のおれにはありがたかったんだけどなぁ >>169
http://web.archive.org/web/20150202045515/http://homepage3.nifty.com/kaku-chan/tcl_tk/index.html tclのキモは
man tcl
で書かれている以上でも以下でもないけどなぁ TCLは内部でUTF-8だぞ。
漢字だろうがなんだろうがキチンと文字数カウントできるし、
文字コード変換も余裕。
細かいツールを作るとき、文字コードとリストが扱えるのがラクチンすぎてTCLばかり使ってる。
C++で同じことやろうと思ったら大変すぎる。 tclからtkを使うんじゃなくて
Tcl_Eval()とかでもなくて
cからtkを使ってみたいんだけど
いまからやるメリットってある? CからGUIを使いたいならQtとかwxWidgetsの方がいいだろ。 hoge.tcl を utf-8 で保存して
hoge.tcl の中に
source -encoding utf-8 hoge.tcl
って書くと
無限ループするんやね if { ![info exists fuga] } {
set fuga ""
source -encoding utf-8 hoge.tcl
} else {
...
本体
...
}
で桶 string compare "1" [string match \"*fuga*\" [string tolower $env(HOGE)]]
みたいなのでenvが無いって言われるケースでも
エラー出ても放っといていいの? 晴れるかな
nicovi
watch/sm26593556 >>183 ?? env(HOGE)-> env(HOME) >>183
set errorstring [catch {string compare "1" [string match \"*fuga*\" [string tolower $env(HOGE)]] }] openからパイプで外部コマンドを子プロセスとして起動した時
外部コマンドがエラーで落ちたかどうかってどうすれば検出できるでしょうか?
closeすればエラーメッセージが返ってくるけど,closeする前は,
子プロセスはゾンビになって残ってるのでpidはちゃんと存在してるし,
書き込みとか読み出しとかすればbroken pipeって言われるけど,
なんかスマートじゃないなぁ あ,ちなみにバージョンは8.4でOSはSolarisです。 「エラーで落ちた」
死んでるけど異常終了すらしてないって意味? 早速のレスありがとうございます。
で、そうじゃなくてその外部コマンドを普通に起動すれば
エラーメッセージ出して異常終了するんだけど、Tclからたとえば
set ch [open "| hogehoge" +r]
とかやってhogehogeコマンドを起動すると、
hogehogeは異常終了するんだけどメッセージは出さず、
psコマンドで様子見るとゾンビプロセス<defunct>になって
waitされるのを待ってる状態です。
puts $ch fugafuga
みたいに文字列を流し込んでやったり、あとcloseとかすると
はじめて「broken pipe」みたいなメッセージが出ます。
それをcatchすればエラー判定できるのですが、
読み書きする前にエラー判定できるといいなの思ったのですが。 >子プロセスはゾンビになって残ってる
これとも矛盾するかな