Hallo Forum,
vielleicht könnte Ihr mir einmal behilflich sein. Ich habe eine Komponente, basierend auf TLabel, erstellt. Im Konstruktor soll die Caption gesetzt werden. Leider tut sich gar nichts. Parallel habe ich mal die Farbe gesetzt. Funktioniert einwandfrei. Frage: Was mache ich bei der Caption falsch, das die nicht gesetzt wird? Ich verwende D7.
Code:
unit raka_timestamp;
interface
uses
Classes, Controls, StdCtrls;
type
Ttimestamp = class(TLabel)
private
{ Private-Deklarationen }
protected
{ Protected-Deklarationen }
public
{ Public-Deklarationen }
constructor Create(AOwner:Tcomponent);override;
published
{ Published-Deklarationen }
end;
procedure Register;
implementation
uses dialogs,sysutils,forms;
procedure Register;
begin
RegisterComponents('Standard',[TTimeStamp]);
end;
constructor Ttimestamp.Create(AOwner:TComponent);
begin
inherited Create(AOwner);
Font.Color:=$00FFFF;
Caption:='test';
end;
end.
Danke für die Hilfe.
Gruß
raka