2_2002-2004 Graphics/ Sound #130876

Clip edges of forms to give that rounded feel

Name: Clip edges of forms to give that rounded feel
Brand: Planet Source Code
SKU: PSC-130876
Availability: InStock
Rating: 4.6 (926 reviews)
Author: Dave Matthews

Dave Matthews

★★★★★

4.8 · Download: 2,341

This code will round the edges of your form to give that clipped/rounded look.

Riepilogo AI: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

Codice sorgente

Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles MyBase.Paint
 Dim Pth As New GraphicsPath(), pc As Decimal = 0.18
 Pth.AddEllipse(New Rectangle(-Me.Width * pc, -Me.Height * pc, Me.Width * (1 + 2 * pc), Me.Height * (1 + 2 * pc)))
 Me.Region = New Region(Pth)
End Sub

Commenti originali (3)

Recuperato da Wayback Machine