enlever boutons controles

bonjour,
comment fait on pour enlever ou desactiver les boutons de controles de la barre de titre d'une MDIForm (les boutons minimize, maximize et close) ?

Regarde les propriétés BorderStyle et Control Box

Salut.
Regarde dans la fenêtre des propriétés de l'objet MDIForm et sélectionne la propriété BorderStyle (le mode FixedSingle te vire les bouton minimize et resize) mais tu ne trouveras rien pour virer la croix. Pour désactiver sa fonction tu met dans la fonction Unload de ta MDIForm:
Cancel = 1 (si ça marche pas essai Cancel = 0, je sais jamais :)
A+

Pour désactiver la croix, il te faut supprimer le menu système fermer :

'fonction permettant de récupèrer le handle du menu système
Private Declare Function GetSystemMenu Lib "user32" ( _
ByVal hWnd As Long, _
ByVal bRevert As Long) As Long

'fonction permettant de supprimer un élément d'un menu
Private Declare Function DeleteMenu Lib "user32" ( _
ByVal hMenu As Long, _
ByVal nPosition As Long, _
ByVal wFlags As Long) As Long

'déclaration des constantes privées à la feuille
Private Const MF_BYCOMMAND = &H0
Private Const SC_CLOSE = &HF060

Private Sub Form_Load()

'on supprime le menu système pour fermer la feuille
Call DeleteMenu(GetSystemMenu(Me.hWnd, 0), SC_CLOSE, MF_BYCOMMAND)

End Sub
_______________________________________

DarK Sidious

[Responsable API/VB du site www.ProgOtoP.com]
Téléchargez ProgOtoP API Viewer

merci DarkSide c'est exactement ce qu'il me fallait.
Les propriétés BorderStyle et ContolBox n'existe pas sur les MDIForm