19/04/2024 		Windev et les Api WindowsNb de visiteurs en ligne : 1
>> Introduction << >> Codes et Forum << >> Download <<

Rubrique : 2 - Fenêtres       Sujet : Fenêtre elliptique avec un trou
Auteur Message
 °¨¨ JL ¨¨° Posté le : 23/06/2000 12:00:00

x1,y1 sont des entiers
x1={fenencours()}..largeur/2
y1={fenencours()}..hauteur/2

region1 est un entier long=appeldll32("gdi32","CreateEllipticRgn",10,5,{fenencours()}..largeur-10,{fenencours()}..hauteur-5)
region2 est un entier long=appeldll32("gdi32","CreateEllipticRgn",10,5,{fenencours()}..largeur-10,{fenencours()}..hauteur-5)
region3 est un entier long=appeldll32("gdi32","CreateEllipticRgn",x1-50,y1-50,x1+50,y1+50)
appeldll32("gdi32","CombineRgn",region1,region2,region3,4)
appeldll32("user32","SetWindowRgn",handle(),region1,1)

appeldll32("gdi32","DeleteObject",region1)
appeldll32("gdi32","DeleteObject",region2)
appeldll32("gdi32","DeleteObject",region3)