7. Méthodes de formes

Les formulaires sont également des composants disponibles et que de telles méthodes, certains sont communs au reste des composants, mais d'autres sont spécifiques aux formulaires. Cette section détaille les plus importantes.

7.1. En TForm

~ TForm ()

Destructor.

ArrangeIcons ()

Trier les icônes de toutes les fenêtres enfants MDI haute dans la fenêtre parent MDI.

 void __fastcall ArrangeIcons(void); 

Ce code Lorsque l'utilisateur exécute un élément de menu choisit appelé fenêtre | Réorganiser les icônes:

 void __fastcall TForm1::ArrangeIcons1Click(TObject *Sender) { Form1->ArrangeIcons(); } 

Cascade ()

Trier en cascade toutes les fenêtres enfants MDI ne sont pas minimisés.

 void __fastcall Cascade(void); 

Ce code disposés tous les enfants du MDI MDI forme actuelle de parents dans un modèle en cascade Lorsque l'utilisateur choisit Cascade la commande de menu:

 void __fastcall TForm1::Cascade1Click(TObject *Sender) { Cascade(); } 

Next ()

Active et met en avant la prochaine fenêtre enfant MDI liste disponible.

 void __fastcall Next(void); 

Le code suivant activer le prochain enfant de Form1.

 Form1->Next(); 

Précédent ()

Active et met en avant le MDI enfant précédent disponible dans la liste des fenêtres.

 void __fastcall Previous(void); 

Cet exemple de code activer l'enfant précédent de la fenêtre parent (Form1) Lorsque l'utilisateur sélectionne un élément de menu dans un menu nommé précédente.

 void __fastcall TForm1::PreviousClick(TObject *Sender) { Previous(); } 

TForm ()

Constructeur.

Carrelage ()

Mosaïque organise toutes les fenêtres enfants MDI ne sont pas minimisés.

 void __fastcall Tile(void); 

Cet exemple utilise trois formes. La première forme a sa propriété FormStyle à MDIForm Septembre. Les deux autres propriétés FormStyle Avez Leur MDIChild Septembre à Septembre et leurs propriétés Visible la valeur True. Ajouter un élément du menu principal et un nom de menu de la TileForms. Ceci est du code pour le gestionnaire TileFormsClick:

 void __fastcall TForm1::TileFormsClick(TObject *Sender) { TileMode = tbVertical; Tile(); }