ShapeContainer-Konstruktor

Artikel
05/16/2015

Initialisiert eine neue Instanz der ShapeContainer-Klasse.

Namespace: Microsoft.VisualBasic.PowerPacks
Assembly: Microsoft.VisualBasic.PowerPacks.Vs (in Microsoft.VisualBasic.PowerPacks.Vs.dll)

Syntax

'Declaration
Public Sub New

public ShapeContainer()

public:
ShapeContainer()

new : unit -> ShapeContainer

public function ShapeContainer()

Hinweise

Wenn Sie eine Linie oder Form zur Laufzeit erstellen, indem Sie die New-Methode, muss seine Parent-Eigenschaft auf ShapeContainer festgelegt werden. Wenn ShapeContainer bereits für das Formular oder den Container vorhanden ist, sollten Sie die Parent-Eigenschaft auf diese ShapeContainer fest. Wenn kein ShapeContainer vorhanden ist, können Sie ShapeContainer, indem Sie die New-Methode erstellen, anwenden und die Eigenschaft Parent auf das Formular oder den Container festlegen.

Hinweis

Achten Sie darauf, dass Sie nicht mehr als ein ShapeContainer für jedes Formular oder Container erstellen; das diese Vorgehensweise bietet ein unerwartetes Verhalten vor.Wenn Sie eine Entwurfszeitzeile oder ein oder Shape-Steuerelement hinzufügen einem Formular oder Container hinzufügen, nachdem Sie Code schreiben, um ein programmgesteuert zu erstellen, sollten Sie diesen Code ändern, um ShapeContainer zu verwenden, das vom Designer erstellt wird.

Beispiele

Im folgenden Beispiel wird überprüft für vorhandenes ShapeContainer und legt die Parent-Eigenschaft eines OvalShape-Steuerelements fest, das zur Laufzeit erstellt wird, indem die New-Methode.

Private Sub Form1_Load() Handles MyBase.Load
    Dim NewOval As New OvalShape
    Dim i As Integer 
    Dim found As Boolean 
    ' Loop through the Controls collection. 
    For i = 0 To Me.Controls.Count - 1
        ' If a ShapeContainer is found, make it the parent. 
        If TypeOf Controls.Item(i) Is ShapeContainer Then
            NewOval.Parent = Controls.Item(i)
            found = True 
            Exit For 
        End If 
    Next 
    ' If no ShapeContainer is found, create one and set the parents. 
    If found = False Then 
        Dim sc As New ShapeContainer
        sc.Parent = Me
        NewOval.Parent = sc
    End If
    NewOval.Size = New Size(200, 300)
End Sub

private void form1_Load(System.Object sender, System.EventArgs e)
{
    OvalShape NewOval = new OvalShape();
    int i;
    bool found = false;
    // Loop through the Controls collection. 
    for (i = 0; i < this.Controls.Count; i++)
    {
        // If a ShapeContainer is found, make it the parent. 
        if (this.Controls[i] is ShapeContainer)
        {
            NewOval.Parent = ((ShapeContainer)this.Controls[i]);
            found = true;
            break;
        }
    }
    // If no ShapeContainer is found, create one and set the parents. 
    if (found == false)
    {
        ShapeContainer sc = new ShapeContainer();
        sc.Parent = this;
        NewOval.Parent = sc;
    }
    NewOval.Size = new Size(200, 300);
}

.NET Framework-Sicherheit

Volle Vertrauenswürdigkeit für den unmittelbaren Aufrufer. Dieser Member kann von nur teilweise vertrauenswürdigem Code nicht verwendet werden. Weitere Informationen finden Sie unter Verwenden von Bibliotheken aus teilweise vertrauenswürdigem Code.