20/04/2024
Windev et les Api Windows
Nb 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)