[Lazarus] FPVectorial and TAChart
Felipe Monteiro de Carvalho
felipemonteiro.carvalho at gmail.com
Thu Apr 21 13:40:30 CEST 2011
On Wed, Apr 20, 2011 at 7:15 AM, Alexander Klenin <klenin at gmail.com> wrote:
> 1) How to draw a rectangle?
> 3) How to draw a polygon?
Now you can do this:
var
ADoc: TvVectorialDocument;
begin
ADoc.StartPath(0, 0);
ADoc.AddLineToPath(100, 0);
ADoc.AddLineToPath(100, 100);
ADoc.AddLineToPath(0, 100);
ADoc.AddLineToPath(0, 0);
ADoc.SetBrushStyle(bsSolid);
ADoc.SetBrushColor(something);
ADoc.EndPath();
And you have a Polygon.
I decided to define polygons as simply paths with a Brush.Style <>
bsClear, seams simpler then defining two separate bug very similar
elements
--
Felipe Monteiro de Carvalho
More information about the Lazarus
mailing list