Fehlermeldung "ELEMENT HAT KEIN FENSTER"

[bernhard_LA]

ich habe eine eigene Komponente um diese wenigen Zeilen Code erweitert und bekomme die lustige Fehlermeldung von oben wenn ich die Komponente in einem neuen Projekt auf ein Form ziehe.

Delphi-Quellcode:

 TCheckListBox2 = class(TCheckListBox)
  private

    FSelectedItems: TStringList; 
    function getSelectedItems: TStringList;


      public
    { Public-Deklarationen }
    constructor create(AOwner: TComponent); override;
    destructor destroy; override;



  property SelectedItems: TStringList read getSelectedItems;
  end;




constructor TCheckListBox2.create(AOwner: TComponent);
begin
  inherited create(AOwner);

  FSelectedItems := TStringList.create;
end;

destructor TCheckListBox2.destroy;
begin
  FSelectedItems.Free;
  inherited;
end;

function TCheckListBox2.getSelectedItems: TStringList;
var
  i: integer;
begin
  FSelectedItems.Clear;
  for i := 0 to self.count - 1 do
  begin
    if (self.Checked[i] = true) then
    begin
      FSelectedItems.Add(self.Items[i]);
    end;
  end;
  result := FSelectedItems;
end;

Wenn ich die Property auskommentiere kann ich die Komponente auf einem Form platzieren.