EOutOfResources bei resize

[semo]

heir einmal der constructor dieser klasse:

Delphi-Quellcode:

     
      Constructor TCircleScope.Create(Width, Height : Integer);
      begin
        VisBuff := TBitmap.Create;
        BackBmp := TBitmap.Create;

          VisBuff.Width := Width;
          VisBuff.Height := Height;
          BackBmp.Width := Width;
          BackBmp.Height := Height;

          BkgColor := clBlack;
          ScopeRad := 30;
          ScopeOff := 30;
          PenColor := clWhite;
          DrawType := 0;
          DrawRes  := 2;
          FrmClear := True;
          UseBkg := False;
      end;

der desctructor ist leider nicht in der unit aufzufinden?!
wie doof ist das denn?