Hallo,
ich versuche zur Zeit vorhandene Delphi-Komponenten umzuschreiben und stosse dabei immer wieder auf den selben Fehler.
hier ein Beispiel:
Delphi-Quellcode:
unit LabelKomponente;
interface
uses
SysUtils, Classes, Controls, StdCtrls;
type
TLabel1 =
class(TLabel)
private
{ Private-Deklarationen }
protected
{ Protected-Deklarationen }
public
{ Public-Deklarationen }
constructor Create(AOwner: TComponent);
override;
published
{ Published-Deklarationen }
end;
procedure Register;
implementation
uses
graphics;
constructor Tlabel1.Create(AOwner: TComponent);
begin
inherited create(aowner);
font.Color := clgreen;
end;
procedure Register;
begin
RegisterComponents('
Samples', [TLabel1]);
end;
end.
Diese Komponente wird in einem
Package integriert und das
Package installiert.
Wenn ich die Komponente auf einem Form platziere wird sie grün angezeigt(wie gewünscht).
Ändere ich dann den Code im Konstruktor auf "
font.Color := clred;" so sollte sich
das so auswirken, dass nach dem nächsten Kompilieren des Programmes, die Komponente rot dargestellt wird.
Das passiert nicht.
Weiters sollte ein Neukompilieren des Packages sich so auswirken, dass die Komponente bereits
zur Designzeit rot auf dem Form dargestellt wird. Auch das passiert nicht. Erst wenn ich die Komponente neu auf dem Form
platziere wird sie rot dargestellt.
In Delphi-2006 hat das immer problemlos funktioniert.
Ich vermute ein Problem mit Such- oder Bibliothekspfaden.
Kann mir da irgendjemand helfen?