IGPGraphicsPath.CloseAllFigures
From Mitov Wiki Doc
This is a Beta Read Only version of this page. Please review and send recommendations to mitov@mitov.com. We will enable the editing as soon as we are happy with the overall Wiki site.
Description
Call this method to close all open figures in this path.
Example:
The following example creates a TGPGraphicsPath object path, adds two figures to path (arcs), closes all figures, and then draws path.
var AGraphics : IGPGraphics; APath : IGPGraphicsPath; begin AGraphics := TGPGraphics.Create( ACanvas ); APath := TGLPath.Create(); APath.AddArc( MakeRect(20, 20, 50, 100), 0.0, 180.0 ); // first figure APath.CloseFigure(); // first figure closed APath.AddArc( MakeRect(40, 40, 50, 100), 0.0, 180.0 ); // second figure APath.CloseAllFigures(); // Draw the path. AGraphics.DrawPath( TGPPen( aclRed ), APath ); end;