Bagikan melalui

Cara: Membuat Formulir Windows Berbentuk

Contoh ini memberikan bentuk elips yang mengubah ukuran sesuai dengan bentuk.

Contoh

protected:
    virtual void OnPaint(
        System::Windows::Forms::PaintEventArgs^ e) override
    {
        System::Drawing::Drawing2D::GraphicsPath^ shape =
            gcnew System::Drawing::Drawing2D::GraphicsPath();
        shape->AddEllipse(0, 0, this->Width, this->Height);
        this->Region = gcnew System::Drawing::Region(shape);
    }

protected override void OnPaint(System.Windows.Forms.PaintEventArgs e)
{
    System.Drawing.Drawing2D.GraphicsPath shape = new System.Drawing.Drawing2D.GraphicsPath();
    shape.AddEllipse(0, 0, this.Width, this.Height);
    this.Region = new System.Drawing.Region(shape);
}

 Protected Overrides Sub OnPaint( _
ByVal e As System.Windows.Forms.PaintEventArgs)
     Dim shape As New System.Drawing.Drawing2D.GraphicsPath
     shape.AddEllipse(0, 0, Me.Width, Me.Height)
     Me.Region = New System.Drawing.Region(shape)
 End Sub

Mengkompilasi Kode

Contoh ini memerlukan:

Contoh ini mengambil alih metode OnPaint untuk mengubah bentuk formulir. Untuk menggunakan kode ini, salin deklarasi metode serta kode gambar di dalam metode .

Lihat juga

  • Last updated on