Fenetre avec bordure pas droite

Comment je fais une fenetre avec une forme plus ou moin arrondi? J'ai essayer avec le script

""FORM AU BORDS IRREGULIERS(TRANSPARENCE) A PARIR D'UNE IMAGE !!! (PRATIQUE POUR LES SKINS)""

mais ya seulement les bandes du haut et du bas de mon image qui apparaisse =\ Et j'ai pas trouver d'autre script

(J'ai VB 6)

il y a quelques apis utiles pour cela, voici un exemple :

'**************************************

Declare Function CreateRoundRectRgn Lib "gdi32" (ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long, ByVal X3 As Long, ByVal
Y3 As Long) As Long

Declare Function SetWindowRgn Lib "user32" (ByVal hwnd As Long, ByVal hRgn As Long, ByVal bRedraw As Boolean) As Long

'dans la procédure form_load
Dim rndrectangle
Dim frmApplique

rndrectangle = CreateRoundRectRgn(1, 1, 900, 660, 20, 20)
frmApplique = SetWindowRgn(Me.hwnd, rndrectangle, False)

'**************************************

voilà ça fait une forme en rectangle arrondi de 990 par 660 avec des coins coupés à 20 chaque coté...essaie cela sur une résolution assez grande (pas 800 par 600 évidemment) tu verras ça marche très bien....

a+ raff

Je n'arrive pas à faire tourner ton programme: peut-être faut il changer des propriétés de la form?

Paul
(pbeziau@rennes.cci.fr)

-------------------------------
Réponse au message :
-------------------------------

> il y a quelques apis utiles pour cela, voici un exemple :
>
> '**************************************
>
> Declare Function CreateRoundRectRgn Lib "gdi32" (ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long, ByVal X3 As Long, ByVal
> Y3 As Long) As Long
>
> Declare Function SetWindowRgn Lib "user32" (ByVal hwnd As Long, ByVal hRgn As Long, ByVal bRedraw As Boolean) As Long
>
> 'dans la procédure form_load
> Dim rndrectangle
> Dim frmApplique
>
> rndrectangle = CreateRoundRectRgn(1, 1, 900, 660, 20, 20)
> frmApplique = SetWindowRgn(Me.hwnd, rndrectangle, False)
>
> '**************************************
>
> voilà ça fait une forme en rectangle arrondi de 990 par 660 avec des coins coupés à 20 chaque coté...essaie cela sur une résolution assez grande (pas 800 par 600 évidemment) tu verras ça marche très bien....
>
> a+ raff