Dans mon application je créé dynamiquement un objet TPanel
Le code est le suivant et cela marche parfaitement le composant s'affiche bien
Plus loin dans le code je liste les coposants de ma feuille. Là je vois bien tous les objets sauf celui créé dynamiquement
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 LO_Frame := Tfr_Frame.Create(Nil); With LO_Frame Do Begin Parent := pn_HTML; Name := 'essai'; Align := alNone; Top := mod_Structure.GO_Structure[PN_Ligne].Top; Left := mod_Structure.GO_Structure[PN_Ligne].Left; Width := mod_Structure.GO_Structure[PN_Ligne].Width; Height := mod_Structure.GO_Structure[PN_Ligne].Height; Visible := True; End;
J'ai essayé avec la propriété Controls mais cela na marche pas mieux
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 For i := 0 To win_Bureau.ComponentCount - 1 DO Begin showmessage(win_Bureau.Components[i].Name); End;
Merci d'avance pour votre aide
Partager