Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Zoury
Salut Davy! :O)
Regarde du côté de l'API SetWindowRegion.
Voici un exemple extrait de l'exemple de l'API Guide. '*** Option Explicit
Private Declare Function DeleteObject _ Lib "gdi32" _ ( _ ByVal hObject As Long _ ) As Long
Private Declare Function CreateEllipticRgn _ Lib "gdi32" _ ( _ ByVal X1 As Long, _ ByVal Y1 As Long, _ ByVal X2 As Long, _ ByVal Y2 As Long _ ) As Long
Private Declare Function SetWindowRgn _ Lib "user32" _ ( _ ByVal hWnd As Long, _ ByVal hRgn As Long, _ ByVal bRedraw As Boolean _ ) As Long
Merci de poster les réponses au groupe afin d'en faire profiter à tous "Davy Duriatti" <davy.duriatti(enlever_ceci)@tiscali.fr> wrote in message news:
Bonjour à tous,
J'aurais voulu savoir s'il est possible de changer la forme d 'une "Form" sous vb 6, afin de s'affranchir du classique rectangle...
Merci beaucoup pour vos réponses,
Davy
Salut Davy! :O)
Regarde du côté de l'API SetWindowRegion.
Voici un exemple extrait de l'exemple de l'API Guide.
'***
Option Explicit
Private Declare Function DeleteObject _
Lib "gdi32" _
( _
ByVal hObject As Long _
) As Long
Private Declare Function CreateEllipticRgn _
Lib "gdi32" _
( _
ByVal X1 As Long, _
ByVal Y1 As Long, _
ByVal X2 As Long, _
ByVal Y2 As Long _
) As Long
Private Declare Function SetWindowRgn _
Lib "user32" _
( _
ByVal hWnd As Long, _
ByVal hRgn As Long, _
ByVal bRedraw As Boolean _
) As Long
Merci de poster les réponses au groupe afin d'en faire profiter à tous
"Davy Duriatti" <davy.duriatti(enlever_ceci)@tiscali.fr> wrote in message
news:ucn4u9SpDHA.2772@TK2MSFTNGP12.phx.gbl...
Bonjour à tous,
J'aurais voulu savoir s'il est possible de changer la forme d 'une "Form"
sous vb 6, afin de s'affranchir du classique rectangle...
Voici un exemple extrait de l'exemple de l'API Guide. '*** Option Explicit
Private Declare Function DeleteObject _ Lib "gdi32" _ ( _ ByVal hObject As Long _ ) As Long
Private Declare Function CreateEllipticRgn _ Lib "gdi32" _ ( _ ByVal X1 As Long, _ ByVal Y1 As Long, _ ByVal X2 As Long, _ ByVal Y2 As Long _ ) As Long
Private Declare Function SetWindowRgn _ Lib "user32" _ ( _ ByVal hWnd As Long, _ ByVal hRgn As Long, _ ByVal bRedraw As Boolean _ ) As Long