🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: fj.lang.tcl
Article #199

Re: [Q] I can't line precisely on canvas..

#199
From: UEKI Masahiro
Date: Sun, 09 Nov 1997 00:00
17 lines
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-mail
References: <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