Einzelnen Beitrag anzeigen

Benutzerbild von sakura
sakura

Registriert seit: 10. Jun 2002
Ort: Unterhaching
11.412 Beiträge
 
Delphi 12 Athens
 
#2

Re: Probleme mit neuer Komponente

  Alt 27. Jul 2004, 09:38
Konstruktoren von Komponenten müssen einen festen Aufbau haben. Wenn Du einen im Code nutzen willst, dann kannst Du eine 2. Variante anbeiten:

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); override; // oder komplett weglassen
    constructor CreateDb(AOwner: TComponent; Database: TmySQLDatabase);
  published
    { Published declarations }
  end;

procedure Register;

implementation

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

{ akQuery }

constructor akQuery.Create(AOwner: TComponent);
begin
  inherited Create(AOwner);
end;

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

end.
......
Daniel Lizbeth
Ich bin nicht zurück, ich tue nur so
  Mit Zitat antworten Zitat