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