ナレッジベース

[Visual Basic]
Imports Microsoft.VisualBasic.PowerPacks
Imports GrapeCity.Win.Components

Public Class ShapeContainerResizePolicy
　　Inherits ResizePolicy
　　Public Overrides ReadOnly Property TargetType() As Type
　　　　Get
　　　　　　Return GetType(ShapeContainer)
　　　　End Get
　　End Property

　　Public Overrides Sub ResizeLayout(control As Control, infos As ResizeLayoutInfo)
　　　　Dim shapeContainer As ShapeContainer = TryCast(control, ShapeContainer)
　　　　For Each shape As Shape In shapeContainer.Shapes
　　　　　　If TypeOf shape Is SimpleShape Then
　　　　　　　　Dim simpleShape As SimpleShape = TryCast(shape, SimpleShape)
　　　　　　　　simpleShape.Bounds = infos.ScaleRectangle(simpleShape.Bounds)
　　　　　　ElseIf TypeOf shape Is LineShape Then
　　　　　　　　Dim lineShape As LineShape = TryCast(shape, LineShape)
　　　　　　　　lineShape.StartPoint = New Point(infos.ScaleX(lineShape.StartPoint.X), infos.ScaleY(lineShape.StartPoint.Y))
　　　　　　　　lineShape.EndPoint = New Point(infos.ScaleX(lineShape.EndPoint.X), infos.ScaleY(lineShape.EndPoint.Y))
　　　　　　End If
　　　　Next
　　　　MyBase.ResizeLayout(control, infos)
　　End Sub
End Class

[C#]
using GrapeCity.Win.Components;
using Microsoft.VisualBasic.PowerPacks;

public class ShapeContainerResizePolicy : ResizePolicy
{
　　public override Type TargetType
　　{
　　　　get { return typeof(ShapeContainer); }
　　}

　　public override void ResizeLayout(Control control, ResizeLayoutInfo infos)
　　{
　　　　ShapeContainer shapeContainer = control as ShapeContainer;
　　　　foreach (Shape shape in shapeContainer.Shapes)
　　　　{
　　　　　　if (shape is SimpleShape)
　　　　　　{
　　　　　　　　SimpleShape simpleShape = shape as SimpleShape;
　　　　　　　　simpleShape.Bounds = infos.ScaleRectangle(simpleShape.Bounds);
　　　　　　}
　　　　　　else if (shape is LineShape)
　　　　　　{
　　　　　　　　LineShape lineShape = shape as LineShape;
　　　　　　　　lineShape.StartPoint = new Point(infos.ScaleX(lineShape.StartPoint.X), infos.ScaleY(lineShape.StartPoint.Y));
　　　　　　　　lineShape.EndPoint = new Point(infos.ScaleX(lineShape.EndPoint.X), infos.ScaleY(lineShape.EndPoint.Y));
　　　　　　}
　　　　}
　　　　base.ResizeLayout(control, infos);
　　}
}