Public Class AnnClosedCurveObject 
   Inherits AnnPolygonObject
   Implements IAnnCurve, IAnnHeader, IAnnObject, IAnnPolygon, IAnnPolyline 

Dim instance As AnnClosedCurveObject

public class AnnClosedCurveObject : AnnPolygonObject, IAnnCurve, IAnnHeader, IAnnObject, IAnnPolygon, IAnnPolyline  

public ref class AnnClosedCurveObject : public AnnPolygonObject, IAnnCurve, IAnnHeader, IAnnObject, IAnnPolygon, IAnnPolyline  

Private Sub AnnClosedCurveObject_AnnClosedCurveObject(ByVal container As AnnContainer)
   Dim closedCurve As AnnClosedCurveObject = New AnnClosedCurveObject()
   closedCurve.Points.Add(New System.Windows.Point(100, 100))
   closedCurve.Points.Add(New System.Windows.Point(200, 100))
   closedCurve.Points.Add(New System.Windows.Point(200, 200))
   closedCurve.Points.Add(New System.Windows.Point(100, 300))
   closedCurve.Tension = 1
   closedCurve.Stroke = Colors.Red
   closedCurve.StrokeThickness = 2.0
   closedCurve.Fill = Colors.White
   closedCurve.FillRule = AnnFillRule.EvenOdd
   closedCurve.IsClosed = True
   container.Children.Add(closedCurve)
End Sub

private void AnnClosedCurveObject_AnnClosedCurveObject(AnnContainer container)
{
   AnnClosedCurveObject closedCurve = new AnnClosedCurveObject();
   closedCurve.Points.Add(new Point(100, 100));
   closedCurve.Points.Add(new Point(200, 100));
   closedCurve.Points.Add(new Point(200, 200));
   closedCurve.Points.Add(new Point(100, 300));
   closedCurve.Tension = 1;
   closedCurve.Stroke = Colors.Red;
   closedCurve.Fill = Colors.White;
   closedCurve.FillRule = AnnFillRule.EvenOdd;
   closedCurve.StrokeThickness = 2.0;
   closedCurve.IsClosed = true;
   container.Children.Add(closedCurve);
}

private void AnnClosedCurveObject_AnnClosedCurveObject(AnnContainer container)
{
   AnnClosedCurveObject closedCurve = new AnnClosedCurveObject();
   closedCurve.Points.Add(new Point(100, 100));
   closedCurve.Points.Add(new Point(200, 100));
   closedCurve.Points.Add(new Point(200, 200));
   closedCurve.Points.Add(new Point(100, 300));
   closedCurve.Tension = 1;
   closedCurve.Stroke = Colors.Red;
   closedCurve.Fill = Colors.White;
   closedCurve.FillRule = AnnFillRule.EvenOdd;
   closedCurve.StrokeThickness = 2.0;
   closedCurve.IsClosed = true;
   container.Children.Add(closedCurve);
}

Private Sub AnnClosedCurveObject_AnnClosedCurveObject(ByVal container As AnnContainer)
   Dim closedCurve As AnnClosedCurveObject = New AnnClosedCurveObject()
   closedCurve.Points.Add(New Point(100, 100))
   closedCurve.Points.Add(New Point(200, 100))
   closedCurve.Points.Add(New Point(200, 200))
   closedCurve.Points.Add(New Point(100, 300))
   closedCurve.Tension = 1
   closedCurve.Stroke = Colors.Red
   closedCurve.Fill = Colors.White
   closedCurve.FillRule = AnnFillRule.EvenOdd
   closedCurve.StrokeThickness = 2.0
   closedCurve.IsClosed = True
   container.Children.Add(closedCurve)
End Sub

<Window x:Class="WPFSamples.AnnClosedCurveObject" Title="Leadtools.Windows.Annotations" Height="600" Width="800" xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation" xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml" xmlns:Leadtools_Windows_Annotations="clr-namespace:Leadtools.Windows.Annotations;assembly=Leadtools.Windows.Annotations">
  <Leadtools_Windows_Annotations:AnnClosedCurveObject Stroke="Blue" StrokeThickness="3.0" FillRule="EvenOdd" IsClosed="True" Tension="1.0" Points="100,100 175, 125, 25,150 175,175 100,200" Header="Closed Curve Object">
    <Leadtools_Windows_Annotations:AnnClosedCurveObject.Fill>
      <LinearGradientBrush>
        <GradientStop Offset="0.0" Color="Black" />
        <GradientStop Offset="0.5" Color="Red" />
        <GradientStop Offset="1.0" Color="Yellow" />
      </LinearGradientBrush>
    </Leadtools_Windows_Annotations:AnnClosedCurveObject.Fill>
  </Leadtools_Windows_Annotations:AnnClosedCurveObject>
</Window>