イベントが発生するTCL /このコマンドを下回ることを、私は同じことをしたいと思いTK 8.2

Question

、：

event generate . <Motion> -warp 1 -x 0 -y 0 

なく、TK 8.2、-warpため

任意の回避策（TclのTkの8.3から開始します）、アイディア ？

Answer 1

ええ、できるだけ早くアップグレードする必要があります。しかし、あなたがTk 8.2で立ち往生しているなら、Windows上でtwapi（Tcl Windows API）をダウンロードできます。互換性のあるバージョンまたはTk8.2を入手してください。次に：

package require twapi 

# Move mouse cursor to absolute coordinates 0 0 
twapi::move_mouse 0 0 

# Move mouse 15 pixels right and 3 pixels up relative to current location: 
twapi::move_mouse 15 -3 -relative