Enfants & Parents des TControls

• ControlCount : Retourne le nombre de controles enfants ou 0 si FControls=nil
• Controls[Index: Integer] : Retourne le TControl enfant ayant pour index Index.
• SetParent(NewParent: TWinControl) : Defini NewParent comme parent du TControl. Cette procedure appel CheckNewParent et CheckChildClassAllowed du parent en question.
• CheckNewParent(AParent: TWinControl) : Verifie si le parent AParent peut etre le nouveau parent du TControl.
• CheckChildClassAllowed(ChildClass: TClass; ExceptionOnInvalid: Boolean) : Verifie si le TControl peut etre parent d'un enfant de classe ChildClass.
• TWinControl.ChildClassAllowed(ChildClass: TClass) : Fonction a surcharger pour definir si un enfant de Class ChildClass peut etre l'enfant du TWinControl courant.
• TWinControl.InsertControl(AControl: TControl); : Ajoute AControl comme enfant du TWinControl.
• TWinControl.RemoveControl(AControl: TControl); : Supprime AControl de la liste des enfants.

TWinControl peux avoir des Controls enfants.

Ils sont gérés dans un TFPList

unit Controls

  TWinControl = class(TControl)
  private
    ...
    FControls: TFPList;    // the child controls
    ...

On peut y acceder via .Controls[] et ControlCount

unit Controls

  TWinControl = class(TControl)
    public
    ...
    property ControlCount: Integer read GetControlCount; // Retourne le nombre de controles dans FControls ou 0 si FControls=nil
    property Controls[Index: Integer]: TControl read GetControl; // Retourne le controle a l'Index...
    ...