Discussion :

[RémiONERA]

Bonjour

J'ai un lot de questions à soumettre à votre saggacité. Voilà je suis en train de dévelloper une application de type MDI et j'ai quelques petits soucis.

1/ J'ai un menu dans la Form principale et je veux pouvoir interdir ou autoriser certain élément de ce menu en fonction de ce qui se passe sur les fenetres fille. Pour ce faire à partir de la fenêtre fille j'appelle une fonction de le fenetre mère qui met à jour le menu et là une exception se produit.

2/J'aimerais que certaines de mes fenetres ne changent pas de taille quand j'execute une commande du type cascade ou tile.

3/Des scrollbar apparaissent sur ma Form principale si les fenetres filles débordent comment peut on empécher l'apparition de ces scrollbar

Voilà c'est tout pour aujourd'hui, j'aurais sans doute d'autres questions par la suite

[Gilles Louïse]

Je vous déconseille de poser plusieurs questions dans le même message.

j'appelle une fonction de le fenetre mère qui met à jour le menu et là une exception se produit.

Veuillez nous montrer votre code ou un fragment et nous dire en quoi consiste cette mise à jour. Il n'y a évidemment aucune raison pour que vous ne puissiez pas mettre à jour votre menu comme vous l'entendez.

À bientôt
Gilles

[RémiONERA]

Bonjour

Voici les bouts de codes demandé:

Dans la fenêtre fille:

Code :

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

1
2
3
4
5
6
7
8
9
10
void __fastcall TCarteForm::FormMouseDown(TObject *Sender,
			TMouseButton Button, TShiftState Shift, int X, int Y)
{
 
	if(Shift.Contains(ssDouble))
	 {
		AjouteUneUnite(X,Y);
	 }
 
}

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
void __fastcall TCarteForm::AjouteUneUnite(int X, int Y)
{
 
	TMainForm *pMainForm;
	if(SetupUniteDlg->ShowModal()==mrOk)
	 {
		//Ici ajout d'u pointeur dans un TList déclaré dans la
                // partie private de la classe TCarteForm
		Refresh();
		pMainForm=(TMainForm*)Parent;
		pMainForm->AjouteUneUnite(pU);
	 }
 
}

Dans la fenêtre principale

Code :

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

1
2
3
4
5
6
7
void __fastcall TMainForm::AjouteUneUnite(TUnite * pU)
{
	//TODO: Add your source code here
	ListeUnitesForm->AjouteUneUnite(pU);
//C'est à cette instruction que j'ai le message EAccesViolation 
	pSauverScenario->Enabled=true;
}

Dès que je retire l'instruction

Code :

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

	pSauverScenario->Enabled=true;

tout fonctionne bien sauf que l'état de mon menu ne change pas

[henderson]

Salut !

2/J'aimerais que certaines de mes fenetres ne changent pas de taille quand j'execute une commande du type cascade ou tile.

Dans ce cas il faut le faire manuellement.
Tu disposes pour celà des propriétés de la MDIForm qui permettent de gérer les MDIChild
(celles que j'ai indiquées dans le repost).

A plus !

[RémiONERA]

Salut

J'ai du rater to repost. J'ai vu que dans les propriétés des fenêtres il y a:

Constraints TSizeConstraints

Je suppose qu'il sagit de cette variable que je dois ajuster manuellemnt

[henderson]

Salut !

Si TCarteForm est une MDIChild, dans ce cas la MDIForm (MainForm) se récupère avec Owner :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
void __fastcall TCarteForm::AjouteUneUnite(int X, int Y) 
{ 
   if(SetupUniteDlg->ShowModal()==mrOk) 
    { 
      //Ici ajout d'u pointeur dans un TList déclaré dans la 
                // partie private de la classe TCarteForm 
      Refresh(); 
      TMainForm *pMainForm = (TMainForm*)Owner; 
      pMainForm->AjouteUneUnite(pU); 
    } 
}

A plus !

[RémiONERA]

Salut

Ca marche en utilisant la propriété Owner. Bravo et merci

A+

Rémi