Article View: fj.lang.tcl
Article #199Re: [Q] I can't line precisely on canvas..
From: UEKI Masahiro
Date: Sun, 09 Nov 1997 00:00
Date: Sun, 09 Nov 1997 00:00
17 lines
1012 bytes
1012 bytes
$B?"LZ!wEl9)Bg$H?=$7$^$9!#(B
> $B%9%/%m!<%k%P!<Ey$rMQ$$$F1&J}8~$K%9%/%m!<%k$5$;$?>l9g!"(B
> $B;OE@$,$O$k$+:8$NJ}$K$"$C$F=*E@$N$_@5>o0LCV$K%W%m%C%H$5$l$^$9!#(B
$B$N$3$H$G$9$,!"C1$J$k(B typo $B$N$h$&$J5$$,$7$^$9!#(B
> proc CanvB1Press {sheet x y} {
> global dx1 dy1 dx2 dy2 count
> set c $sheet
> set sx [$c canvasx $x]
> set sy [$c canvasy $y]
>
> bind $c <ButtonRelease-1> "drawLine $c $x $y %x %y"
drawLine $B$NBh#2!"Bh#30z?t$O(B $sx $B$H(B $sy $B$,@5$7$$$s$8$c$"$j$^$;$s$+!#(B
Technical Details
Message-ID:
<UEKI.97Nov9155653@vega.cs.titech.ac.jp>Path:
arc1-ca.pugleaf.net!unknown!not-for-mailReferences:
<G94P0211.97Nov8020730@wise21.mn.waseda.ac.jp>Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS X-Google-Thread: 15a83d,7659ec1e7f169b51 X-Google-Attributes: gid15a83d,public From: ueki@cs.titech.ac.jp (UEKI Masahiro) Subject: Re: [Q] I can't line precisely on canvas.. Date: 1997/11/09 Message-ID: <UEKI.97Nov9155653@vega.cs.titech.ac.jp> X-Deja-AN: 288040600 Distribution: fj References: <G94P0211.97Nov8020730@wise21.mn.waseda.ac.jp> Organization: Tokyo Institute of Tech., Dept. of Computer Science, Japan Newsgroups: fj.lang.tcl