Discussion :

[AnneOlga]

Bonjour à tous et toutes!
Y a-t-il un moyen (simple) de supprimer la coix permettant la fermeture de la fenêtre? (je veux obliger l'utilisateur à passer par des contrôles à la sortie d'une fenêtre modale...)

Merci

Anne-Olga

[nicoz748]

bonjour AnneOlga,

Si tu veux supprimer La croix dans une form, agit sur la propriété biSystemMenu, dans BorderIcons, en la basculant sur false.

Nicolas

[littledoudou]

un petit exemple...

tu déclare bool monBoolean dans le .h de TFrom... que tu initialise à false dans Create() par exemple...

dans la fonction OnClose():

Code :

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

1
2
3
4
5
6
7
8
void __fastcall TForm::FormClose(TObject *Sender,
      TCloseAction &Action)
{
        if(monBoolean)
              Action=caFree;
        else
              Action=caNone;
}

dans ton programme, tu mets un TButton avec ceci:

Code :

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

1
2
3
4
void __fastcall TFormGestionStock2::Btn_Sortir(TObject *Sender)
{
       monBoolean=true;
}

résultat: tu clique sur la croix, rien ne se passe... tu clique sur le bouton, la form se ferme...

[AnneOlga]

Merci bie à vous, c'est nickel!