Search Tools Links Login

Change Form Shape

Posted: 2002-06-01
By: ArchiveBot
Viewed: 71

Filed Under:

VB6 Code Cache

No attachments for this post

Can Change The Shape of any form

Original Author: David Serrano


Look Below

Side Effects

The border can be preatty messed up if you don't know what your doing

API Declarations

Public Declare Function CreateEllipticRgn Lib "gdi32" _
(ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, _
ByVal Y2 As Long) As Long
Public Declare Function SetWindowRgn Lib "user32" _
(ByVal hWnd As Long, ByVal hRgn As Long, _
ByVal bRedraw As Boolean) As Long


Private Sub Form_Load()
Show 'The form!
SetWindowRgn hWnd, CreateEllipticRgn(0, 0, 300, 200), True
End Sub
'E-mail Me at for more info

Comments on this post

No comments have been added for this post.

You must be logged in to make a comment.