So, jetzt habe ich alles geschafft, bis auf die kleine Zuweisung, bei diesem Quelltext passt irgendwas noch nicht...
Delphi-Quellcode:
...
procedure Register;
begin
RegisterComponents('Standard', [TMyRunLabel]);
end;
constructor TMyRunLabel.Create(AOwner: TComponent);
begin
inherited;
fTimer := TTimer.Create(self);
fTimer.OnTimer := OnTimer;
FOptions:= TOptions.Create;
ftimer.Interval:=100;
ftimer.Enabled:=True;
foptions.FAktiv:= ftimer.Enabled;
foptions.FGeschwindigkeit:= ftimer.Interval;
end;
Grüße Philipp