OVH Cloud OVH Cloud

Cacher la barre de titre d'une fenêtre

1 réponse
Avatar
Thierry
Bonjour,

j'utilise le code suivant pour cr=E9er un useform au coin=20
arrondi :

MeHwnd =3D FindWindowA(vbNullString, Me.Caption)
lW =3D UserForm1.Width * 4 / 3
lH =3D UserForm1.Height * 4 / 3
hRgn =3D CreateRoundRectRgn(0, 0, lW, lH, lW / 4, lH / 4)
SetWindowRgn MeHwnd, hRgn, 1

Mais j'aimerais supprimer la barre de titre de la fen=EAtre=20
affich=E9e. Est-ce possible

Merci par avance

1 réponse

Avatar
Misange
Bonjour,
Michel Pierron, le roi du userform de toutes les formes a fait ça. A
télécharger de^puis excelabo (moteur de recherche des classeurs,
rubrique userform ou bien auteur = pierron.

Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta


le 15/07/2004 08:02:
Bonjour,

j'utilise le code suivant pour créer un useform au coin
arrondi :

MeHwnd = FindWindowA(vbNullString, Me.Caption)
lW = UserForm1.Width * 4 / 3
lH = UserForm1.Height * 4 / 3
hRgn = CreateRoundRectRgn(0, 0, lW, lH, lW / 4, lH / 4)
SetWindowRgn MeHwnd, hRgn, 1

Mais j'aimerais supprimer la barre de titre de la fenêtre
affichée. Est-ce possible

Merci par avance