Public Sub New()

public CADLeader()

		
 	CreateNewImage();			
 	CADLeader leader = new CADLeader();
 	leader.Color = CADConst.clNone;
 	leader.ArrowSize = 3.5f;
 	leader.Arrowhead = true;
 	leader.ArrowScale = 1.0f;					
 	DPoint pt1 = GetRealPoint(100, 100);
 	DPoint pt2 = GetRealPoint(500, 500);
 	leader.Controls.Add(pt1);
 	leader.Controls.Add(pt2);
 	leader.LineWeight = 0.1;						
 	leader.Loaded(cadImage.Converter);			
 	leader.Handle = leader.GetHashCode();		
 	leader.KeyEnt = leader.Handle.ToString();	
 	cadImage.Converter.OnCreate(leader);		
 	cadImage.CurrentLayout.Entities.Add(leader);			
 	EditorCADPictureBox.Invalidate();