MESCIUS SPREAD for Windows Forms 17.0J サンプルコード集
シェイプを削除する

MESCIUS SPREAD for Windows Forms 17.0J サンプルコード集 > シェイプ > シェイプを削除する

SheetViewクラスのRemoveShapeメソッドに対象シェイプ名を指定することで削除できます。

【実行例】

シェイプ削除


 private void Form1_Load(object sender, System.EventArgs e)
 {

   //Arrowシェイプを追加します
   FarPoint.Win.Spread.DrawingSpace.ArrowShape arrow = new FarPoint.Win.Spread.DrawingSpace.ArrowShape();
   arrow.Name = "Arrow-01";
   arrow.BackColor = Color.Red;
   arrow.AlphaBlendBackColor = 90;
   arrow.ShadowColor = Color.Blue;
   arrow.AlphaBlendShadowColor = 90;
   arrow.ShadowDirection = FarPoint.Win.Spread.DrawingSpace.ShadowDirection.BottomRight;
   arrow.SetBounds(10, 10, 90, 60);
   fpSpread1.ActiveSheet.AddShape(arrow);

 }

 private void button1_Click(object sender, System.EventArgs e)
 {

   //Arrowシェイプを削除します
   fpSpread1.ActiveSheet.RemoveShape("Arrow-01");

 }
 Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load

   'Arrowシェイプを追加します
   Dim arrow As New FarPoint.Win.Spread.DrawingSpace.ArrowShape
   arrow.Name = "Arrow-01"
   arrow.BackColor = Color.Red
   arrow.AlphaBlendBackColor = 90
   arrow.ShadowColor = Color.Blue
   arrow.AlphaBlendShadowColor = 90
   arrow.ShadowDirection = FarPoint.Win.Spread.DrawingSpace.ShadowDirection.BottomRight
   arrow.SetBounds(10, 10, 90, 60)
   FpSpread1.ActiveSheet.AddShape(arrow)

 End Sub

 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

   'Arrowシェイプを削除します
   FpSpread1.ActiveSheet.RemoveShape("Arrow-01")

 End Sub