Différences
Ci-dessous, les différences entre deux révisions de la page.
| Prochaine révision | Révision précédente | ||
|
prog:lazarus:classes:tform [21/07/2020 21:19] thierry créée |
prog:lazarus:classes:tform [17/04/2021 11:33] (Version actuelle) thierry [Trouver le TForm parent] |
||
|---|---|---|---|
| Ligne 1: | Ligne 1: | ||
| ====== TForm ====== | ====== TForm ====== | ||
| ===== Déclencher l'affichage complet de la Form ===== | ===== Déclencher l'affichage complet de la Form ===== | ||
| - | Grace a cette astuce, on est sure que le dessin de la Form et de tous ses controles est términé... | + | Grace à cette astuce, on est sûr que le dessin de la Form et de tous ses contrôles est terminé... |
| <code delphi> | <code delphi> | ||
| procedure TForm1.FormCreate(Sender: TObject); | procedure TForm1.FormCreate(Sender: TObject); | ||
| Ligne 21: | Ligne 21: | ||
| </code> | </code> | ||
| + | ===== Trouver le TForm parent ===== | ||
| + | Il peut être quelquefois nécessaire de connaitre le TForm parent d'un composant.\\ | ||
| + | Par exemple pour récupérer son Handle... | ||
| + | |||
| + | Dans l'unité ''Forms'' : | ||
| + | * [[https://lazarus-ccr.sourceforge.io/docs/lcl/forms/getparentform.html|GetParentForm(Control: TControl; TopForm: Boolean = True ):TCustomForm;]]\\ pour récuperer le ''TCustomForm'' le plus haut contenant le ''TControl''. | ||
| + | |||