Spread Windows Forms 7.0 Product Documentation
ClearControls Method
See Also  Example Support Options
FarPoint.Win.Spread Assembly > FarPoint.Win.Spread Namespace > SheetView Class : ClearControls Method


Glossary Item Box

Removes all child controls from the control container for the sheet.

Syntax

Visual Basic (Declaration) 
Public Overridable Sub ClearControls() 
Visual Basic (Usage)Copy Code
Dim instance As SheetView
 
instance.ClearControls()
C# 
public virtual void ClearControls()

Example

This example clears all child controls from the sheet.
C#Copy Code
public class SpreadTextBox : TextBox, FarPoint.Win.Spread.DrawingSpace.IEmbeddedControlSupport {
    
    private FarPoint.Win.Spread.DrawingSpace.Moving moving = Moving.None;
    
    private FarPoint.Win.Spread.DrawingSpace.Sizing sizing = Sizing.None;
    
    private FarPoint.Win.Spread.DrawingSpace.ChildActivationPolicy activation = FarPoint.Win.Spread.DrawingSpace.ChildActivationPolicy.DoubleClick;
    
    public virtual FarPoint.Win.Spread.DrawingSpace.ChildActivationPolicy ActivationPolicy {
        get {
            return activation;
        }
        set {
            //  activation = Value
        }
    }
    
    public virtual FarPoint.Win.Spread.DrawingSpace.Moving CanMove {
        get {
            return moving;
        }
        set {
            moving = value;
        }
    }
    
    public virtual FarPoint.Win.Spread.DrawingSpace.Sizing CanSize {
        get {
            return sizing;
        }
        set {
            sizing = value;
        }
    }
    
    public void ControlPaint(Graphics g, Rectangle r, FarPoint.Win.Spread.Appearance appearance, object value, bool isSelected,
bool isLocked, float zoomFactor) {
        g.SetClip(r, CombineMode.Intersect);
        g.FillRectangle(new SolidBrush(this.BackColor), r);
        // g.FillRectangle(New SolidBrush(Me.BackColor), r.X - 120, r.Y - 120, r.Width, r.Height)
        g.DrawString(this.Text, Font, new SolidBrush(this.ForeColor), r.X, r.Y);
        this.TextChanged += new System.EventHandler(this.MeTextChanged);
    }
    
    public void MeTextChanged(object sender, EventArgs e) {
        this.BackColor = Color.Beige;
    }
}

SpreadTextBox tb = new SpreadTextBox();
tb.Name = "TB";
fpSpread1.ActiveSheet.AddControl(tb, 2, 2);

    
    private void Button1Click(object sender, System.EventArgs e) {
        fpSpread1.ActiveSheet.ClearControls();
    }
Visual BasicCopy Code
Public Class SpreadTextBox
   Inherits TextBox
   Implements FarPoint.Win.Spread.DrawingSpace.IEmbeddedControlSupport

   Private moving As FarPoint.Win.Spread.DrawingSpace.Moving = Moving.None
   Private sizing As FarPoint.Win.Spread.DrawingSpace.Sizing = Sizing.None
   Private activation As FarPoint.Win.Spread.DrawingSpace.ChildActivationPolicy = FarPoint.Win.Spread.DrawingSpace.ChildActivationPolicy.DoubleClick

   Public Overridable Property ActivationPolicy() As FarPoint.Win.Spread.DrawingSpace.ChildActivationPolicy Implements FarPoint.Win.Spread.DrawingSpace.IEmbeddedControlSupport.ActivationPolicy
   Get
     Return activation
   End Get
   Set(ByVal Value As FarPoint.Win.Spread.DrawingSpace.ChildActivationPolicy)
     ' activation = Value
   End Set
   End Property

   Public Overridable Property CanMove() As FarPoint.Win.Spread.DrawingSpace.Moving Implements FarPoint.Win.Spread.DrawingSpace.IEmbeddedControlSupport.CanMove
       Get
           Return moving
       End Get
       Set(ByVal Value As FarPoint.Win.Spread.DrawingSpace.Moving)
          moving = Value
       End Set
   End Property

   Public Overridable Property CanSize() As FarPoint.Win.Spread.DrawingSpace.Sizing Implements FarPoint.Win.Spread.DrawingSpace.IEmbeddedControlSupport.CanSize
       Get
           Return sizing
       End Get
       Set(ByVal Value As FarPoint.Win.Spread.DrawingSpace.Sizing)
           sizing = Value
       End Set
   End Property


   Public Sub ControlPaint(ByVal g As Graphics, ByVal r As Rectangle, ByVal appearance As FarPoint.Win.Spread.Appearance,
ByVal value As Object, ByVal isSelected As Boolean, ByVal isLocked As Boolean, ByVal zoomFactor As Single) Implements
FarPoint.Win.Spread.DrawingSpace.IEmbeddedControlSupport.ControlPaint
    g.SetClip(r, CombineMode.Intersect)
    g.FillRectangle(New SolidBrush(Me.BackColor), r)
    'g.FillRectangle(New SolidBrush(Me.BackColor), r.X - 120, r.Y - 120,r.Width, r.Height)
    g.DrawString(Me.Text, Font, New SolidBrush(Me.ForeColor), r.X, r.Y) 
    AddHandler Me.TextChanged, AddressOf MeTextChanged

  End Sub

  Public Sub MeTextChanged(ByVal sender As Object, ByVal e As EventArgs)
    Me.BackColor = Color.Beige
  End Sub
End Class

Dim tb As New SpreadTextBox()
tb.Name = "TB"
FpSpread1.ActiveSheet.AddControl(tb, 2, 2)

Private Sub Button1Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
    FpSpread1.ActiveSheet.ClearControls()
End Sub

Requirements

Target Platforms: Windows 2000 Professional (SP4), Windows 2000 Server, Windows 2003 Server (SP1), Windows 2008, Windows XP (SP2), Windows Vista, Windows 7, Windows 8

See Also

© 2002-2014 ComponentOne, a division of GrapeCity. All Rights Reserved.