Einzelnen Beitrag anzeigen

shockrocker

Registriert seit: 16. Apr 2006
Ort: Karlsruhe
9 Beiträge
 
Delphi 5 Standard
 
#1

Eigene Komponenten EClassNotFound bei TImage in TPanel

  Alt 16. Apr 2006, 17:32
servus zusammen!

ich habe eine eigene komponente von TPanel abgeleitet und möchte jetzt im panel ein timage haben, um darauf zeichnen zu können etc.
beim compilieren funktioniert das ganze auch einwandfrei, wenn ich sie jetzt aber in ein programm einbinde kommt sofort nach dem start eine "eclassnotfound: timage" exception. weiß da jemand rat?

der code sieht so aus:

Delphi-Quellcode:
unit xtPanel;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  ExtCtrls;

type
  TxtPanel = class(TPanel)
  private
    img: timage;
  protected
    { Protected-Deklarationen }
  public
    constructor create(aowner: tcomponent); override;
  published
    { Published-Deklarationen }
  end;



procedure Register;

implementation

procedure Register;
begin
  RegisterComponents('Sonstiges', [TxtPanel]);
end;

constructor TxtPanel.create(aowner: tcomponent);
begin
 inherited create(aowner);
 
 img := timage.create(self);

 img.Left := 0;
 img.top := 0;
 img.Width := width;
 img.height := height;

 img.canvas.TextOut(5,5,'test');
end;

end.
vielen dank im voraus und frohe ostern!
frederik
Frederik Trinkmann
  Mit Zitat antworten Zitat