abstract error in componente

[EWeiss]

Habe hier jede menge abstract Fehler in einer Komponente
Das tritt auf wenn ich diese als obj einlade.

Füge ich diese direkt in das Formular ein ist es in ordnung.
Zumindest kommt keine Meldung.

Nur wenn sie als obj und in das DesignPanel von der Jedi Componente eingefügt wird.
Was kann ich da machen ?

Bild im Anhang.. und die class

Delphi-Quellcode:

unit cAVeButton;

interface

uses
  Windows,Classes, Graphics, Controls, ExtCtrls, Messages, pngimage;

type
  TcAVeButton = class(TCustomControl)
  private
    FUpPic       : TPngObject;
    FDownPic     : TPngObject;
    FOverPic     : TPngObject;
    FBoolTruePic : TPngObject;
    FBoolFalsePic: TPngObject;
    FShowBoolPic : Boolean;
    FFixMode     : Boolean;
    FTouchMode   : Boolean;
    FButtonDown  : Boolean;
    FBoolPicXPos : Integer;
    FBoolPicYPos : Integer;
    FLabelXPos   : Integer;
    FLabelYPos   : Integer;
    FAppIndex    : Integer;
    FEntered     : Boolean;
    FShowButton  : Boolean;
    FFunktion    : String;
    FAktion      : String;
    FTimer: TTimer;

    procedure WMLButtonUp(var Message: TWMLButtonUp); message WM_LBUTTONUP;
    procedure WMLButtonDown(var Message: TWMLButtonDown); message WM_LBUTTONDOWN;
    procedure WMMouseEnter( var Message : TWMMouse ); message CM_MOUSEENTER;
    procedure WMMouseLeave( var Message : TWMMouse ); message CM_MOUSELEAVE;
    procedure SetDownPic(Value: TPngObject);
    procedure SetUpPic(Value: TPngObject);
    procedure SetOverPic(Value: TPngObject);
    procedure SetBoolTruePic(Value: TPngObject);
    procedure SetBoolFalsePic(Value: TPngObject);
    procedure SetText(Value: TCaption); reintroduce;
    procedure SetTouchMode(Value: Boolean);
    procedure SetFixMode(Value: Boolean);
    procedure SetShowButton(Value:Boolean);
    procedure SetShowBoolPic(Value: Boolean);
    procedure SetBoolPicXPos(Value: Integer);
    procedure SetBoolPicYPos(Value: Integer);
    procedure SetLabelXPos(Value: Integer);
    procedure SetLabelYPos(Value: Integer);
    procedure DrawParentBackground(AToDC : HDC);

  protected
    procedure Paint; override;
    procedure TimerEvent(Sender: TObject);
  public
    constructor Create(AOwner: TComponent); override;
    destructor  Destroy; override;
  published
    property Funktion: String read FFunktion write FFunktion;
    property Aktion: String read FAktion write FAktion;
    property Caption write SetText;
    property UpPicture: TPngObject read FUpPic write SetUpPic;
    property DownPicture: TPngObject read FDownPic write SetDownPic;
    property OverPicture: TPngObject read FOverPic write SetOverPic;
    property BoolTruePicture: TPngObject read FBoolTruePic write SetBoolTruePic;
    property BoolFalsePicture: TPngObject read FBoolFalsePic write SetBoolFalsePic;
    property TouchMode: Boolean read FTouchMode write SetTouchMode;
    property FixMode: Boolean read FFixMode write SetFixMode;
    property ShowButton: Boolean read FShowButton write SetShowButton;
    property ShowBoolPic: Boolean read FShowBoolPic write SetShowBoolPic;
    property BoolPicXPos: Integer read FBoolPicXPos write SetBoolPicXPos;
    property BoolPicYPos: Integer read FBoolPicYPos write SetBoolPicYPos;
    property LabelXPos: Integer read FLabelXPos write SetLabelXPos;
    property LabelYPos: Integer read FLabelYPos write SetLabelYPos;
    property AppIndex: Integer read FAppIndex write FAppIndex;
    property Font;
    property OnMouseDown;
    property OnMouseUp;
    property OnClick;

  end;

procedure Register;

Delphi-Quellcode:

procedure Register;
begin
  RegisterComponents('cAVe', [TcAVeButton]);
end;

gruss Emil