Ceci est une ancienne révision du document !


Enfants & Parents des TControls

Properties en question

  • 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.

Enfants du Control

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...
    ...
Vous pourriez laisser un commentaire si vous étiez connecté.