Discussion :

[Oxygn44]

Bonjour à tous,

Je créé un groupbox et je voudrais indiquer son parent (une TabSheet précise).
Le nom de cette tabsheet est dans une variable Page (string).

Ai-je le doiroit d'écrire cela?

Code :

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

1
2
3
4
5
6
7
8
with TGroupBox.Create() do
              begin
                Parent := Page;
                Left:=3;
                Top:=(Num-1)*25;
                Height:=25;
                Width:=618;
              end

Merci pour votre aide.

[sat83]

Regarde du coté FindComponent qui te permettra de faire ce que tu veux faire

[ShaiLeTroll]

Oxygn44, oui, c'est tout à fait cela, tu peux affecter un Control comme Panel, Form, TabSheet, ... à un autre Control pour gérer

tu peux aussi utiliser Windows.SetParent, si tu veux passer par les Handles et les API ...

FindComponent permet de retrouver le Owner (propriétaire, responsable de la mémoire), à priori rien à voir avec le Parent qui est une notion visuelle "ancrage" des contrôles entre eux ! mais c'est utile pour retrouver Page si tu connais son Owner (une Form en général) et donc tu peux faire

Code :

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

1
2
3
Component := Form.FindComponent(Page); // Page c'est un peu léger comme nom de variable, PageName aurait plus clair !
if Component is TWinControl then
  Parent := Component as TWinControl;

Tu peux surtout regarder aussi PageControl.Pages et PageCount, qui serait plus approprié !