中心オブジェクト(.NET)

図面ウィンドウのイメージの位置を変更するには、CenterPoint プロパティを使用してビューの中心点を変更します。ビューの中心点を変更し、ビューのサイズを変更しない場合、ビューは画面に対して平行に移動します。

アクティブな図面を指定された中心までズームする

このコード例は、「現在のビューを操作する」トピックで定義したズーム手順を使用して現在のビューの中心点を変更する方法を示しています。

ズーム手順に合計 4 つの値が渡されると、最初の 2 つの値は新しい 3D 点として定義され、手順では無視されます。3 番目の値はビューの新しい中心点を定義する点(5,5,0)であり、現在のビューのサイズを維持するために最後の値には 1 が渡されます。

VB.NET

<CommandMethod("ZoomCenter")> _
Public Sub ZoomCenter()
  '' Center the view at 5,5,0
  Zoom(New Point3d(), New Point3d(), New Point3d(5, 5, 0), 1)
End Sub

C#

[CommandMethod("ZoomCenter")]
static public void ZoomCenter()
{
  // Center the view at 5,5,0
  Zoom(new Point3d(), new Point3d(), new Point3d(5, 5, 0), 1);
}

VBA/ActiveX コード リファレンス

Sub ZoomCenter()
    Dim Center(0 To 2) As Double
    Dim magnification As Double
 
    Center(0) = 5: Center(1) = 5: Center(2) = 0
    magnification = 1
 
    ThisDrawing.Application.ZoomCenter Center, magnification
End Sub