MESCIUS SPREAD for Windows Forms 15.0J
Shape プロパティ (CustomShape)
使用例 

シェイプを取得または設定します。
構文
'宣言
 
Public Overrides Property Shape As Object
public override object Shape {get; set;}

プロパティ値

シェイプを含む Object
使用例
次のサンプルコードは、カスタムシェイプを作成します。
System.Drawing.Point[] pts = {new System.Drawing.Point(50, 0), 
        new System.Drawing.Point(0, 100), 
        new System.Drawing.Point(40, 100), 
        new System.Drawing.Point(5, 200), 
        new System.Drawing.Point(80, 80), 
        new System.Drawing.Point(40, 80), 
        new System.Drawing.Point(80, 0), 
        new System.Drawing.Point(50, 0)};

System.Drawing.Drawing2D.GraphicsPath gpath = new System.Drawing.Drawing2D.GraphicsPath();
gpath.AddPolygon(pts);

FarPoint.Win.Spread.DrawingSpace.CustomShape custom = new FarPoint.Win.Spread.DrawingSpace.CustomShape();
custom.Parent = fpSpread1;
// shape should be set before bounds
custom.Shape = gpath;
custom.SetBounds(10, 10, 30, 60);
custom.BackColor = System.Drawing.Color.Yellow;
custom.Name = "customLightningBolt";
fpSpread1.ActiveSheet.AddShape(custom);
Dim pts As System.Drawing.Point() = {New System.Drawing.Point(50, 0),  _
        New System.Drawing.Point(0, 100),  _
        New System.Drawing.Point(40, 100),  _
        New System.Drawing.Point(5, 200),  _
        New System.Drawing.Point(80, 80),  _
        New System.Drawing.Point(40, 80),  _
        New System.Drawing.Point(80, 0),  _
        New System.Drawing.Point(50, 0)}

Dim gpath As System.Drawing.Drawing2D.GraphicsPath = New System.Drawing.Drawing2D.GraphicsPath()
gpath.AddPolygon(pts)

Dim custom As New FarPoint.Win.Spread.DrawingSpace.CustomShape
custom.Parent = FpSpread1
' shape should be set before bounds
custom.Shape = gpath
custom.SetBounds(10, 10, 30, 60)
custom.BackColor = System.Drawing.Color.Yellow
custom.Name = "customLightningBolt"
FpSpread1.ActiveSheet.AddShape(custom)
参照

CustomShape クラス
CustomShape メンバ

 

 


© MESCIUS inc. All rights reserved.