OK, makes sense. One tiny thing more... Draw.Foreground = Color.Black Draw.LineWidth = 3 Draw.Circle(106, 106, 105)
Draw.LineWidth = 1 Draw.FillStyle = Fill.Solid 'this draws very narrow sector Draw.FillColor = Color.Black Draw.Circle(106, 106, 105, Rad(359), Rad(360)) 'this draws little red cross at center point of the sector. Draw.Foreground = Color.Red Draw.Line(104, 106, 108, 106) Draw.Line(106, 104, 106, 108) However sector is off from center point. See attachment. Jussi On Sun, Dec 9, 2012 at 5:12 PM, Benoît Minisini < [email protected]> wrote: > Le 07/12/2012 14:28, Jussi Lahtinen a écrit : > >> Fixed in revision #5415. > >> > > > > Something is still different from the original behaviour. > > I use same circle commands to draw pie chart and it still fails... > > > > Test output: > > > > Area num. 0: in rads; 0 to 0.89759700342775 > > Area num. 1: in rads; 0.89759700342775 to 1.79519400685551 > > Area num. 2: in rads; 1.79519400685551 to 2.69279101028326 > > Area num. 3: in rads; 2.69279101028326 to 3.59038801371102 > > Area num. 4: in rads; 3.59038801371102 to 4.48798501713877 > > Area num. 5: in rads; 4.48798501713877 to 5.38558202056653 > > Area num. 6: in rads; 5.38558202056653 to 6.28317902399428 > > Area num. 7: in rads; 6.28317902399428 to 0 > > > > It seems that drawing area 7 cover the whole chart. > > So it would be: > > Draw.Circle(106, 106, 105, 6.28317902399428, 0) > > > > 6.28317902399428 is same as Pi(2) or 360 degrees, which means start is > same > > as end. > > > > I think whole circle should be drawn with this: > > Draw.Circle(106, 106, 105, 0, 6.28317902399428) > > > > And this shouldn't draw anything: > > Draw.Circle(106, 106, 105, 6.28317902399428, 0) > > > > > > Jussi > > Actually the old Draw class was wrong, because you can draw a pie > clockwise (End > Start) or counter-clockwise (End < Start). So only > Start = End should not draw anything (or just a line between the center > and the point at the specified angle). > > -- > Benoît Minisini > > > ------------------------------------------------------------------------------ > LogMeIn Rescue: Anywhere, Anytime Remote support for IT. Free Trial > Remotely access PCs and mobile devices and provide instant support > Improve your efficiency, and focus on delivering more value-add services > Discover what IT Professionals Know. Rescue delivers > http://p.sf.net/sfu/logmein_12329d2d > _______________________________________________ > Gambas-user mailing list > [email protected] > https://lists.sourceforge.net/lists/listinfo/gambas-user >
<<attachment: Screenshot.png>>
------------------------------------------------------------------------------ LogMeIn Rescue: Anywhere, Anytime Remote support for IT. Free Trial Remotely access PCs and mobile devices and provide instant support Improve your efficiency, and focus on delivering more value-add services Discover what IT Professionals Know. Rescue delivers http://p.sf.net/sfu/logmein_12329d2d
_______________________________________________ Gambas-user mailing list [email protected] https://lists.sourceforge.net/lists/listinfo/gambas-user
