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