Probleme mit neuer Komponente

[barnti]

Hallo,
ich möchte die folgende Komponente erstellen:

Delphi-Quellcode:

unit akQuery;

interface

uses
  SysUtils, Classes, DB, mySQLDbTables;

type
  akQuery = class(TmySQLQuery)
  private
    { Private declarations }
  protected
    { Protected declarations }
  public
    { Public declarations }
    constructor Create(AOwner: TComponent; Database: TmySQLDatabase);
  published
    { Published declarations }
  end;

procedure Register;

implementation

procedure Register;
begin
  RegisterComponents('Samples', [akQuery]);
end;

{ akQuery }

constructor akQuery.Create(AOwner: TComponent; Database: TmySQLDatabase);
begin
  inherited Create(AOwner);
  self.Database:= Database;
end;

end.

Leider taucht ein nicht genauer spezifizierter Fehler auf.
Kann jemand helfen?