diff options
| author | lecoanet | 2003-03-28 17:36:34 +0000 |
|---|---|---|
| committer | lecoanet | 2003-03-28 17:36:34 +0000 |
| commit | 11d300cf2d4d7c0da508ff27534c14261d5043a0 (patch) | |
| tree | 35ff0c0185d755c6d52dcacf958bd587c55739b4 /demos/tiger.tcl | |
| parent | 7a103bee4cda4532e237522e72f6a7d7e81e6839 (diff) | |
| download | tkzinc-11d300cf2d4d7c0da508ff27534c14261d5043a0.zip tkzinc-11d300cf2d4d7c0da508ff27534c14261d5043a0.tar.gz tkzinc-11d300cf2d4d7c0da508ff27534c14261d5043a0.tar.bz2 tkzinc-11d300cf2d4d7c0da508ff27534c14261d5043a0.tar.xz | |
Ajout de plusieurs demos et remaniement
Diffstat (limited to 'demos/tiger.tcl')
| -rw-r--r-- | demos/tiger.tcl | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/demos/tiger.tcl b/demos/tiger.tcl index 46eee31..b0ac265 100644 --- a/demos/tiger.tcl +++ b/demos/tiger.tcl @@ -528,7 +528,7 @@ $w.zinc add curve __g__472 {{301.5 191.5} {284 179.5} {284 179.5 c} {303 196.5 c $w.zinc translate $topGroup 200 150 -### some binding useful for debugging +##### bindings for moving rotating scaling the items bind $w.zinc <ButtonPress-1> "press motion %x %y" bind $w.zinc <ButtonRelease-1> release @@ -536,7 +536,6 @@ bind $w.zinc <ButtonPress-2> "press zoom %x %y" bind $w.zinc <ButtonRelease-2> release -##### bindings for moving rotating scaling the items set curX 0 set curY 0 set curAngle 0 |