[ruby-list:42355] TkCanvasの座標

はじめまして。Newbieいしもと といいます。

MacOSX10.4+Ruby1.8.2環境下で、マウスカーソル（tcross）で
キャンバスのX、Y座標を取得するプログラムを作っていま 
す。
２点ほど気になりましたので質問させてください。

１．キャンバスの大きさ（と表示範囲）が指定したものと違う。

　プログラムでは２００x２００のキャンバスを生成し、その４辺
ギリギリにそれぞれ一本ずつと、各辺を２等分する線を引いて
います。（６本の線で４つの正方形ができている状態）
　・・・はずなのですが、まず、キャンバスのサイズが206x206
になっています。さらに、表示範囲（？）がずれているのか、左
と上にあるはずの線が表示されません。これは、こういうものなの
でしょうか？それとも私が何か勘違いしているだけでしょうか？


２．生成したline同士の交点とそれを指したカーソルの座標が違 
う。

　キャンバスで交差している点にカーソルを合わせると、Y座標が
１小さい値が表示される気がします。例えば、下記プログラムで
はキャンバス中央の交点は100,100だと思うのですが、カーソルで
は100,99となります。これは何故なのでしょうか？カーソルの問題
？キャンバスの問題？それとも私の問題？

　気になって夜も眠れません。アドバイスいただければ幸いです。
よろしくお願いいたします。

以下、コードです。
＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
require 'tk'

xp=0
yp=0

root = TkRoot.new( 'bg' => 'black' )
f = TkFrame.new( root )
lbx = TkLabel.new( f ){ text 'x=' }.pack( 'side' => 'left' )
enx = TkLabel.new( f ){ text xp }.pack( 'side' => 'left' )
lby = TkLabel.new( f ){ text 'y=' }.pack( 'side' => 'left' )
eny = TkLabel.new( f ){ text yp }.pack( 'side' => 'left' )
f.pack('side'=>'top')

canvas = TkCanvas.new(root,
                   'bg' => 'pink',
                   'height' => 200,
                   'width' => 200,
                   'cursor' => 'tcross'
                   ).pack('side' => 'top')

x_zero = TkcLine.new( canvas, 0, 0, 200, 0)
x_half = TkcLine.new( canvas, 0, 100, 200, 100)
x_max = TkcLine.new( canvas, 0, 200, 200, 200)
y_zero = TkcLine.new( canvas, 0, 0, 0, 200)
y_half = TkcLine.new( canvas, 100, 0,100, 200)
y_max = TkcLine.new( canvas, 200, 0, 200, 200)
#bind
canvas.bind('Motion',
             proc{|x, y| enx.text=xp=x
                  eny.text=xp=y
                  },'%x %y' )

Tk.mainloop
＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
いしもと　まさと