[fpc-pascal] Agg Pas Arcs

[James Richters]

>I can supply a complete sample program if it would help
See Sample Program Attached

James

-----Original Message-----
From: fpc-pascal [mailto:fpc-pascal-bounces at lists.freepascal.org] On Behalf Of James Richters
Sent: Wednesday, August 30, 2017 12:18 PM
To: 'FPC-Pascal users discussions' <fpc-pascal at lists.freepascal.org>
Subject: Re: [fpc-pascal] Agg Pas Arcs

Also I just do all my math in radians so I don’t' need to convert deg2rad() as in the examples.  There is little point in converting everything to degrees just to convert it back to radians again.

James

-----Original Message-----
From: fpc-pascal [mailto:fpc-pascal-bounces at lists.freepascal.org] On Behalf Of James Richters
Sent: Wednesday, August 30, 2017 12:10 PM
To: 'FPC-Pascal users discussions' <fpc-pascal at lists.freepascal.org>
Subject: Re: [fpc-pascal] Agg Pas Arcs

>From the above, it seems you implemented your own Arc() procedure. Is that correct?
No, it's the Agg2D Arc Function: 
http://www.crossgl.com/aggpas/documentation/#Arc

>Could you try using my version of AggPas and see how that goes for you.
Yes I am using your version already

>If there is a bug in ARC, I would like to resolve it.   
I can supply a complete sample program if it would help.  I would like to resolve this as well, I'm very happy with AggPas for my application.


I think maybe email wrapping distorted my arc command so they didn't look right Here is the command I am sending broken down with comments:

agg^.arc(
(Drawinfo.gi*pixelscale+Draw_X_offset),  {Cx} (Drawinfo.gj*pixelscale+Draw_Y_offset),  {Cy} (Drawinfo.r*pixelscale), {Rx} (Drawinfo.r*pixelscale), (Ry) (Drawinfo.ea), {Start Angle}
(Drawinfo.sa)  {Sweep Angle}
);

Test Version with hard coded numbers:

agg^.arc(
-600470.258096880350, {Cx}
168254.083748858280, {Cy}
624074.001867781300, {Rx}
624074.001867781300, {Ry}
6.011216001395, {Start}
6.010880670454 {Sweep}
);

Thanks for the help with this

James


_______________________________________________
fpc-pascal maillist  -  fpc-pascal at lists.freepascal.org http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

_______________________________________________
fpc-pascal maillist  -  fpc-pascal at lists.freepascal.org http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
-------------- next part --------------
A non-text attachment was scrubbed...
Name: Agg2DConsole arc.pas
Type: application/octet-stream
Size: 3055 bytes
Desc: not available
URL: <http://lists.freepascal.org/pipermail/fpc-pascal/attachments/20170830/c2420e44/attachment.obj>