From: Kikutani Makoto <kikutani@...>
Date: 1997-12-05T10:35:51+09:00
Subject: [ruby-list:5535] wave viewer (Re: postscript)

きくたにです。

Tue, Dec 02, 1997 at 01:36:46PM +0900 において
Kikutani Makoto 曰く:

> Tue, Dec 02, 1997 at 12:34:11PM +0900 において
> Yukihiro Matsumoto さん曰く:
> 
> >   def postscript(keys=None)
> >     tk_send "postscript", *hash_kv(keys)
> >   end
> > 
> > が正解でしょうね．
> 
> このように変更しても、
> 
> $topcanvas.postscript('file'=>'tmp.ps')
> 
> だと 
>     RuntimeError: TkCanvas - invalid command name "postscript"
> と言われております。引数の与えかたがわからないのです。

こっちは相変わらず謎ですねぇ...(;_;)

というのは置いといて、

Thu, Nov 20, 1997 at 02:50:46PM +0900 において
Kikutani Makoto 曰く:

> Tue, Nov 18, 1997 at 02:45:05PM +0900 において
> aito@ei5sun.yz.yamagata-u.ac.jp さん曰く:

> > > 問題は Tkのmainloop を呼ぶタイミングなのです。
> > > データ全部受け取った後、mainloop を呼べれば簡単なんですが、
> > > 上の話のようにそうではないのです。
> >
> > メインでは部品を作った後 Tk.mainloop しておいて，別なスレッド
> > でソケットからの入力を待ち，必要に応じて描画をするというのでは
> > どうでしょう．
>
> すばらしい。
> ありがとうございました。ようやく望みの動作ができました。
> ここにポストしようと思いましたが、けっこう長くなったので
> よしときます。いずれホームページにでも置きます。

は

http://www.eis.or.jp/muse/kikutani/tkwaviewer.rb に置きました、
http://www.eis.or.jp/muse/kikutani/wavtest.rb がテストプログラムです。

zoom-in/outできるようにしてます。いいかげんな手法ですが。
BLTかなんか使わんとだめかと思ったら、canvasにはscaleなんてコマンド
があるじゃないですか。持ってるTcl/Tkの参考書三冊には載ってないぞ。
(comp.lang.tclで知った)

-- 
人生を背負い投げ

菊谷 誠(Kikutani Makoto)  kikutani@eis.or.jp kikutani@jdc.ericsson.se
hgf03701@niftyserve.or.jp    http://www.eis.or.jp/muse/kikutani/