PowerTools SPREAD for Windows Forms 8.0J
SizeProportional プロパティ


ユーザーがオブジェクトのサイズを縦横比を保ったまま変更できるかどうかを取得または設定します。
構文
'Declaration
 
Public Overridable Property SizeProportional As Boolean
'使用法
 
Dim instance As PSObject
Dim value As Boolean
 
instance.SizeProportional = value
 
value = instance.SizeProportional
public virtual bool SizeProportional {get; set;}

プロパティ値

Boolean:ユーザーがオブジェクトのサイズを縦横比を保ったまま変更できる場合は True、それ以外の場合は False
次のサンプル コードでは、このプロパティを継承するクラスでのプロパティの使用方法を示すために、このプロパティを使用してシェイプをカスタマイズしています。
System.Drawing.Point[] pts = {new System.Drawing.Point(25, 0), 
                            New System.Drawing.Point(0, 50), 
                            New System.Drawing.Point(20, 50), 
                            New System.Drawing.Point((int)2.5, 100), 
                            New System.Drawing.Point(40, 40), 
                            New System.Drawing.Point(20, 40), 
                            New System.Drawing.Point(40, 0), 
                            New System.Drawing.Point(25, 0)};

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

Point pt = new Point(150, 60);

FarPoint.Win.Spread.DrawingSpace.PSObject pso = new FarPoint.Win.Spread.DrawingSpace.CustomShape();
pso.BackColor = Color.Black;
pso.AlphaBlendBackColor = 90;
pso.Enabled = true;
pso.CanMove = FarPoint.Win.Spread.DrawingSpace.Moving.HorizontalAndVertical;
pso.CanRotate = true;
pso.CanSize = FarPoint.Win.Spread.DrawingSpace.Sizing.HeightAndWidth;
pso.Shape = gpath;
pso.SetBounds(250, 250, 120, 120);
pso.Location = pt;
pso.ShapeOutlineColor = Color.Red;
pso.ShapeOutlineStyle = Drawing2D.DashStyle.DashDot;
pso.ShapeOutlineThickness = 2;
pso.Size = new Size(60, 60);
pso.SizeProportional = true;
fpSpread1.ActiveSheet.AddShape(pso);
Dim pts As System.Drawing.Point() = {New System.Drawing.Point(25, 0),  _
                            New System.Drawing.Point(0, 50),  _
                            New System.Drawing.Point(20, 50),  _
                            New System.Drawing.Point(2.5, 100),  _
                            New System.Drawing.Point(40, 40),  _
                            New System.Drawing.Point(20, 40),  _
                            New System.Drawing.Point(40, 0),  _
                            New System.Drawing.Point(25, 0)}

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

dim pt As New Point(150, 60)

Dim pso As New FarPoint.Win.Spread.DrawingSpace.CustomShape
pso.BackColor = Color.Black
pso.AlphaBlendBackColor = 90
pso.Enabled = True
pso.CanMove = FarPoint.Win.Spread.DrawingSpace.Moving.HorizontalAndVertical
pso.CanRotate = True
pso.CanSize = FarPoint.Win.Spread.DrawingSpace.Sizing.HeightAndWidth
pso.Shape = gpath
pso.SetBounds(40, 40, 60, 60)
pso.Location = pt
pso.ShapeOutlineColor = Color.Red
pso.ShapeOutlineStyle = Drawing2D.DashStyle.DashDot
pso.ShapeOutlineThickness = 2
pso.Size = new Size(60, 60)
pso.sizeProportional = True
FpSpread1.ActiveSheet.AddShape(pso)
参照

PSObject クラス
PSObject メンバ

 

 


© 2004-2015, GrapeCity inc. All rights reserved.