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

Rubrique : 2 - Fenêtres       Sujet : Diviser une fenêtre en 4 parties
Auteur Message
 °¨¨ JL ¨¨° Posté le : 23/06/2000 12:00:00

region1 est un entier long
region2 est un entier long
region3 est un entier long
region4 est un entier long
x1,y1,x2,y2 sont des entiers

x1 = {fenencours()}..largeur/2
y1={fenencours()}..hauteur/2

region1=appeldll32("gdi32","CreateRectRgn",0,0,{fenencours()}..largeur,{fenencours()}..hauteur)
region2=appeldll32("gdi32","CreateRectRgn",x1-5,0,x1+5,{fenencours()}..hauteur)
region3=appeldll32("gdi32","CreateRectRgn",0,y1-5,{fenencours()}..largeur,y1+5)

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

region4=appeldll32("gdi32","CreateRectRgn",0,0,{fenencours()}..largeur,{fenencours()}..hauteur)
region2=appeldll32("gdi32","CreateRectRgn",0,0,{fenencours()}..largeur,{fenencours()}..hauteur)
appeldll32("gdi32","CombineRgn",region4,region2,region1,4)
appeldll32("gdi32","DeleteObject",region2)

appeldll32("user32","SetWindowRgn",handle(),region4,1)
appeldll32("gdi32","DeleteObject",region4)
appeldll32("gdi32","DeleteObject",region1)