Discussion :

[davcaz]

Bonjour,

J'aimerai interdire l'agrandissement d'une fenetre MDI fille.

Le soucis, c'est que dans le paramètrage 'Style' de cette fenetre, je ne peux pas décocher la case 'icone d'agrandissment', tout est grisé !

Apparemment, ca se grise quand je coche dans le paramètrage 'Détail' Fille MDI.

Merci si vous pouvez m'aider pour interdire l'agrandissment de ma fenetre MDI fille.

[miripesage]

bonjour, dans "A chaque modification de FEN_MDI", tu mets ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
SI MoiMême..Largeur<>MoiMême..LargeurInitiale ALORS
	MoiMême..Largeur=MoiMême..LargeurInitiale
FIN
 
SI MoiMême..Hauteur<>MoiMême..HauteurInitiale ALORS
	MoiMême..Hauteur=MoiMême..HauteurInitiale
FIN

[davcaz]

bonjour, dans "A chaque modification de FEN_MDI", tu mets ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
SI MoiMême..Largeur<>MoiMême..LargeurInitiale ALORS
	MoiMême..Largeur=MoiMême..LargeurInitiale
FIN
 
SI MoiMême..Hauteur<>MoiMême..HauteurInitiale ALORS
	MoiMême..Hauteur=MoiMême..HauteurInitiale
FIN

Merci me cela ne correspond pas à ma demande.
Ce code empeche la modification de la taille de la fenetre.
Moi je veux pouvoir modifier la taille de la fenetre.
Ce que je ne veux pas, c'est l'agrandissement (ou maximise) de la fenetre.

[miripesage]

dans ce cas, c'est un peu plus compliqué, alors fais ceci :
dans "Initialisation de ton projet"

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
CONSTANTE
	GWL_STYLE = -16
	WS_MAXIMIZEBOX = 65536

dans "Initialisation de FEN_MDI"

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
StyleEnCours est un entier 
NouveauStyle est un entier 
X est un entier 
StyleEnCours = 0
NouveauStyle = API("User32","GetWindowLongA",Handle(FEN_Fiche_Frais), GWL_STYLE)
StyleEnCours = OUBinaire( StyleEnCours, ETBinaire( NouveauStyle, WS_MAXIMIZEBOX))
NouveauStyle = ETBinaire( NouveauStyle, OUExclusifBinaire( WS_MAXIMIZEBOX, 0xFFFFFFFF))
X = API("User32", "SetWindowLongA", Handle(FEN_Fiche_Frais), GWL_STYLE, NouveauStyle)

J'espère que je ne me suis pas trompé cette fois-ci!

[davcaz]

Merci beaucoup miripesage
Super, ca fonctionne !

Je n'aurai jamais trouvé.

Peux tu m'expliquer ta démarche pour trouver cette solution et les diverses fonctions de ton code ?